ÁÚyx€ $ ä8¤lØlìløm<mxq0Otäx0)¾¬yxrecipe_m_788p_a3.bas05/31/200716:53:02PD= TO REGISTER -OK OF 1 DATE: DEMO PERIOD EXPIRED! OVER TOLERANCE ACCEPTED OVER TOLERANCE CORRECTED PHONE 00441284701222 TIME: #RECIPE COMPLETED# ( *BATCH FINISHED* *BATCH INTERRUPTED* *RECIPE CANCELLED* ... = BAD, TRY BATCH PLAN CREATE 788 PLAN DONE: MIX COMPLETED MIX MIXES COMPLETED MIXES NO OK RECORDS RETURN \\#### &%(0-20 CHARS)(4 digits)(4-20 CHARS)(DDMMYYYY)(HHMM)(NOT CONNECTED)) )* OVER CAPACITY ** OVER TOLERANCE ********* NO DATA! *********INTERNAL PROBLEM**+00 44 (0) 1284 701222, , ID:,N,8,1,B----------------------------------------------------------..788.LOG.REG.TTL000000110012 DIGITS CODE14 DAYS PERIOD224572909338400788 BATCH PLAN (788:AA3 20-01-2005 16:12ABOUTACCEPTACCEPTEDADD TO SCALE ALL ALREADY DONE!APPAUTO TARE SCALEAWMBACKBATCH INTERRUPTED!BLANK-14 DAYS TRIALBPLAN788.DATBPLANPCBPPC,BUFFER.777BUFFER.PCBYTES:CCACHE.DATCANCELLED!CIS-OWN.DATCODECOM1:COM1:9600,N,8,1,BCOM2:COMMON.KEYS(KBRD$)CONTINUE BATCH?CREATE 788 PLANCURRENT WEIGHTDATA,DATE & TIME SYNCRONIZED!DATEDATE,DEALER FIRMDEALER PHONEDEMO VERSIONDONEDONE:DT7XX.DATEELAPSE:ERR:NO SERVER REPLY ERR:PACKET TIMEOUT ERR:USER BREAK ERROR: EXITFILE,FINF,FMENU1FMENU10FMENU11FMENU13FMENU2FMENU3FMENU4FMENU5FMENU6FMENU7FMENU8FMENU9FMOD,FMOD,003:FULL VERSIONGIDINCORRECT PASSWORD!ING.CODE DESCRIPTION TARGET,KG ACTUAL,KG TIMEINGRDTS.DATKGLLICENCED TO USERLINE : LLLOAD PC PLAN LOAD:LOOPM I X D O N E !MAX WEIGHTMENUMIX MIXESMORE>NNAMENET ERROR: NETI,NETN,NIC1NO DIO CARD INSTALLED!NO SERVERNOT FOUND!NUMB,NUMBER OF MIXESOOKONLY 788 SUPPORTED!OVER TOL. BY:OVERCAPOVERCAPACITYOVRP L E A S E W A I T !PASSWORDPC BATCH PLAN (PC PLAN IS EMPTY!PC SERVER FOUND !PCPC: PACKET N PRGR,PRINTING PRPL,PRPL,001:YQQUITRRCRD,RCRD,003:RCRD,003:001RECIPE 2005 MRECIPE :RECONNECTREG FIRMREG NAMEREGREG.REMOTE BUTTON RESTART>RETURNRLIST.DATRS-HARD.DATRS-OWNER.DATRUNNING SS1:SEARCH RECIPE BY CODESEARCH RECIPE BY NAMESEND LOG (SEND TOTALS (SEND:STANDARD.RECALLSWTTARETARGET WEIGHTTCPTHRUTIMETIME,TMOD,TMOD,001:DTMOD,001:ETMOD,001:KTMOD,001:RTMOD,001:STXT1,UU.R.C.UDPUNDER TOL. BY:UNLIMITED PERIODUNREGISTEREDUSER MENUWEIGHT OVER TOLERANCEWEIGHT UNDER TOLERANCEWORKING...WORKSTATION ID: WORKSTATION NAME: WRONG CODE!YYES YOUR 14 DAYS IS OVERZERO 1[OK]\ \\ \\ \\ \\ \#####\ \\\&\\\ \ ###&\ \\ \ ###&\ \ \\\\_qt{REPEAT]  2 5>FHKRj„ž¶½¾ÑÓäø   &6=MScimqy€ƒƒ„‰ Š –   ¬¶¼ËÍÎâö÷#9;@H9I‚ƒ‡‹“”–™š«¹º¾ÂÃÈØÛ Üåêëì    $14CFJ\ o{‚ ‡ ‘š  ¡ ª ´¿ÃÈÙÞðÿ!9= B M Yei nwx“§»ÂÆËÐÖÝäëñ÷ý    )6798L „‘’¢© «¸½Á ÒÜàæëðñ õ  $ -7<KLNao v‚…¥µÆ× Ùæ ëô ù    #0 8AIQTXfn t } ˆ”œ µ Ê Ôáæõ÷øü    ) 3 = GQVW]`n ~ Š“© ¿ÉÙ ëö÷û    / > K U a m x Ž  “ ” – — ˜ ™ACTUAL.TOTALATTEMPTSBATCH.DONEBATCH.FILE.NUMBERBATCH.PLAN.FILEBATCH.RECORDFOUNDBYTES.LOADEDBZ1BZ2CATTEMPTCHAR.INDEXCLEAR.NET.BUFFER.TIMEOUTCOM2CTL.VALUECOUNTOFDAYSCURRENT.FILECURRENTFONTCZ1CZ2DELAY.FLAGDISPDLYDPDSPFONTDSPLOGICDSPXDSPYERRNOEVENT2EXT.INPFILE2VIEWFILELENGTHFILESCOUNTINPUT1STATUSINPUT2STATUSINPUT3STATUSIOBOARD.COUNTIS.CONNECTEDISREGISTEREDJUMPSTEPLEN.AP1LEN.BP1LENFORMATFILELENFORMATFILE1LENFORMATFILE10LENFORMATFILE11LENFORMATFILE12LENFORMATFILE13LENFORMATFILE14LENFORMATFILE15LENFORMATFILE2LENFORMATFILE3LENFORMATFILE4LENFORMATFILE5LENFORMATFILE6LENFORMATFILE7LENFORMATFILE8LENFORMATFILE9LOADING.BYTESLOADING.SHOWLOADING.TIMEMAINMENUMIX.COUNTMO1MO2NET.ERROROC.KEYOC1OC2OLD.GROSSWEIGHTOLD.NETWEIGHTOLD.SCALE.RATEOWERPOINT.ADJUSTPRINTERPROCESS.TIMERRECCOUNT2RECCOUNT3RECCOUNT4RECCOUNT5RECIPE.DONERECNORECORD.LENGTHRECORDFOUNDRECORDFOUND.R1RECORDFOUND.R2RECORDFOUND.R3RECORDFOUND.R4RECORDFOUND.R5RECORDFOUND1RECORDFOUND2RECORDFOUND3RECORDFOUND4RECORDS.COUNTREGIDREMOTEREMOTE.BUFFER.LENGTHREMOTE.NETREMOTE.NETWORK.BUFFER.SIZERETRIESSCALES.COUNTSHORT.PACKETSHOW.PWSTART.TIMERSTATUSFILE1STATUSFILE10STATUSFILE11STATUSFILE12STATUSFILE13STATUSFILE14STATUSFILE15STATUSFILE2STATUSFILE3STATUSFILE4STATUSFILE5STATUSFILE6STATUSFILE7STATUSFILE8STATUSFILE9STSTATUSSTSTATUS1STSTATUS2STTIMETT.COM.PORTT.COUNTT.COUNT788T.COUNTPCT.CURRENTT.CURRENT788T.CURRENTPCT.DELAY1T.DELAY2T.INGRSCALET.INGRTOLERANCEMAXT.INGRTOLERANCEMINT.INGRWEIGHTT.MAINCONSECT.PORT.TYPET.TOTALTARGET.TOTALTESTPACKETS.COUNTERTIMEDELAYTMP.GROSSWEIGHT1TMP.GROSSWEIGHT2TMP.NETWEIGHTTMP.TAREWEIGHTTMP.WEIGHTVARTRANSFER.SPEEDTRYXSEND_ABS_N!_ASC_S!_CAPACITY_!_CAPACITY_N!_CARDS_N!_EOF_N!_ERL_!_ERR_!_EVENT_N!_EXTENTX_S!_EXTINP_NN!_F1_D.INT_F1_DIGIT_F1_FORMATLEN_F2_DEC2STR_F2_DECIMALDIGIT_F2_FPART_F3_TMPLEN_F5_CACHE.HANDLER_F5_CHECK.FILE.DETAILS_F5_RECCOUNT.CACHE_F5_RECNO.CACHE_GROSS_N!_IFP1_IFP2_IFP3_IFP4_IFP5_IFP6_INP_SSNNNN!_INSTR_SS!_INTERVAL_!_INTERVAL_N!_INT_N!_LEN_S!_LOC_N!_LOF_N!_MOTION_N!_NET_N!_OVERCAP_N!_S10_ACTUAL.WEIGHT_S11_RECCOUNT12_S12_RECCOUNT12_S14_OC_COO_S14_XBOX1_S14_XBOX2_S15_SCALES2TARE_S16_CI_S18_FNUMBER_S18_SEL1_S19_FNUMBER_S19_SEL2_S1_IDA_S1_X_S20_FNUMBER_S21_FNUMBER_S21_SEL3_S22_FNUMBER_S22_SEL4_S23_FNUMBER_S23_SEL5_S2_DONE.RECORDS_S2_FILE2CHECK_S2_RECCOUNT.RC_S2_RECNO.RC_S39_FNUMBER_S39_RECCOUNTF_S39_RECORDF_S42_DELAY.TIME_S43_DIGIT1_S43_DIGIT2_S43_DIGIT3_S45_MES1Y_S45_MES2Y_S46_MAXLENGTH_S47_CURMESSAGE_S47_EXITDO8_S47_SECURE_S48_CURMESSAGE_S48_SHOWTIME_S48_YSHOW_S49_X_S50_XC_S50_YC_S51_LENGTH_S52_CHECK.SUM_S52_MIN.URC_S52_REGMODE_S52_TEMP1_S52_X_S53_SS_S54_SCALE.STATUS_S55_FIELD.SIZE_S55_RECCOUNT.PR_S55_RECNO.PR_S56_CURRENTDAYS_S56_DEMO.VERSION_S56_STOREDDAYS_S58_OLD.DSPFONT_S58_OLD.DSPX_S58_OLD.DSPY_S58_TEXT.FONT_S58_TEXT.SIZE_S58_TEXT.Y_S5_IDA_S5_RECIPETOTAL.A_S5_RECIPETOTAL.T_S60_PORT2OPEN_S62_RECCOUNT9_S63_FILE.LENGTH_S64_REPEAT.REQUEST_S65_OLD.RNBS_S66_CURRENT.BUFFER.LENGTH_S66_REMOTE.NETWORK.BUFFER.SIZE.OLD_S67_REPEAT.REQUEST_S68_DATE.SET.ERROR_S68_STTIMER_S68_TIME.SET.ERROR_S69_CHECK.PACKET.TIMER_S69_CLEAR.NET.BUFFER.TIMER_S69_NO.RESPONSE.TIMEOUT_S69_TIME.LEFT_S70_READ.STARTED_S71_RECORD.MODE_S72_OK.PRESSED_S75_RECNO5_S76_BROWSELINES_S76_BROWSEREC_S76_BROWSEREC2_S76_C.DONE_S76_FINISHED.INGR_S76_FNUMBER_S76_FNUMBER.MAIN_S76_LINECOUNT_S76_RB_S76_RECNUMFILE_S76_RECORDFILE_S76_XXX_S76_X_SCR_S77_RECCOUNT.LOG_S77_RECCOUNT.TTL_S79_BYTES.FROM.TOP_S79_FNUMBER_S79_INSTR.DISP_S79_LOOP.COUNT_S79_MAX.FIELD_S79_XS_S7_RT_S8_ACCEPT.BUTTON.ON_S8_ACCEPT.ON_S8_ADD2SCALE.TEXT_S8_SP_S9_ACCEPT.BUTTON.ON_S9_ACCEPT.ON_S9_SP_S9_XBOX1_S9_XBOX2_SCLSTAT_N!_STEP1_TIMER_!_TO1_VAL_S!ACK$ACTUAL.WEIGHT.STR$BEL$BLINKDASH$DATA.BACKUP.VERSION$ENQ$EOF$EOT$ESC$ETX$ETX1$F.788.ID$F.BAUDS$F.BUTTON.MODE$F.CACHE.DETAILS$F.CODE$F.COM.PORT$F.COUNT788$F.COUNTPC$F.CURRENT788$F.CURRENTPC$F.DATE.STRING$F.DEALER.FIRM$F.DEALER.PHONE$F.FIELD$F.FIELD.MARKER1$F.FIELD.MARKER2$F.FIELDSTRING$F.FILE.FIELD$F.FILE.FIELD.NET$F.FILE.FIELD.NET2$F.FILE.OUTBUFFER$F.INGRCODE$F.INGRSCALE$F.INGRTOLERANCEMAX$F.INGRTOLERANCEMIN$F.INGRWEIGHT$F.MAINCONSEC$F.NAME$F.PACKET.STATUS$F.PLATFORM.ID$F.PLATFORM.TYPE$F.PORT.TYPE$F.PRINT.FILE$F.RECIPECODE$F.RECIPECODE788$F.RECIPECODEPC$F.RECIPEDATE788$F.RECIPEDATEPC$F.RECIPEDESC$F.RECIPEDESC788$F.RECIPEDESCPC$F.RECIPEFILENAME$F.RECIPEFILENAME788$F.RECIPEFILENAMEPC$F.RECIPENAME$F.RECIPENAME788$F.RECIPENAMEPC$F.RECORD2SEND$F.REGISTRATION.FIRM$F.REGISTRATION.NAME$F.REMOTE.BUFFER$F.TEMP1$F.TEMP10$F.TEMP11$F.TEMP12$F.TEMP13$F.TEMP14$F.TEMP15$F.TEMP16$F.TEMP17$F.TEMP18$F.TEMP19$F.TEMP2$F.TEMP20$F.TEMP21$F.TEMP22$F.TEMP23$F.TEMP24$F.TEMP25$F.TEMP26$F.TEMP27$F.TEMP28$F.TEMP29$F.TEMP3$F.TEMP30$F.TEMP31$F.TEMP32$F.TEMP33$F.TEMP34$F.TEMP35$F.TEMP36$F.TEMP37$F.TEMP38$F.TEMP39$F.TEMP4$F.TEMP40$F.TEMP41$F.TEMP42$F.TEMP43$F.TEMP44$F.TEMP45$F.TEMP46$F.TEMP47$F.TEMP48$F.TEMP49$F.TEMP5$F.TEMP50$F.TEMP6$F.TEMP7$F.TEMP8$F.TEMP9$F.TIME.STRING$F.TOTAL$F.TOTAL.ACTUAL.WEIGHT$F.TOTAL.DATE$F.TOTAL.FULL$F.TOTAL.ID$F.TOTAL.INGR.CODE$F.TOTAL.INGR.MAX$F.TOTAL.INGR.MIN$F.TOTAL.PTYPE$F.TOTAL.RECIPE.CODE$F.TOTAL.TARGET.WEIGHT$F.TOTAL.TIME$F.UPDATE.STRING$FILE.BUFFER$FILE.DATA$FILE.NAME$FILE.NAME.NET$FILE.NAME.NET2$FILE.NAME.NET3$FILE.NAMEXXX$FNAME$HARDWARE$ID.COUNT$ID.NAME$INGR.DONE.ARRAY$LEN.AFTER.POINT1$LINE1$LINEF$LST$MESSAGESTRING1$MESSAGESTRING2$NAK$NDA$NET.BUFFER$OLD.TIME$OLDST$OLDST1$OLDST2$PACKET.MODE$PACKETID$PROGRESSMETER$SEARCH.BY$SIGNAL.ARRAY$STX$STX1$T.788.ID$T.BAUDS$T.BUTTON.MODE$T.CODE$T.DEALER.FIRM$T.DEALER.PHONE$T.FILE.FIELD.NET$T.INGRCODE$T.INGRWEIGHT.STR$T.NAME$T.PLATFORM.ID$T.PLATFORM.TYPE$T.RECIPECODE$T.RECIPECODE788$T.RECIPECODEPC$T.RECIPEDATE788$T.RECIPEDATEPC$T.RECIPEDESC$T.RECIPEDESC788$T.RECIPEDESCPC$T.RECIPEFILENAME$T.RECIPEFILENAME788$T.RECIPEFILENAMEPC$T.RECIPENAME$T.RECIPENAME788$T.RECIPENAMEPC$T.REGISTRATION.FIRM$T.REGISTRATION.NAME$TAG.BPPC$TAG.DATA$TAG.DATE$TAG.FILE$TAG.FINF$TAG.FMOD$TAG.NETI$TAG.NETN$TAG.PRGR$TAG.PRPL$TAG.RCRD$TAG.TIME$TAG.TMOD$TAG.TXT1$TMP.FILE.NAMEXXX$TMP.GROSSWEIGHT$TMP.RECIPEC$TMP.WTVAR$WEIGHT.FORMAT$WEIGHT.FORMAT1$WEIGHT.FORMAT2$WORKSTATION.ID$WORKSTATION.NAME$WT.SPASE$_CHR$_N!_DATE$_!_F1_D.FLO$_F1_DIGIT2FORMAT$_F1_TMPDIGIT$_F3_READBUFFER.NET$_F3_SUBSTRING2FIND$_F4_TAG.STRING$_F4_TEXT.STRING$_F4_TEXT2TAG.NET$_F5_FILE2CHECK$_F5_STR1$_F5_TAG.FILE.STR$_F5_TAG.TMOD.STR$_FILE$_S!_IFP1$_IFP2$_IFP3$_IFP4$_IFP5$_IFP6$_INP$_SSSS!_INP$_SSSSNN!_LEFT$_SN!_LTRIM$_S!_MID$_SNN!_RIGHT$_SN!_RTRIM$_S!_S10_STR1$_S11_DATA2UPDATE$_S11_LOGFILENAME$_S12_TOTALFILENAME$_S14_LINE1$_S1_LINE1$_S21_FILE2REQUEST$_S38_KBRD$_S39_FIELD.NAME$_S39_FIELD2FIND$_S41_VALUE$_S43_NEEDEDDATE$_S45_MS1$_S45_MS2$_S47_T.MYID$_S47_T.SECURE$_S47_TMPSECURE$_S48_SHOWMESS$_S49_SPLASH1$_S49_SPLASH2$_S49_SPLASH3$_S49_SPLASH4$_S49_SPLASH5$_S49_SPLASH6$_S49_SPLASH7$_S49_WAIT.MODE$_S52_CHAR1$_S52_CHAR2$_S52_CHAR3$_S52_CHAR4$_S52_CHAR5$_S52_CHAR6$_S52_CHECK.CODE$_S52_CODE1$_S52_CODE2$_S52_CODE3$_S52_CODE4$_S52_CODE5$_S52_CODE6$_S52_FINAL.CODE$_S52_INP.PROMPT$_S52_LINE1$_S52_OLD.REGISTRATION.FIRM$_S52_OLD.REGISTRATION.NAME$_S52_REGISTRATION.CODE$_S52_REGISTRATION.FIRM$_S52_REGISTRATION.NAME$_S53_LEN.BEFORE.POINT1$_S54_LEN.BEFORE.POINT1$_S55_FILE.NAME2PRINT$_S56_CURRENTDATE$_S56_F.DATE.INST$_S56_LINE1$_S56_REGFILE$_S56_T.DATE.INST$_S57_STRING2PRINT$_S58_TEXT.ALIGN$_S58_TEXT.TEXT$_S5_CURRENTDATE$_S5_CURRENTTIME$_S5_LINE1$_S5_STR1$_S60_INIT.STRING$_S60_PORT.BAUD.RATE$_S62_SHOW.TEXT$_S63_FILE.NAME2SEND$_S63_SHOW.TEXT$_S63_STR1$_S63_TAG.DATA.STR$_S63_TAG.FILE.STR$_S63_TAG.FMOD.STR$_S63_TAG.PRGR.STR$_S63_TAG.TMOD.STR$_S64_CODE2REQUEST$_S64_FILE.NAME2REQUEST$_S64_SHOW.TEXT$_S64_STR1$_S64_TAG.FILE.STR$_S64_TAG.NUMB.STR$_S64_TAG.RCRD.STR$_S64_TAG.TMOD.STR$_S65_SEND2PC$_S68_CURRENTDATE$_S68_NUMBER2REQUEST$_S68_STR1$_S68_STR2$_S68_STR3$_S69_MIN$_S69_READMODE$_S69_SEC$_S69_SHOW.TEXT$_S6_LINE1$_S71_DATALEN$_S71_PROTOCOL.MODEL$_S71_RECORD.MODE.STR$_S71_STR1PR$_S71_TAG.DATA.STR$_S71_TAG.FILE.STR$_S71_TAG.TMOD.STR$_S75_FILE1$_S76_BLINKDASH$_S76_CURRENT.SUB$_S76_LINE1$_S76_RECALL.TRIGGER.MODE$_S76_RECALLMODE$_S76_TEXT.BUFFER$_S77_KEYSTR1$_S77_KEYSTR2$_S77_LINE1$_S77_LOGFILENAME$_S77_STR1$_S77_TAG.TMOD.STR$_S77_TTLFILENAME$_S79_FIELD.CHAR$_S79_STRING2FIND$_S79_STRING2FIND.S$_S79_T.FIELD$_S7_TOTALFILENAME$_S8_LINE1$_S8_STR1$_S9_TOL.STR1$_SPACE$_N!_STR$_N!_STRING$_NS!_TIME$_!_VERSION$_N! ‚ ‚ ‚‚ /‚>‚ O‚[‚^‚ a‚$ i‚(s‚, ‹‚0 ˜‚4 £‚8 ¯‚<º‚@½‚D À‚HÊ‚L΂PÑ‚TÓ‚XÚ‚\â‚`æ‚dê‚hï‚lõ‚p ü‚€ ‚„ ‚ˆ ‚Œ %‚ 1‚” =‚˜ J‚œ V‚ b‚¤j‚¨q‚¬ x‚°…‚´“‚¸¢‚¼±‚ÀÀ‚ÄÏ‚ÈÞ‚Ìí‚Ðû‚Ô ‚Ø‚Ü%‚à3‚äA‚èO‚ì ]‚ð j‚ô v‚ø‚‚ü Š‚“‚–‚ ™‚ ¢‚¨‚«‚®‚ ½‚ Ê‚$Ø‚( Ü‚,è‚0 ï‚4 ü‚8 ‚< ‚@ ‚D  ‚H+‚L 0‚P =‚TH‚XV‚\d‚`r‚d€‚h Ž‚l š‚p ¦‚t ²‚x ¾‚|Ë‚€Ђ„Ö‚ˆ ê‚Œô‚‚” ‚˜ !‚œ-‚  4‚¤ ?‚¨ J‚¬ V‚° b‚´ n‚¸ z‚¼ †‚À ’‚Ä ‚È ¨‚Ì ³‚Ð ¾‚Ô É‚Ø Ô‚Ü ß‚àê‚ä ò‚è û‚ì‚ð ‚ô  ‚ø‚ü ‚ &‚ /‚ 8‚ D‚O‚W‚ _‚j‚ |‚$ Ž‚( š‚, ¦‚0±‚4 ¸‚8Ä‚< ׂ@à‚Dð‚H ‚L ‚P ‚T(‚X6‚\9‚`>‚dE‚h L‚l W‚p c‚tl‚xs‚|y‚€ ‚„ ˆ‚ˆ “‚Œ ž‚ÿÿÿô §‚ÿÿÿü °‚ÿÿÿø ½‚È‚ÿÿÿü Ø‚ÿÿÿø á‚ÿÿÿðë‚ÿÿÿÌü‚”‚ÿÿÿÈ$‚ÿÿÿÄ 3‚˜<‚ÿÿÿôA‚ÿÿÿèF‚ÿÿÿÜK‚ÿÿÿÐP‚ÿÿÿÄU‚ÿÿÿ¸ Z‚œ f‚  p‚¤ {‚¨‡‚¬Ž‚°•‚´œ‚¸ £‚¼­‚À ´‚Ä¿‚ÿÿÿüÑ‚ÿÿÿäà‚ÿÿÿð ï‚ÿÿÿè ú‚ÿÿÿü ‚ÿÿÿø‚ÿÿÿü‚ÿÿÿü %‚ÿÿÿü 1‚È :‚ÿÿÿü F‚ÌO‚ÿÿÿøV‚ÿÿÿü [‚ÿÿÿü g‚ÿÿÿü s‚Ð |‚ÿÿÿü ˆ‚Ô ‘‚ÿÿÿü ‚ئ‚ÿÿÿô¶‚ÿÿÿüÄ‚ÿÿÿø Ó‚ÿÿÿð ß‚ÿÿÿüë‚ÿÿÿà ù‚ÿÿÿÜ ‚ÿÿÿü ‚ÿÿÿð ‚ÿÿÿì *‚ÿÿÿè 5‚ÿÿÿð ?‚ÿÿÿà I‚ÿÿÿü W‚ÿÿÿÐ f‚ÿÿÿà r‚ÿÿÿä }‚ÿÿÿè Œ‚ÿÿÿì ™‚ÿÿÿü £‚ÿÿÿœ ©‚ÿÿÿü °‚ÿÿÿø ·‚ÿÿÿü ‚ÿÿÿ€ Ђÿÿÿì Ü‚ÿÿÿü è‚ÿÿÿ„ ò‚ÿÿÿ  ø‚ÿÿÿü ÿ‚ÿÿÿü ‚ÿÿÿð ‚ÿÿÿì /‚ÿÿÿè <‚ÿÿÿÈ L‚ÿÿÿü ]‚ÿÿÿÄ l‚ÿÿÿØ |‚ÿÿÿÔ ‰‚ÿÿÿÐ –‚ÿÿÿì ¤‚ÿÿÿè ²‚ÿÿÿ𠽂ÿÿÿØ Ä‚ÿÿÿÐ Õ‚ÿÿÿÔ æ‚ÿÿÿü ô‚ÿÿÿð ‚ÿÿÿä ‚ÿÿÿØ %‚ÿÿÿð 2‚ÿÿÿø# L‚ÿÿÿü o‚ÿÿÿü ‚‚ÿÿÿð •‚ÿÿÿè ¡‚ÿÿÿì ´‚ÿÿÿÜ Ë‚ÿÿÿä æ‚ÿÿÿà þ‚ÿÿÿØ ‚ÿÿÿü ‚ÿÿÿä -‚ÿÿÿü <‚ÿÿÿð G‚ÿÿÿ° W‚ÿÿÿ¨ e‚ÿÿÿ¤ t‚ÿÿÿ˜ ‚ÿÿÿœ ‘‚ÿÿÿü ‚ÿÿÿÔ ®‚ÿÿÿ¬ ¼‚ÿÿÿ„ Âÿÿÿ¸ Ò‚ÿÿÿ´ á‚ÿÿÿ  é‚ÿÿÿˆ ó‚ÿÿÿð ‚ÿÿÿÔ ‚ÿÿÿÜ (‚ÿÿÿü 4‚ÿÿÿØ C‚ÿÿÿÈ R‚ÿÿÿà `‚ÿÿÿÄ g‚ÿÿÿð m‚ÿÿÿè ‚ÿÿÿì Ž‚ÿÿÿð  ‚ÿÿÿä ¦‚ÿÿÿø º‚ÿÿÿü Ç‚ÿÿÿô Í‚ÿÿÿä Ö‚ÿÿÿà ß‚Ü ê‚à ð‚ä ø‚è ü‚ìƒðƒüƒ ƒÿÿÿô'ƒ;ƒ ?ƒ,Cƒ8GƒDKƒPOƒ\ Tƒh]ƒteƒ€sƒŒƒƒ˜ Šƒ¤ •ƒ°  ƒ¼ ªƒÈ ·ƒÔÃàуì߃øîƒöƒƒƒ( $ƒ41ƒ@BƒLTƒX eƒd pƒp|ƒ|ƒˆ ¢ƒ” ¯ƒ ¼ƒ¬Ã¸ÓƒÄáƒÐ ñƒÜ ýƒè  ƒôƒ'ƒ 6ƒFƒ$ Uƒ0bƒ<rƒHƒT’ƒ`¦ƒl ¹ƒxƃ„փ僜󃨃´ƒÀ+ƒÌ 3ƒØ <ƒä Eƒð Nƒü Wƒ `ƒ iƒ rƒ, {ƒ8 „ƒDƒP •ƒ\ žƒh §ƒt °ƒ€ ¹ƒŒ ƒ˜ ˃¤ Ôƒ° ݃¼ æƒÈïƒÔ ÷ƒà ƒì  ƒø ƒ ƒ $ƒ -ƒ( 6ƒ4 ?ƒ@ HƒLQƒX Yƒd bƒp kƒ| tƒˆ }ƒ” †ƒ  ƒ¬ ˜ƒ¸ ¡ƒÄ ªƒÐ³ƒÜ »ƒèăỗÔƒ ܃äƒ$òƒ0úƒ< ƒH ƒT *ƒ`5ƒlGƒxXƒ„iƒwƒœ‹ƒ¨ ¡ƒ´®ƒÀ ¾ƒÌ ʃØ ÔƒäÞƒðìƒüûƒ   ƒ ƒ ƒ , &ƒ 8/ƒ D7ƒ PGƒ `Xƒÿÿÿè^ƒ ldƒ xhƒ „wƒ †ƒ œŠƒ ¨ Žƒ ´ ™ƒ À¢ƒ ̨ƒ دƒ ä ¶ƒ ð ƒ ü˃  Ùƒ  ムðƒ 0ôƒ < ùƒ Hƒ T ƒ `ƒ lƒ x-ƒ „<ƒ Mƒ œXƒ ¨iƒ ´pƒ À~ƒ Ì Žƒ Ø›ƒ 䫃 𺃠üʃ  Ùƒ æƒ öƒ ,ƒ 8ƒ D*ƒ P =ƒ \Jƒ hZƒ tiƒ €}ƒ Œ ‘ƒ ˜ šƒ ¤ £ƒ ° ¬ƒ ¼ µƒ È ¾ƒ Ô ǃ à Ѓ ì Ùƒ ø ⃠ ëƒ  ôƒ  ýƒ ( ƒ 4ƒ @ ƒ L 0ƒ X <ƒ dFƒ pTƒ |cƒ ˆrƒ ”ƒ   ’ƒ ¬›ƒ ¸£ƒ Ä «ƒÿÿÿ赃 Ð ƃÿÿÿÜÓƒ Üæƒÿÿÿôùƒÿÿÿôƒÿÿÿèƒ è)ƒÿÿÿô 8ƒÿÿÿÐAƒÿÿÿÜRƒÿÿÿè cƒ ôlƒÿÿÿôrƒÿÿÿèxƒÿÿÿÜ~ƒÿÿÿЄƒÿÿÿÄŠƒÿÿÿ¸ ƒ ›ƒ ¨ƒ  ²ƒ $ ¼ƒ 0 ƃ < у H Ûƒÿÿÿðåƒÿÿÿôöƒÿÿÿèƒÿÿÿô ƒÿÿÿì %ƒÿÿÿì/ƒÿÿÿð AƒÿÿÿôKƒÿÿÿä[ƒÿÿÿð kƒÿÿÿôvƒÿÿÿô †ƒÿÿÿô ƒÿÿÿä ˜ƒÿÿÿ褃ÿÿÿô²ƒÿÿÿÔÁƒÿÿÿð σÿÿÿè ܃ÿÿÿÜ éƒÿÿÿÐ öƒÿÿÿÄ ƒÿÿÿ¸ ƒÿÿÿ¬ ƒÿÿÿ *ƒÿÿÿô 9ƒÿÿÿ” Dƒÿÿÿˆ Oƒÿÿÿt Zƒÿÿÿh eƒÿÿÿ\ pƒÿÿÿP{ƒÿÿÿ¤ ‹ƒÿÿÿD –ƒÿÿÿ8 ¡ƒÿÿÿ, ¬ƒÿÿÿ ·ƒÿÿÿ ƒÿÿÿ̓ÿÿþü݃ÿÿÿð íƒÿÿþðøƒÿÿÿ°ƒÿÿÿ¼.ƒÿÿÿÈEƒÿÿÿÔ\ƒÿÿÿàsƒÿÿÿðŠƒÿÿÿð¡ƒÿÿÿô¶ƒÿÿÿØǃÿÿÿä ؃ÿÿÿ¸ ãƒÿÿÿððƒÿÿÿ̃ÿÿÿôƒÿÿÿÜ#ƒÿÿÿô2ƒÿÿÿôBƒÿÿÿè RƒÿÿÿÄ \ƒÿÿÿÜeƒÿÿÿävƒÿÿÿðŠƒÿÿÿô™ƒÿÿÿô­ƒÿÿÿè ¼ƒÿÿÿœƃÿÿÿ´؃ÿÿÿÌêƒÿÿÿÀüƒÿÿÿ¨ƒÿÿÿØ ƒÿÿÿè2ƒÿÿÿôIƒÿÿÿÜ XƒÿÿÿœbƒÿÿÿÀtƒÿÿÿ¨†ƒÿÿÿ´˜ƒÿÿÿÌ ªƒÿÿÿô·ƒÿÿÿÜȃÿÿÿô ܃ÿÿÿÐ æƒÿÿÿÄ ðƒÿÿÿ¸ úƒÿÿÿ̃ÿÿÿô ƒÿÿÿÀƒÿÿÿè )ƒÿÿÿô 3ƒÿÿÿÀ@ƒÿÿÿôTƒÿÿÿ¨ iƒÿÿÿèuƒÿÿÿ´‡ƒÿÿÿÌ™ƒÿÿÿØ «ƒÿÿÿô¶ƒÿÿÿ¼ŃÿÿÿØ ÖƒÿÿÿŒáƒÿÿÿäúƒÿÿÿð ƒÿÿÿÈ ƒÿÿÿä (ƒÿÿÿÈ 5ƒÿÿÿ¤@ƒÿÿÿô Qƒÿÿÿ°[ƒÿÿÿ¼mƒÿÿÿØ~ƒÿÿÿ䎃ÿÿÿðŸƒÿÿÿÌ ²ƒÿÿÿ¸¿ƒÿÿÿô уÿÿÿô ÛƒÿÿÿØ äƒÿÿÿè ñƒ Tûƒ ` ƒ l ƒ x ƒ „APPLICATION.ERRORÑâCHECK.FILE.DETAILSDEC2STRDIGIT2FORMAT$READBUFFER.NET$TEXT2TAG.NET$A1{Ê =2&êã 5ëÐACCEPT.ACTUAL.WEIGHTANALYZE.BUFFER.NETBATCHCHECK.DEMOCHECK.IF.BATCH.DONECHECK.INPUTSCHECKMESSAGESTRINGCHECKREGISTRATIONCHECKWEIGHTFORMAT.OLDCHECKWEIGHTFORMATCLEAR.NETWORK.BUFFERCLOSEFILECLOSEREMOTE.NETCOMMON.KEYSCOPYRIGHTCREATE.BPLAN.788DATE.TIME.SYNCRONIZINGDATE2DAYSDEBUGDELAY.RESETDELAYEMPTYVRBLFILEENTER.DEALER.DETAILSFINDBYNAMEFLD2VRBLFILEFMENU10FMENU11FMENU12FMENU13FMENU14FMENU1FMENU2FMENU3FMENU4FMENU5FMENU6FMENU7FMENU8FMENU9GET.RECIPE.TOTALSGLOBAL.SEARCHKILLFILELOAD.BPLAN.PCMAINSCREENOPENFILEOPENREMOTE.NETPRINT.FILEPRINT.LINEREAD.PACKET.REPLYREAD.PLATFORM.TYPEREAD.SERVER.DATARECALL.MENUREGISTRATIONREMOTEPCREQUEST.FILE.NETSECURITYSEND.FILE.NETSEND.LOGS.AND.TOTALSSEND.LOGSEND.PACKET.REPLYSEND.TOTALSEND2PC.NETSETTIMEDATESHOW.NET.ERRORSHOW.PROCESS.SCREENSHOWMESSAGESHOWWEIGHTRANGESHOW_MESSAGESPLASHSCREENSTANDARD.RECALLTARE.SCALESUPDATE.LOGUPDATE.TOTALUPDATE.WEIGHTVRBL2FLDFILEWAIT.FOR.OKWAITFORUSERWEIGHT.OVER.TOLERANCEWRITE.PLATFORM.TYPE`Ù‘&&† +ɳ5"Œ H|_T  f®wÃŒ¿²î¿ ±‡ºÙk É•Ï Ô­áÝ;:íò™ ž> ÏU Ÿ8° !~,.™Æ B— L‰½X”ý_•'f•Qm•{t•¥{“ƒ“­‡“×”“”+™”UŸ”¥”©«”Ó±> Â=χõ × ç äî!öØ ƶ ϤY) ;úç K.Û V°bÔêjèPz¡V ‚à < £$ê«á ¼%¸ Æìw Ñ›Üð¦êA ýŸ¿n‚ ¥E #¦$/ˆ >z£ If Sg› _k¢ lŒù x ] ƒ}dŽMø£ ¼ ‚­ ¼ ƒ ¼ = ¼ =‚­ ¼ D‚­ ¼ ‚­ ¼  ¼ ‚­ ¼ ¼ ¼ I‚­ ¼ Mƒ ¼?‚­‚® ¼ Gƒ ¼ +‚­ ¼04ƒƒƒƒ ¼'H4ƒƒƒƒ‚±‚² ¼'H3ƒƒ‚¯‚°‚±‚² ¼ƒƒ ¼ , ¼ ,‚­ ¼ ‚­ ¼ƒ‚® ¼ ƒ ¼ ‚­ ¼ ‚­ ¼ 5ƒ ¼$ƒ‚®‚¯ ¼ -‚­ ¼ .‚­ ¼ /‚­ ¼ƒ‚® ¼ 6ƒ ¼ F‚­ ¼ ‚­ ¼ ‚­ ¼!‚­ƒ ¼ $ ¼ % ¼ &ƒ ¼ 7‚­ –—˜&™4šG Z m›{œŽœžªŸ½ Ðè¬û 0³\´ˆµ ¶®·Á!Ô¸ì¹ÿº"%#8»U¼h½{$Ž%¦3¹ŸÌ ß¡ò¢ 57&£9€™ €™ €™ €™ €™ €™old comments below €™&CODE GENERATED BY 778FILECODEGENERATOR €™SOURCE FILE: c:\778_LIB\RS.INI € ™DATE: 15.11.2001 9:57:35 € ™BETA10: € ™KG TO 'G' FOR SCALE 2; € ™#SCL1 SWAP WITH INGR-CODE ON SCREEN; € ™SCL2 - CHECK 5TH DIGIT; €™SHOW 'OC' ON A BATCH SCREEN; €™ 'NEXT' -> 'N' €™778 BATCH SCREEN - SHOW 'MO' €™REMOVE 'N:', REMOVE 'D:' €™BETA 11: €™FASTER REMOTE BUTTON REACTION; €™0MAINSCREEN,REMOTE ZERO FOR ALL SCALES - INPUT 3; €™V SAMOM NA4ALE: €æ¡Ï›: €™SECTION COMMON €™FILE INGRDTS.DAT €àƒ^ƒGƒ© €àƒ߃Ù‚Š €™FILE RECIPE.DAT €àƒXƒ\ƒ[ƒZƒY €àƒÝ‚‡‚†‚…‚„ €™FILE RLIST.DAT € àƒoƒiƒdƒlƒQƒR €!àƒíƒçƒâƒê €"™FILE BPLAN788.DAT €#àƒpƒjƒeƒmƒIƒg €$àƒîƒèƒãƒë‚}ƒå €%à ƒK‚€ €&™FILE BPLANPC.DAT €'àƒqƒkƒfƒnƒJƒh €(àƒïƒéƒäƒì‚~ƒæ €)à ƒL‚ €+à$‚g‚n‚o‚p‚q‚r‚s €,à)‚t‚u‚h‚i‚j‚k‚l‚m €-à‚) €.à$‚*‚1‚2‚3‚4‚5‚6 €/à)‚7‚8‚+‚,‚-‚.‚/‚0 €1à3ƒvƒƒŒƒ—ƒ¢ƒ¤ƒ¥ƒ¦ƒ§ƒw €2à3ƒxƒyƒzƒ{ƒ|ƒ}ƒ~ƒƒ€ƒ‚ €3à3ƒƒƒ„ƒ…ƒ†ƒ‡ƒˆƒ‰ƒŠƒ‹ƒ €4à3ƒŽƒƒƒ‘ƒ’ƒ“ƒ”ƒ•ƒ–ƒ˜ €5à3ƒ™ƒšƒ›ƒœƒƒžƒŸƒ ƒ¡ƒ£ €7™COMMON ISREGISTERED €8™0COMMON F.REGISTRATION.NAME$,F.REGISTRATION.FIRM$ €9™0COMMON T.REGISTRATION.NAME$,T.REGISTRATION.FIRM$ €:à ƒ]‚ˆ €;à‚ €=™REGISTRATION!!!!!!!! €>àƒtƒsƒNƒO €?àƒñƒðƒÚƒÛ €@à ‚%‚ €B™5COMMON SECTION FOR DATA BACK UP CODE **************** €Càƒ¼‚Qƒr €Dà‚ €Eà ‚_ƒu €Fà‚‚y‚ ‚ €Gà=ƒÔƒAƒ8ƒȃ=ƒ:ƒŃă?ƒ>ƒɃ@ €Hà ‚‚^ €IàƒSƒ‚ €Jàƒ< €KàƒƃÇ‚‚< €Là‚I €Màƒƒƒ €Nà‚ €Oà ‚#‚c €Pà‚ƒÕƒB €Qà‚P‚Ž‚‚‚‘ €Rà‚R €Sàƒ €Tà‚& €UàƒDƒׂ €V™232 / 485 SWITCH €Wà)ƒb‚‰ƒH‚{ƒÖƒCƒ؃E €Xàƒc €Y™>EVENTS FOR REMOTE: 1 - TARE, 2 - NEXT, 3 - ZERO ON MAINSCREEN; €Zà‚ ‚!‚"‚ €[àƒTƒ¸ƒ·ƒÐ €\™ €]àƒW €^à‚ €_à ‚“‚J €`à ‚‚‚ƒ €aàƒÀƒ¿ƒ½‚Œ €bà‚ €d™CONVERTION NEW VARIABLES €eàQ‚ƒË‚v‚w‚xƒ̃̓΂>‚B‚‚‚?‚C‚‚ €fàƒ‚z‚’ƒ ‚F €gà)‚D‚'ƒ‚(‚H‚Eƒ‚A €hà‚G €i™*************REG ID €jà‚] €kŸƒÁ,„B €là ƒÁ„B €mŸ‚,„A €nà ‚„A €o™REMOTE BUTTONS €p™ACCEPT = REMOTE 1 €q™TARE = REMOTE 2 €s“‚]„BÒ €t™******************** €u™LOAD SOME DEFAULTS €vë„DE €w“‚„@€ €x“‚„@€ €y“‚„@@ €z„,„,„CŸ€,„Co €{™ LOCATE 0,0 €|™ABC$ = DIGIT2FORMAT$(15.15,8) €}™PRINT ABC$;" ";LEN(ABC$) €~™STOP €™END €€™ €“ƒÔ‹ „@;; €‚“ƒA‹ „@@;; €ƒ“ƒ8‹ „@À;; €„“ƒÈ‹ „A¨;; €…“ƒ=‹ „@ ;; €†“ƒ:‹ „@à;; €‡“ƒÅ‹ „A;; €ˆ“ƒÄ‹ „AP;;‹ „A ;;+ €‰“ƒ?‹ „AÈ;; €Š“ƒ>‹ „AÐ;; €‹“ƒÉ‹ „Aà;; €Œ“ƒ@‹ „AØ;; €“ƒÕ‹ „@€;; €Ž“ƒB‹ „A;; €“‚^„?€ €“‚„A €‘“‚„A €’™ NEW VAR **** €““‚v„¿€ €”“‚w„¿€ €•“‚x„¿€ €–“ƒÌ…# €—“ƒÍ…# €˜“ƒÎ…# €™“ƒ;… €š™ ******************************** €›™CHECK COUNT OF SCALE CARDS €œ“‚cŠš„A`;; €“‚#Šš„A;; €ž™IF SCALES.COUNT < 2 THEN €Ÿ™ LOCATE 0,0 € ™ PRINT "TWO SCALE CARDS NEEDED!" €¡™ STOP €¢™ END €£™END IF €¤”Šš„A;;„=•y €¥“‚„BÊ €¦‘„,„ €§’…¬ €¨£Œß„@@;, €©™RESET BUTTON FLAG TO LOCAL 788! €ª“ƒØ…B €«– €¬“ƒØ…I €­— €®™ ******************************** €¯™MAIN THINGS FIRST: €°™ CHECK REG €²£œô; €´£®; €µ£”……#;, €¶™ €·™CALL LOAD.SETUP("L") €¸£ùK; €¹™ €º“ƒÀ…# €»“ƒ¿…# €¼™ €½£; €¾ä €¿ €Â¤g+;‚˂ʃ+ €Ãà ‚f‚ €Äà‚d €Åà$‚K‚L‚M‚N‚=‚O‚ €Æà ‚‚ €Ç“‚‚„>™™š €È™ EVENT2 = 0 €É™PLACE2 FOR DIRECT CONNECT €Ê“ƒ¾‹£(„@;; €Ë”Š´ƒ¾,…ß;;„?• “ƒ¾…ß €Ì”ƒ¾…ß=•ž €Í™*CLEAR FILES FROM LAST NOT FINISHED SESSION €Î”Š¸‹ …c;;;;„>•Ë…c €Ï”Š¸‹ …b;;;;„>•Ë…b €Ð–b €Ñ“ƒ¾‹£(„@@;; €Ò”ƒ¾…L?•- €Ó €Ô‘„,„ €Õ’…³ €Öä €× €Ø— €Ù— €Ú™ ******************************** €Û™HARDWARE$ = "788" €Ü™ ******************************** €Ý“‚`„@à €Þ™OPEN NETWORK PORT €ß“‚a„D €à£Ã„@;, €á“‚ „@  €â™ DATE TIME €ã“‚d„¿€ €ä£Ýo; €å™ -------------------------------- €æ„,„,„CŸ€,„Co €ç»„ €èµ„,„CY,„CŸ€,„CY €é“‚<„ €ë™ €ì“ƒØ…I €í”ƒØ…F=ƒØ…I=|•à €î”Šž „@;;~•À €ï”Šš„A;;„>•› €ð™ EVENT FOR FASTER BUTTON REACTION €ñ›N‚Ë„?€œ‚6„A‚4„?€ €ò“‚‚Ë;„ €óžÿÿÿã‚Ë‚6‚4 €ôÝ„@,T„>LÌÍ£e±; €õ— €ö— €÷— €ù¬ €ú”ƒá…L=• “‚„@€ €û”ƒá…½=• “‚„@  €ý™T.788.ID$ = "1" €þ™ WORKSTATION.NAME$ = "INDICATOR1" €ÿ™&&&&&&&&&&&&&&&&&&&&&&&&&&&&& €£²@; €¬ €™1CALL DEBUG("CALL STANDARD.RECALL(FILE2VIEW,'R')") €£øÌ‚,…Å;‚, €”‚<„?•° €­ÿÿÿ‡ €»„ €„,„,„CŸ€,„Co €”‚<„?€]‚<„@ [&‚R„>&•$ € ™FILE 5 € ™ € £h¼‚;‚ € Ä#‚,‚R € £q3‚;‚ €£nÿ‚;‚ €“‚‚ €“‚‚R €”‚„@€=• “‚|‚} €”‚„@ =• “‚|‚~ €”‚„@€=• “‚‚€ €”‚„@ =• “‚‚ €”‚|‚]• €“‚O„ €£ ; €”‚O•í €“‚O„ €›N‚Ê„?€œ‚6„B‚4„?€ €“ƒÁ‚Ê;…# €žÿÿÿã‚Ê‚6‚4 €™SEND AND FLASH TTL AND LOG €“‚@„ €„,„,„CŸ€,„Co € ™ €!™#CALL CHECK.IF.BATCH.DONE(FILE2VIEW) €"— €#–æ €$„,„,„CŸ€,„Co €%”‚|„?€>•-“ƒ+…W‹"‹ #‚|;;;;+…+ €&”‚|„?€=•-“ƒ+…W‹"‹ #‚|;;;;+…+ €'£´ƒ+,„BÈ,„@ ,„?€,…e;ƒ+,,,, €(£‚]„@@;, €)— €*˜픂<„@À=•) €+“‚<„ €,“‚U„ €-£;; €.“‚<„ €/”‚U„>•Ô €0“‚„@€ €1ì„?€ €2“‚=Š³…¤,…°,‚=,„?€,„?€,„BÆ;; €3™RECIPE SELECTED FOR 788 PLAN €4™'ADD TO 788 BATCH PLAN AND START PROCESS €5™ €7”‚„=‚=„>&•ÿ €9£dƒ„@@;, €:™0STR1$ = "RECORDFOUND.R3:" + STR$(RECORDFOUND.R3) €;™CALL DEBUG(STR1$) €<Ä#„@@,‚U €=£l«„@@;, €>£j{„@@;, €?™CLEAR FILE #4 AND HIS RECIPE €@£cÊ„@€;, €A“‚MŠº„@€;;‚3/ €B£j„@€;, €C”‚M„>•` €D£cu„@€;, €EÄ#„@€,„?€ €F£kð„@€;, €G£iÀ„@€;, €H£j„@€;, €I˃ë €J— €K£c„@€;, €Lǃp‹Ÿ"„AÈ;; €Mǃe‹Ÿ"„@À;; €Nǃm‹Ÿ"„A@;; €OǃI‹Ÿ"„@@;; €Pǃpƒí €Qǃeƒâ €Rǃmƒê €SǃI‹"‹ #‚=;;;; €Tǃg‹Ÿ"„@ ;; €Uǃg‹#‹ ;;,„@€,„@;;…8+‹!‹ ;;,„@;;+ €VǃK… €WÅ#„@€,„?€ €X£h>„@€;, €Y™RE-OPEN FILE TO READ ALL T. €Z£aŽ„@€;, €[Ä#„@€,„?€ €\£j „@€;, €]£gÙ„@€;, €^“‚„@€ €_“‚„?€ €`“‚|‚} €a“‚‚€ €b™ €c“‚O„ €d›N‚Ê„?€œ‚6„B‚4„?€ €e“ƒÁ‚Ê;…# €fžÿÿÿã‚Ê‚6‚4 €g™ €h™LOAD T.RECIPEFILENAME$!!! €i£Ç§ƒê,…#,…û;ƒê,, €j”‚@„=•£Çt…—,…#,…û;,,, €k”‚@„=•‰ €l£w; €m”‚O•k €n“‚O„ €o“‚@„ €p„,„,„CŸ€,„Co €q™#CALL CHECK.IF.BATCH.DONE(FILE2VIEW) €r— €s— €u— €w— €x˜³”‚<„@à=• €y˜™”‚<„A=• €z˜”‚<„A=• €{˜e”‚<„@ =• €|˜K”‚<„A =• €}˜1”‚<„A`=• €~˜”‚<„Ap=• €— €€­ÿÿôe €£·; €‚»„ €ƒ €„ä €… €†¥ÿÿï¢ €‰¤V‚Ô;‚Õ‚Ó‚Ö €Š£^j‚Ô;‚Ô €‹“‚ÕŠº‚Ô;;‚)/ €Œ“‚Ó„ €£d£‚Ô;‚Ô €Ž”‚Õ„>•à €£]þ‚Ô;‚Ô €›Â‚Ö„?€œ‚6‚Õ‚4„?€ €‘Ä#‚Ô,‚Ö €’£fL‚Ô;‚Ô €“”‚Ô„@€=‚}‚€<&•“‚Ó‚Ó„?€+ €””‚Ô„@ =‚~‚<&•“‚Ó‚Ó„?€+ €•žÿÿÿo‚Ö‚6‚4 €–£cœ‚Ô;‚Ô €—”‚Ó‚Õ=•· €˜£\÷‚Ô;‚Ô €™›n‚Ö„?€œ‚6‚Õ‚4„?€ €šÄ#‚Ô,‚Ö €›£eE‚Ô;‚Ô €œ£ci„@;, €žÿÿÿÂւ6‚4 €ž£bé‚Ô;‚Ô €Ÿ£c-‚Ô;‚Ô € — €¡— €¢¥ÿÿý³ €¥¤Æ:; €¦”‚@„=•ž €§“ƒ½…”‹"‹% ƒÖ;;;;+…<+ €¨£ºÙƒ½,…û;ƒ½, €©”‚@„=•(Ë…”‹"‹% ƒÖ;;;;+…<+ €ª£x„?€;, €«— €¬¥ÿÿÿC €¯¤Æ<; €°”‚@„=•ž €±“ƒ½…”‹"‹% ƒÖ;;;;+…>+ €²£º ƒ½,…û;ƒ½, €³”‚@„=•(Ë…”‹"‹% ƒÖ;;;;+…>+ €´£wC„?€;, €µ— €¶¥ÿÿÿC €º¤}<;ƒ`ƒaƒc‚þ‚‚ÿƒb €»à ‚|‚ €¼™_*********************************************************************************************** €½™/BATCH PLAN ALREADY SELECTED IN T.PLATFORM.TYPE$ €¾™WE HAVE: €¿™,SHOW SELECTED RECIPE, PROCESS ONE INGREDIENT €À™6WHEN ALL DONE - UPDATE INFORMATION AND RETURN TO BATCH €„,„,„CŸ€,„Co €ô„,„,„CŸ€,„Co,„ €Ä“‚<„ €Æ™ €Ç“ƒ`‹#‹ ;;,„@€,„@;;…8+‹#‹ ;;,„?€,„@;;+…8+‹#‹ ;;,„@à,„@€;;+ €È“ƒa‹!‹¢%;;,„@ ;; €É“ƒc… €Ê£=ƒc;ƒc €Ë“ƒcƒ`…+ƒa+ €Ì£<Òƒc;ƒc €Í™ €Γƒc…Öƒá+…+ €Ï£<šƒc;ƒc €Ñ™#INGR.DONE.ARRAY$(32) TO SHOW "DONE" €Ò›N‚þ„?€œ‚6„B‚4„?€ €Ó“ƒÁ‚þ;…# €Ôžÿÿÿã‚þ‚6‚4 €Õ™#*********************************** €׬ €Ø™ €Ú™ IF T.PLATFORM.TYPE$ = "788" THEN €Û™END IF €Ü”ƒá…½=•³ €Ý™IF THIS IS PC BATCH PLAN €Þ™+JUST COPY ALL VARIABLES OF 'PC' TO'788' !!! €ß™CALL FLD2VRBLFILE(5) €à“ƒîƒï €ᓃãƒä €Ⓝëƒì €ã“‚}‚~ €ä— €æ¬ €甂|„[•° €蓃c…ʃã+…+ƒî+ €é£:ˆƒc;ƒc €꓃c…£‹"‹ #‚;;;;+…+‹"‹ #‚|;;;;+ €ë£:'ƒc;ƒc €ì™ €퓃c…– €î£9ûƒc;ƒc €c…9 €ð£9؃c;ƒc €ñ™ €ò“‚„ €ó“‚ÿ„ €ô¬ €õ„,„,„CŸ€,„Co €ö»„ €÷™%CALL DEBUG("CALL STANDARD.RECALL(2,") €ø£ãÊ„@,…Å;,, €ù™RECIPE.DONE, MAINMENU=0 €ú”‚<„?€]‚<„@ [&‚T„>&• €û”ƒÁ‚T;…x?•j €ü£Sä„@;, €ý“‚KŠº„@;;‚1/ €þÄ#„@,‚T €ÿ£\?„@;, €£Z„@;, €– €„,„,„CŸ€,„Co €“ƒb…X €£¡Òƒb,„BÈ,„@ ,„?€,…e;ƒb,,,, €£o®„@@;, €™EXIT DO €— €˜q”‚<„@à=•_ € “ƒc‹Ÿ"„BP;;‹!‹¢%;;,„@ ;;+…+ € £7„ƒc;ƒc € °f € — €™VSTART AND FINISH ONE INGREDIENT ****************************************************** €”‚O~•* €”ƒÁ‚T;…x?•£î; €– €°¿ €— €™'POSSIBLE RESULTS HERE AFTER THIS SCREEN €™ACCEPT - MAINMENU=6 €™BACK - MAINMENU=8 €™QUIT - MAINMENU=9 €”‚<„A=•Ê €„,„,„CŸ€,„Co €“ƒb…g €£Ÿ™ƒb,„BÈ,„@ ,„?€,…e;ƒb,,,, €£mu„@@;, €“ƒc‹Ÿ"„BP;;‹!‹¢%;;,„@ ;;+…+ € £5zƒc;ƒc €!°\ €"— €#”‚<„@À=•8 €$™$MARK ARRAY WITH RECORDFOUND = 'DONE' €%™ CALL DEBUG(STR$(RECORDFOUND.R2)) €&“ƒÁ‚T;…x €'„,„,„CŸ€,„Co €(™+REM REM CALL PRINT.LINE(T.NAME$,50,5,1,"C") €)™REM REM LINE1$ = "COMPLETED!" €*™+REM REM CALL PRINT.LINE(LINE1$,100,5,1,"C") €+™REM REM CALL DELAY(3) €,— €-­ÿÿúi €/»„ €0„,„,„CŸ€,„Co €2”‚O•‰ €3“ƒb…  €4£`ƒb,„BÈ,„@ ,„?€,…e;ƒb,,,, €5™9CALCULATE TOTAL FOR TARGET AND ACTUAL - FILE LIKE ID1.TTL €6™IT HAS RECCOUNT2 RECORDS €7£ ª; €8™(WE'LL HAVE TARGET.TOTAL AND ACTUAL.TOTAL €9“ƒc‹Ÿ"„Að;; €:“ƒcƒc‹$‹Ÿ"„A;;‹"‹ #‚‹;;;;+,„A;;+…+ €;“ƒcƒc‹$‹Ÿ"„A;;‹"‹ #‚;;;;+,„A;;+…+‹!‹¢%;;,„@ ;;+ €<“ƒcƒc…+ €=£1þƒc;ƒc €?™CALL WAIT.FOR.OK() €@£i}„@;, €B™@UPDATE COUNTERS HERE ******************************************* €C™CALL DEBUG(T.RECIPEDATE788$) €D£Lp‚;‚ €E™#CALL DEBUG(STR$(BATCH.FILE.NUMBER)) €F™#CALL DEBUG(STR$(BATCH.RECORDFOUND)) €GÄ#‚,‚ €H£T‚;‚ €I™CALL DEBUG(T.RECIPEDATE788$) €J”‚„@€=• “‚€‚ €K”‚„@ =• “‚‚ €L£WR‚;‚ €MÅ#‚,‚ €O”‚„@€=•8 €P“‚€‚€„?€+ €Q“‚‚€ €R“‚|‚} €S— €T”‚„@ =•8 €U“‚‚„?€+ €V“‚‚ €W“‚|‚~ €X— €Y£V“‚;‚ €Z™CALL DEBUG(T.RECIPEDATE788$) €[Å#‚,‚ €\£Pí‚;‚ €]™CALL DEBUG(T.RECIPEDATE788$) €_”‚„?€-‚|=•b €`“ƒc‹¡$„BL,…1;;…+‹!‹¢%;;,„@ ;;+…+ €a£.µƒc;ƒc €b— €d£¥; €f™@**************************************************************** €g— €i”‚‚|[• €j»„ €k„,„,„CŸ€,„Co €l™ DSPFONT=4 €m“ƒb…n €n£—Šƒb,„BÈ,„@ ,„?€,…e;ƒb,,,, €o»„@À,…Œ,… €p»„A,…,…ü €q“‚<„ €rµ„,„CY,„CŸ€,„CY €s¬ €t”‚<„?•° €u­ÿÿÿÜ €v»„ €w”‚<„@À=•! €x“‚<„¿€ €y°r €z˜á”‚<„A=•Ï €{™(RESET RECIPE DONE AND ACCORDING ARRAY!!! €|™IF RECIPE IS DONE ONLY! €}”‚O•j €~“‚O„ €›N‚þ„?€œ‚6„B‚4„?€ €€“ƒÁ‚þ;…# €žÿÿÿã‚þ‚6‚4 €‚— €ƒ— €„–w €…™LINE1$ = "RECIPE DONE !" €†™#CALL PRINT.LINE(LINE1$,100,4,1,"C") €‡™CALL WAIT.FOR.OK() €ˆ° €‰— €Š­ÿÿðÍ €Œ”‚<„¿€=•°> €”‚<„@À=•°$ €Ž”‚‚|>•° €­ÿÿïf €‘™_MAIN LOOP ************************************************************************************* €“»„ €””‚<„¿€=•© €•£¼; €–“ƒb…] €—£”<ƒb,„BÈ,„@ ,„?€,…e;ƒb,,,, €˜“ƒc‹Ÿ"„BP;;‹!‹¢%;;,„@ ;;+…+ €™£*-ƒc;ƒc €š£Ît; €›— €œ“‚<„ €¥ÿÿêŒ € ¤ 9;ƒ €¡™SEND LOGS AND TOTALS €¢„,„,„CŸ€,„Co €£“ƒ…¸ €¤£“5ƒ,„Bð,„@ ,„?€,…e;ƒ,,,, €¥£ÿÿèK; €¦„,„,„CŸ€,„Co €§“ƒ…¸ €¨£’Ѓ,„Bð,„@ ,„?€,…e;ƒ,,,, €©£ÿÿè´; €ª„,„,„CŸ€,„Co €«¥ÿÿþî €®¦K$‚¢‚£;‚¡ƒ ƒ €¯™IF INCOMING IS: €°™ 252:252.0000 €±™252.1:252.1000 €²™252.12:252.1200 €³“‚¡Š·‚¢;; €´“ƒ ‹"‹ #Š·‚¢Š·‚¢;;-„F@*;;;;;; €µ“ƒ‹"‹ #‚¡;;;;…:+ƒ + €¶“ƒ ‹$‹Ÿ"‚£;;ƒ+,‚£;; €·§ÿÿþ¾ €º¤‹';ƒ›‚) €»à ‚‹‚ €½“‚‹„ €¾“‚„ €¿“ƒ›…”‹"‹% ƒÖ;;;;+…>+ €ÀÂ…Å,#„A@,ƒ›,„Bh €ÁÆ#„A@,„A ‡ƒ« €ÂÆ#„A@,„A ‡ƒv,„@ ‡ƒ´ €ÃÆ#„A@,„Ap‡ƒ,„@À‡ƒ² €ÄÆ#„A@,„A¨‡ƒŒ,„@À‡ƒ® €ÅÆ#„A@,„A؇ƒ—,„@À‡ƒª €ÆÆ#„A@,„B‡ƒ¢,„@À‡ƒ³ €ÇÆ#„A@,„B‡ƒ¤,„@@‡ƒ± €ÈÆ#„A@,„B(‡ƒ¥,„@‡ƒ­ €ÉÆ#„A@,„B0‡ƒ¦,„@à‡ƒ° €ÊÆ#„A@,„BL‡ƒ¦,„@à‡ƒ¯ €Ë›Š‚)‚Kœ‚6„?€‚4„¿€ €ÌÄ#„A@,‚) €Í“‚‹‚‹Š7'ƒ³;;+ €Γ‚‚Š7'ƒª;;+ €Ïžÿÿÿ§‚)‚6‚4 €ÐÃ#„A@ €Ñ¥ÿÿý~ €Ô¤ Ü(@;ƒœ‚,‚+‚*‚-ƒ €Õ™COMMON DO.TARE €Ö™ DO.TARE = -1 €×™DO €Ù“ƒœƒî…5+ƒã+ €Ú£Ž ƒœ,„@@,„@€,„?€,…™;ƒœ,,,, €Ü“ƒœ…£‹"‹ #‚;;;;+…+‹"‹ #‚|;;;;+ €Ý£Œƒœ,„AÈ,„@€,„?€,…™;ƒœ,,,, €Þµ„,„B4,„CŸ€,„B4 €ß™RWE HAVE T.INGRCODE$,T.INGRWEIGHT,T.INGRTOLERANCEMIN,T.INGRTOLERANCEMAX,T.INGRSCALE €à™READ INGREDIENT NAME €á™-ADJUST T.INGRWEIGHT TO KG (AS IT'S IN GRAMMS) €ã£ùó„?€,ƒÝ,‹ „CI;;;,ƒÝ, €䔂X„>•F €å£=Í„?€;, €æÄ#„?€,‚X €ç£FH„?€;, €è£D„?€;, €é— €ê™5 1 €룋ýƒß,„BH,„@ ,„?€,…e;ƒß,,,, €í“‚„A €îì„?€ €ï‘„@,„Bâ €ð½…;…â €ñ”‚„„?€=•# €ò‘„C’,„Bâ €ó’…˜ €ô˜1”‚„„@=• €õ‘„C’,„Bâ €ö’…“ €÷— €ø“‚„?€ €ùì„@€ €ú‘„C2,„Bà €û”‚„„?€=•½…$ƒ+;‚‡ €ü™EIF T.INGRSCALE = 2 THEN PRINT USING WEIGHT.FORMAT2$;T.INGRWEIGHT*1000 €ýì„?€ €ÿ™ tare - 'T' €™HARDWARE$ = "SW" €™9IF HARDWARE$ = "SW" THEN KEY 15, "COMMON.KEYS(KBRD$)","" €™9IF HARDWARE$ = "788" THEN KEY 16, "COMMON.KEYS(KBRD$)","" €™HARDWARE$ = "788" €µ„,„CY,„CŸ€,„CY €»„@à,…,…á €»„A,…Ž,…\ €»„A,…,…Ä € “‚<„ € ™UAUTO TARE *************************************************************************** € ™IF DO.TARE THEN €£$Õ; €™ DSPFONT=2 €ì„@ €™ LOCATE 85,85 €£ˆœ…Z,„Bª,„@€,„?€,…e;,,,,, €ì„?€ €£3e‚„;‚„ €™END IF €“‚,„¿€ €“‚+„ €“‚*„ €›N‚-„?€œ‚6„A‚4„?€ €“‚‚-;„ €žÿÿÿã‚-‚6‚4 €¬ €¬ €”Š5&;;„@/Š·Š5&;;„@/;;-„=•¶ € ”‚,~• €!“‚„@ €"ì„@ €#™ LOCATE 85,85 €$“ƒ…V‹"‹ #‚„;;;;+ €%£‡ƒ,„Bª,„@€,„?€,…e;ƒ,,,, €&“‚,„¿€ €'— €(–E €)”‚,•0 €*“‚,„ €+„?€,„Bª,„CŸ,„BÒ €,— €-— €.£"|; €/”‚‚‡‚†-]• €0™IF NOT ACCEPT.ON THEN €1”Š5&;;„@/Š·Š5&;;„@/;;-„=•^ €2”‚*~•E €3»„@À,…Œ,…T €4“‚*„¿€ €5”‚+~• “‚+„¿€ €6— €7–1 €8„A,„C\,„BŒ,„Co €9“‚*„ €:— €;µ„,„CY,„CŸ€,„CY €<™END IF €=–p €>”‚+•F €?»„@À,…#,…# €@µ„,„CY,„CŸ€,„CY €A“‚+„ €B— €C“‚„?€;„ €D— €E™REMOTE BUTTONS SUPPORT €F”‚„?€;‚‚‡‚†-]&•- €G“‚„?€;„ €H“‚<„@À €I˜;”‚„@;•) €J“‚„@;„ €K“‚<„@à €L— €M”‚<„?•° €N­ÿÿüE €O”‚<Š—…à;;=‚<Š—…;;=|•/ €P™CALL TARE.SCALES(T.INGRSCALE) €Q˜Ñ”‚<„A=‚<„A=|• €R°´ €S˜¢”‚<„@À=‚+&•í €T”‚‚‡‚…+[•N €U™)CALL DEBUG("CALL ACCEPT.ACTUAL.WEIGHT()") €V£Þ; €W°4 €X˜|”‚‚‡‚…+>•d €Y™*CALL DEBUG("CALL WEIGHT.OVER.TOLERANCE()") €Z£ñ; €[£n; €\“‚<„@À €]°µ €^— €_˜ž”‚<„@à=•Œ €`ì„@ €a™ LOCATE 85,85 €b£‚3…Z,„Bª,„@€,„?€,…e;,,,,, €cì„?€ €d£,ü‚„;‚„ €f“‚,„¿€ €g“‚<„ €h— €i­ÿÿú €k™LOOP €m¥ÿÿó- €p¤ M;‚/‚.‚0ƒž‚1‚2 €q„,„,„CŸ€,„Co €r»„ €s™ €u™KEY 9, "FMENU9", "" €v“‚<„ €w“‚/„ €x™GIF TMP.NETWEIGHT >= T.INGRWEIGHT-T.INGRTOLERANCEMIN THEN ACCEPT.ON = -1 €y“‚.„ €z›N‚0„?€œ‚6„A‚4„?€ €{“‚‚0;„ €|žÿÿÿã‚0‚6‚4 €}“ƒž…# €~¬ €€”‚‚‡‚…+>•D €£€*…õ,„A ,„A,„?€,…e;,,,,, €‚“ƒž…´ €ƒ˜X”‚‚‡‚†-<•@ €„£Ï…ö,„A ,„A,„?€,…e;,,,,, €…“ƒž…ñ €†— €ˆ”‚‚‡‚†-]•– €‰™IF NOT ACCEPT.ON THEN €Š”Š5&;;„@/Š·Š5&;;„@/;;-„=•× €‹”‚.~•¾ €Œ“‚„@ €ì„@ €Ž‘„Ch,„C^ €’…T €»„A,…,…# €‘“‚<„ €’´„Ce,„C[,„Cš€,„Co,„ €““‚.„¿€ €””‚/~• “‚/„¿€ €•“‚„?€;„ €–— €—–1 €˜„Ch,„C^,„Cš,„Cn €™“‚.„ €š— €›™DRAW 0,217,319,217 €œ™END IF €–š €ž”‚/•p €Ÿ»„A,…#,…# € “‚<„ €¡„Ce,„C[,„Cš€,„Co €¢™DRAW 0,217,319,217 €£“‚/„ €¤— €¥“‚„?€;„ €¦— €¨™[MAX WEIGHT ******************************************************************************** €©“‚„A €ªì„?€ €«‘„@ ,„BH €¬½…;…¡ €­”‚„„?€=•# €®‘„C‘,„BH €¯’…˜ €°˜1”‚„„@=• €±‘„C‘,„BH €²’…“ €³— €´“‚„?€ €µì„@€ €¶‘„C2,„BP €·”‚„„?€=•½…$ƒ+;‚…‚‡+ €¸™]IF T.INGRSCALE = 2 THEN PRINT USING WEIGHT.FORMAT2$;T.INGRTOLERANCEMAX*1000+T.INGRWEIGHT*1000 €¹ì„?€ €»™FCURRENT WEIGHT ******************************************************* €¼“‚„A €½ì„?€ €¾“‚Š¼‚„;; €¿‘„@ ,„B  €À½…;…p €Á”‚„„?€=Š½„?€;;~&• €‘„C‘,„B  €Ã’…˜ €Ä™.ELSEIF T.INGRSCALE = 2 AND NOT OVERCAP(2) THEN €Å™LOCATE 290,080 €Æ™ PRINT "G" €Ç— €È“‚„?€ €Éì„@€ €Ê‘„C2,„B¤ €Ë”Š½„?€;;~•0 €Ì”‚„„?€=•½…$ƒ+;‚ €Í–[ €Δ‚„„?€=•@½… ‹¡$Š¸…$ƒ+;;„@-,…;;+… +;… €Ï— €Ñ™IF NOT OVERCAP(2) THEN €Ò™FIF T.INGRSCALE = 2 THEN PRINT USING WEIGHT.FORMAT2$;TMP.NETWEIGHT*1000 €Ó™ELSE €Ô™WIF T.INGRSCALE = 2 THEN PRINT USING "\"+STRING$(LEN("#"+WEIGHT.FORMAT2$)-2," ")+"\";" " €Õ™END IF €Öì„@€ €Ø™OVERCAP 1 OR 2 €Ù”‚„„?€=•a €Ú”Š½„?€;;•# €Û‘„@ ,„Ca €Ü’…¶ €Ý– €Þ‘„@ ,„Ca €ß’… €à— €á— €â™IF T.INGRSCALE = 2 THEN €ã™ IF OVERCAP(2) THEN €ä™ LOCATE 5,225 €å™ PRINT "OVERCAPACITY" €æ™ ELSE €ç™ LOCATE 5,225 €è™ PRINT " " €é™ END IF €ê™END IF €ë™#----------------------------------- €ì™ TEXTSIZE = 1 €ï“‚„A €ðì„?€ €ñ‘„@,„Bâ €ò½…;ƒž €ó”‚„„?€=•l €ô‘„C’,„Bâ €õ’…˜ €ö™ELSEIF T.INGRSCALE = 2 THEN €÷™LOCATE 292,113 €ø™ PRINT "G" €ù— €ú“‚„?€ €ûì„@€ €ü‘„C2,„Bæ €ý”‚„„?€=•½…$ƒ+;‚‚‡‚…+- €þ™rIF T.INGRSCALE = 2 THEN PRINT USING WEIGHT.FORMAT2$;TMP.NETWEIGHT*1000-(T.INGRWEIGHT*1000+T.INGRTOLERANCEMAX*1000) €ÿì„?€ €™ BAR UPDATE €“‚„?€ €ì„@€ €“‚1„C* €“‚2„C> €´„A ,‚1,„C—€,‚2„?€+,„ €”‚‡‚…+„?‚…„>&•0 € “‚‚‚‡-‚…+„@@‚…*/ € – € “‚„?€ € — € ”‚„?€>• “‚„?€ €”‚„<• “‚„ €´„A˜,‚1,„A Š·„CŒ‚*;;+,‚2„?€+,„?€ €„A¨Š·„CŒ‚*;;+,‚1„?€+,„C—,‚2 €™CENTER OF THE BAR ******** €µ„BÈ,‚1„?€+„@ -,„BÈ,‚2„Ap+ €™IF T.INGRSCALE = 1 THEN €™ LOCATE 5,XBOX2+5 €™) PRINT USING WEIGHT.FORMAT1$;T.INGRWEIGHT €™ LOCATE 110,XBOX2+5 €™< PRINT USING WEIGHT.FORMAT1$;T.INGRWEIGHT+T.INGRTOLERANCEMAX €™ LOCATE 220,XBOX2+5 €™> PRINT USING WEIGHT.FORMAT1$;T.INGRWEIGHT+3*T.INGRTOLERANCEMAX €™0ELSEIF T.INGRSCALE = 2 AND SCALES.COUNT > 1 THEN €™' TMP.T.INGRWEIGHT = T.INGRWEIGHT * 1000 €™3 TMP.T.INGRTOLERANCEMAX = T.INGRTOLERANCEMAX * 1000 €™ LOCATE 5,XBOX2+5 € ™- PRINT USING WEIGHT.FORMAT2$;TMP.T.INGRWEIGHT €!™ LOCATE 110,XBOX2+5 €"™D PRINT USING WEIGHT.FORMAT2$;TMP.T.INGRWEIGHT+TMP.T.INGRTOLERANCEMAX €#™ LOCATE 220,XBOX2+5 €$™F PRINT USING WEIGHT.FORMAT2$;TMP.T.INGRWEIGHT+3*TMP.T.INGRTOLERANCEMAX €%™END IF €'™REMOTE BUTTONS SUPPORT €(”‚„?€;‚‚‡‚†-]&•‚ €)“‚„?€;„ €*“‚<„A €+™ELSEIF EXT.INP(2) THEN €,™ EXT.INP(2) = 0 €-™ MAINMENU = ASC("T") €.– €/“‚„?€;„ €0— €2­ÿÿï ®‚<„? €3„,„,„CŸ€,„Co €4¥ÿÿíŠ €7¤{;‚¾ƒ& €8à ƒ9ƒÞ €9™ACCEPT ACTUAL WEIGHT €:¬ €;£ Í €<”‚„„?€=Š»„?€;;~&•°u €=™,IF T.INGRSCALE = 2 AND SCALES.COUNT > 1 THEN €>™ IF NOT MOTION(2) THEN EXIT DO €?™END IF €@­ÿÿÿV €A£ $ €B“‚¾‚ €C”‚„„?€=• “‚„@ €D™IF T.INGRSCALE = 2 THEN DP = 1 €E“ƒÞ‹"‹ #ˆ¤Í‚‡„Dz*,‚;‚‡‚;;;;; €F™JT.INGRWEIGHT.STR$ = SPACE$(10-LEN(T.INGRWEIGHT.STR$)) + T.INGRWEIGHT.STR$ €G“ƒ9‹"‹ #ˆ¤4‚¾„Dz*,‚;‚¾‚;;;;; €H™LACTUAL.WEIGHT.STR$ = SPACE$(10-LEN(ACTUAL.WEIGHT.STR$)) + ACTUAL.WEIGHT.STR$ €I™CALL DEBUG( "-----" ) €J™CALL DEBUG( STR$(T.INGRSCALE) ) €K™#CALL DEBUG( STR$( ACTUAL.WEIGHT ) ) €L™/CALL DEBUG( STR$( DEC2STR(ACTUAL.WEIGHT,DP) ) ) €M™CALL DEBUG( "-----" ) €N™dING.CODE DESCRIPTION TARGET,KG ACTUAL,KG TIME €P“ƒ&‹!‹"‹% ƒÝ;;;;…+,„@À;;…+ €Q“ƒ&ƒ&‹!ƒß‹Ÿ"„A ;;+,„A ;;+…+ €R“ƒ&ƒ&‹$…‹"ƒÞ;;+,„A;;+…+ €S“ƒ&ƒ&‹$…‹"ƒ9;;+,„A;;+…+‹!‹¢%;;,„@ ;;+ €T”‚<„A=•o €U”‚¾‚‡‚…+>• €V“ƒ&ƒ&… + €W˜2”‚¾‚‡‚…+[• €X“ƒ&ƒ&… + €Y— €Z— €[£"ƒ&;ƒ& €\£§; €]¥ÿÿúŽ €`¤‘Gƒ';ƒ(‚¿ €a™FILE: ID1,2,3,4,5.LOG €b™LENGTH 100 BYTES; €c™FORMAT: €d™NOTEPAD:{92 BYTES OF DATA}; €e™INGRTTL:{92 BYTES OF DATA}; €f“ƒ(…”‹"‹% ƒÖ;;;;+…<+ €gÂ…Å,#„A@,ƒ(,„BÈ €hÆ#„A@,„BȇƒT €i“‚¿Šº„A@;;„BÈ/ €j“‚¿‚¿„?€+ €kǃT‹Ÿ"„BÈ;; €lǃTƒ' €mÅ#„A@,‚¿ €nÃ#„A@ €o¥ÿÿþx €r¤ÿH;ƒ)‚À €sàƒ«ƒ´ƒ²ƒ® €tàƒªƒ³ƒ±ƒ­ €uà ƒ°ƒ¯ €vàƒ¬ €w“ƒ)…”‹"‹% ƒÖ;;;;+…>+ €xÂ…Å,#„A@,ƒ),„Bh €yÆ#„A@,„Bh‡ƒ¬ €zǃ¬‹Ÿ"„Bh;; €{“‚ÀŠº„A@;;„Bh/ €|“‚À‚À„?€+ €}Å#„A@,‚À €~Æ#„A@,„A ‡ƒ« €Æ#„A@,„A ‡ƒv,„@ ‡ƒ´ €€Æ#„A@,„Ap‡ƒ,„@À‡ƒ² €Æ#„A@,„A¨‡ƒŒ,„@À‡ƒ® €‚Æ#„A@,„A؇ƒ—,„@À‡ƒª €ƒÆ#„A@,„B‡ƒ¢,„@À‡ƒ³ €„Æ#„A@,„B‡ƒ¤,„@@‡ƒ± €…Æ#„A@,„B(‡ƒ¥,„@‡ƒ­ €†Æ#„A@,„B0‡ƒ¦,„@à‡ƒ° €‡Æ#„A@,„BL‡ƒ¦,„@à‡ƒ¯ €ˆÇƒ«‹#‹ ;;,„@€,„@;;…8+‹#‹ ;;,„?€,„@;;+…8+‹#‹ ;;,„@à,„@€;;+ €‰Çƒ´‹!‹¢%;;,„@ ;; €ŠÇƒ²ƒã €‹Çƒ®ƒÝ €ŒÇƒªƒ9 €ǃ³ƒÞ €ŽÇƒ±ƒá €ǃ­ƒÖ €ǃ°‹"‹ #‚†„Dz*;;;; €‘ǃ¯‹"‹ #‚…„Dz*;;;; €’Å#„A@,‚À €“Ã#„A@ €”¥ÿÿü €—¤ØI; €˜“‚„A €™ì„?€ €š“‚Š¼‚„;; €›‘„@,„C €œ½…;…p €”‚„„?€=Š½„?€;;~&• €ž‘„C’€,„C €Ÿ’…˜ € ™.ELSEIF T.INGRSCALE = 2 AND NOT OVERCAP(2) THEN €¡™LOCATE 293,143 €¢™ PRINT "G" €£— €¤“‚„?€ €¥ì„@€ €¦‘„C2,„C €§”Š½„?€;;~•0 €¨”‚„„?€=•½…$ƒ+;‚ €©–[ €ª”‚„„?€=•@½… ‹¡$Š¸…$ƒ+;;„@-,…;;+… +;… €«— €¬™IF NOT OVERCAP(2) THEN €­™FIF T.INGRSCALE = 2 THEN PRINT USING WEIGHT.FORMAT2$;TMP.NETWEIGHT*1000 €®™ELSE €¯™WIF T.INGRSCALE = 2 THEN PRINT USING "\"+STRING$(LEN("#"+WEIGHT.FORMAT2$)-2," ")+"\";" " €°™END IF €±ì„?€ €²£; €³¥ÿÿý1 €¶¤ B;‚‚Ã*‚Á €·™%IF PCURRENT = 1 THEN CLS 00,28,127,38 €¸™DETECT AT WHICH POINT WE ARE: €¹™'1 - START OF FILL: 0---TARGET+TOLERANCE €º™:2 - IN TOLERANCE: TARGET-TOLERANCE --- TARGET + TOLERANCE €»™)3 - OUT OF TOLERANCE: SHOW OVER TOLERANCE €¼“‚„C* €½“‚ÄC> €¾´„A˜,‚Â,„C—€,‚Ä?€+,„ €¿“‚„?€ €Àì„@€ €Á”‚‚‡‚†-<• €“‚G„¿€ €Ô‚‡‚†+„?‚‡‚†-„?&•$ €Ä“‚‚‚‡‚†-/ €Å– €Æ“‚„?€ €Ç— €È”‚„?€>• “‚„?€ €É”‚„<• “‚„ €Ê´„A ,‚Â,„A Š·„CŒ‚*;;+,‚Ã,„?€ €Ë„A¨Š·„CŒ‚*;;+,‚„?€+,„C—,‚à €Ì”‚„„?€=•À €Í‘„@ ,‚Ä@ + €νƒ;„ €Ï‘„CH,‚Ä@ + €нƒ… +;‚‡‚†-;… €Ñ™0ELSEIF T.INGRSCALE = 2 AND SCALES.COUNT > 1 THEN €Ò™ LOCATE 5,XBOX2+5 €Ó™ PRINT USING WEIGHT.FORMAT2$;0 €Ô™ LOCATE 200,XBOX2+5 €Õ™' TMP.T.INGRWEIGHT = T.INGRWEIGHT * 1000 €Ö™3 TMP.T.INGRTOLERANCEMIN = T.INGRTOLERANCEMIN * 1000 €×™N PRINT USING WEIGHT.FORMAT2$+"\\";TMP.T.INGRWEIGHT-TMP.T.INGRTOLERANCEMIN;" " €Ø— €Ù˜ ”‚‚‡‚†-]‚‚‡‚…+[&•ß €Ú“‚G„¿€ €Û”‚‡‚…+„?‚…„>&•0 €Ü“‚‚‚‡-‚…+‚†‚…+/ €Ý– €Þ“‚„?€ €ß— €à”‚„?€>• “‚„?€ €ᔂ„<• “‚„ €â´„A ,‚Â,„A Š·„CŒ‚*;;+,‚Ä?€+,„?€ €ã„A¨Š·„CŒ‚*;;+,‚„?€+,„C—,‚à €å™CENTER OF THE BAR ******** €浄C,‚„?€+„@ -,„C,‚Ä@ + €蔂„„?€=•> €é‘„@ ,‚Ä@ + €꽃… +;‚‡‚†-;… €ë‘„CH,‚Ä@ + €콃… +;‚‡‚…+;… €í™0ELSEIF T.INGRSCALE = 2 AND SCALES.COUNT > 1 THEN €î™' TMP.T.INGRWEIGHT = T.INGRWEIGHT * 1000 €ï™3 TMP.T.INGRTOLERANCEMIN = T.INGRTOLERANCEMIN * 1000 €ð™3 TMP.T.INGRTOLERANCEMAX = T.INGRTOLERANCEMAX * 1000 €ñ™ LOCATE 5,XBOX2+5 €ò™N PRINT USING WEIGHT.FORMAT2$+"\\";TMP.T.INGRWEIGHT-TMP.T.INGRTOLERANCEMIN;" " €ó™ LOCATE 200,XBOX2+5 €ô™N PRINT USING WEIGHT.FORMAT2$+"\\";TMP.T.INGRWEIGHT+TMP.T.INGRTOLERANCEMAX;" " €õ— €ö˜”‚‚‡‚…+>•ì €÷”‚G•^ €ø„A¨,‚„?€+,„C—,‚à €ù´„A ,‚Â,„C—€,‚Ä?€+,„ €ú“‚G„ €û— €ý”‚„„?€=•e €þ”Š½„?€;;„=•] €ÿ“ƒ*…0 €“‚Á‚„@@+ €£W›ƒ*,‚Á,„@@,„?€,…e;ƒ*‚Á,,, €— €™0ELSEIF T.INGRSCALE = 2 AND SCALES.COUNT > 1 THEN €™ IF OVERCAP(2) = 0 THEN €™% LINE1$ = "* OVER TOLERANCE *" €™ OC_COO = XBOX1+3 €™( CALL PRINT.LINE(LINE1$,OC_COO,3,1,"C") €™ END IF € — € — € ”‚„„?€=•[ € ”Š½„?€;;•] € “ƒ*…/ €“‚Á‚„@@+ €£V"ƒ*,‚Á,„@@,„?€,…e;ƒ*‚Á,,, €— €™0ELSEIF T.INGRSCALE = 2 AND SCALES.COUNT > 1 THEN €™ IF OVERCAP(2) THEN €™% LINE1$ = "* OVER CAPACITY *" €™ OC_COO = XBOX1+3 €™( CALL PRINT.LINE(LINE1$,OC_COO,3,1,"C") €™ END IF €— €¥ÿÿó𠀤F‚Ä; €¬ €”Š¬‚Ä;;„]•q €”Š½‚Ä;;„=•? €¬ € ­ÿÿÿö®Š»‚Ä;;~ €!Û‚Ä €"£"‚„?€;, €#— €$°w €%–e €&”Š½‚Ä;;„=•? €'¬ €(­ÿÿÿö®Š»‚Ä;;~ €)Ú‚Ä €*£"„?€;, €+— €,— €-­ÿÿÿ €.¥ÿÿþî €1¦‘‚¥‚¦; €2™ARRIVED 1.234, 1234 - "1.234" €3™ 0.0001 - 1 - €4“‚¤Š·‚¥„A ‚¦^*„?+;;„A ‚¦^/ €5§ÿÿÿx €8¤ý;‚Å €9”Šž „@;;•Ý„@,O €:›¤‚Å„?€œ‚6„A‚4„?€ €;”Š  „?€,‚Å;;„?€=•E €<¬ €=­ÿÿÿö®Š  „?€,‚Å;;„= €>“‚‚Å;„¿€ €?— €@žÿÿÿ‚Å‚6‚4 €AÝ„@,T„>LÌÍ£ÿÿÿ ; €B¥ÿÿÿ €E¤†L; €F“‚<„ €G»„A,…,… €Hµ„,„CY,„CŸ€,„CY €I¬ €J”‚<„?•° €K­ÿÿÿÜ €L»„ €M¥ÿÿÿƒ €P™1COMMON SUBROUTINES ****************************** €Q¤í‚Æ; €R™#GENERATION DATE: 15.11.2001 9:57:35 €S¾‚Ç‚Æ €T¿P„?€ €U“ƒß‹Ÿ"„A ;; €V“ƒÙ‹Ÿ"„@À;; €W“‚Š„ €X¿4c„@ €Y“ƒÝ‹Ÿ"„@À;; €Z“‚‡„ €[“‚†„ €\“‚…„ €]“‚„„ €^¿È[„@@ €_“ƒí‹Ÿ"„AÈ;; €`“ƒâ‹Ÿ"„@À;; €a“ƒê‹Ÿ"„A@;; €b¿dy„@€ €c“ƒî‹Ÿ"„AÈ;; €d“ƒã‹Ÿ"„@À;; €e“ƒë‹Ÿ"„A@;; €f“‚}„ €g“‚€„ €h¿â“„@  €i“ƒï‹Ÿ"„AÈ;; €j“ƒä‹Ÿ"„@À;; €k“ƒì‹Ÿ"„A@;; €l“‚~„ €m“‚„ €n“ƒæ‹Ÿ"„@ ;; €o¿FA„A` €p“ƒñ‹Ÿ"„A ;; €q“ƒð‹Ÿ"„A ;; €rÁ €s¥ÿÿý €v¤t,‚È; €w™#GENERATION DATE: 15.11.2001 9:57:35 €x¾‚É‚È €y¿×„?€ €z“‚*„B €{“‚)‚* €|Â…Å,#„?€,…—,‚* €}Æ#„?€,„A ‡ƒ^ €~Æ#„?€,„A ‡ƒv,„?€‡ƒQ €Æ#„?€,„A¨‡ƒ,„@À‡ƒG €€Æ#„?€,„A؇ƒŒ,„A ‡ƒ© €“‚g„?€ €‚¿4#„@ €ƒ“‚1„AÀ €„“‚)‚1 €…™ CALL DEBUG(T.RECIPEFILENAME788$) €†Â…Å,#„@,ƒë,‚1 €‡Æ#„@,„@À‡ƒX €ˆÆ#„@,„@À‡ƒv,„@à‡ƒ\ €‰Æ#„@,„AP‡ƒ,„@ ‡ƒ[ €ŠÆ#„@,„A‡ƒŒ,„@ ‡ƒZ €‹Æ#„@,„A¸‡ƒ—,„?€‡ƒY €Œ“‚n„?€ €¿ú„@@ €Ž“‚2„B4 €“‚)‚2 €Â…Å,#„@@,…Ó,‚2 €‘Æ#„@@,„?€‡ƒQ €’Æ#„@@,„?€‡ƒv,„Aȇƒo €“Æ#„@@,„AЇƒ,„?€‡ƒR €”Æ#„@@,„A؇ƒŒ,„@À‡ƒd €•Æ#„@@,„B‡ƒ—,„A@‡ƒl €–“‚o„?€ €—¿„@€ €˜“‚3„BX €™“‚)‚3 €šÂ…Å,#„@€,…_,‚3 €›Æ#„@€,„Aȇƒp €œÆ#„@€,„Aȇƒ,„@À‡ƒe €Æ#„@€,„Aø‡ƒŒ,„@@‡ƒI €žÆ#„@€,„B‡ƒ—,„@@‡ƒK €ŸÆ#„@€,„B‡ƒ¢,„@ ‡ƒg € Æ#„@€,„B(‡ƒ¤,„A@‡ƒm €¡¿îN„@  €¢“‚4„BX €£“‚)‚4 €¤“ƒ½…`‹"‹% ƒÖ;;;;+…;+ €¥Â…Å,#„@ ,ƒ½,‚4 €¦Æ#„@ ,„Aȇƒq €§Æ#„@ ,„Aȇƒ,„@À‡ƒf €¨Æ#„@ ,„Aø‡ƒŒ,„@@‡ƒJ €©Æ#„@ ,„B‡ƒ—,„@@‡ƒL €ªÆ#„@ ,„B‡ƒ¢,„@ ‡ƒh €«Æ#„@ ,„B(‡ƒ¤,„A@‡ƒn €¬“‚q„?€ €­¿—’„A` €®“‚/„B  €¯“‚)‚/ €°Â…Å,#„A`,…Õ,‚/ €±Æ#„A`,„A ‡ƒt,„A ‡ƒs,„A ‡ƒN,„A ‡ƒO €²“‚l„?€ €³Á €´¥ÿÿù• €·¤P ‚Ì; €¸™$GENERATION DATE: 15.11.2001 9:57:35 €¹Ã#‚Ì €º¥ÿÿÿ¹ €½¤À)‚Í;ƒ, €¾™#GENERATION DATE: 15.11.2001 9:57:35 €¿”‚Í„?€=‚Í„@=|‚Í„@@=|‚Í„@€=|•- €À£ÿÿø¦‚Í;‚Í €Á£ÿÿÿ‚Í;‚Í €— €þ‚Î‚Í €Ä¿õ„?€ €ÅË…— €Æ¿Õ„@ €Ç˃ê €È¿µ„@@ €ÉË…Ó €Ê¿•„@€ €ËË…_ €Ì¿up„@  €Í“ƒ,…`‹"‹% ƒÖ;;;;+…;+ €ÎÂ…Å,#„A@,ƒ,,„?€ €ÏÃ#„A@ €Ð˃, €ÑÁ €Ò¥ÿÿþI €Õ¤4‚Ï; €Ö™#GENERATION DATE: 15.11.2001 9:57:35 €×¾‚Ð‚Ï €Ø¿ÔE„?€ €Ù“ƒ߃^ €Ú“ƒÙƒG €Û“‚ŠŠ7'ƒ©;; €Ü¿†–„@ €Ý“ƒ݃X €Þ“‚‡Š7'ƒ\;;„Dz/ €ß“‚†Š7'ƒ[;;„Dz/ €à“‚…Š7'ƒZ;;„Dz/ €á“‚„Š7'ƒY;; €â¿çI„@@ €㓃íƒo €䓃çƒi €哃âƒd €擃êƒl €ç¿•}„@€ €蓃îƒp €铃ãƒe €꓃ëƒm €ë“‚}Š7'ƒI;; €ì“‚€Š7'ƒK;; €퓃åƒg €î¿}„@  €ïƒq €ð“ƒäƒf €ñ“ƒìƒn €ò“‚~Š7'ƒJ;; €ó“‚Š7'ƒL;; €ô“ƒæƒh €õ¿‰2„AP €ö“‚ˆŠ7'‹"ƒ];;;; €÷¿NI„A` €ø“ƒñƒt €ù“ƒðƒs €ú“ƒÚƒN €û“ƒÛƒO €üÁ €ý¥ÿÿüÕ €¤‚J‚Ñ; €™#GENERATION DATE: 15.11.2001 9:57:35 €¾‚Ò‚Ñ €¿"¸„?€ €ǃ^‹Ÿ"„A ;; €ǃ^ƒß €ǃQ‹ „CI;; €ǃG‹Ÿ"„@À;; €ǃGƒÙ € ǃ©‹Ÿ"„A ;; € ǃ©‹"‹ #‚Š;;;; € ¿a2„@ € ǃX‹Ÿ"„@À;; € ǃXƒÝ €ǃ\‹Ÿ"„@à;; €ǃ\‹"‹ #‚‡;;;; €ǃ[‹Ÿ"„@ ;; €ǃ[‹"‹ #‚†;;;; €ǃZ‹Ÿ"„@ ;; €ǃZ‹"‹ #‚…;;;; €ǃY‹Ÿ"„?€;; €ǃY‹"‹ #‚„;;;; €¿&¼„@@ €ǃQ‹ „CI;; €ǃo‹Ÿ"„AÈ;; €ǃoƒí €ǃR‹ „CJ;; €ǃd‹Ÿ"„@À;; €ǃdƒâ €ǃl‹Ÿ"„A@;; €ǃlƒê €¿a/„@€ € ǃp‹Ÿ"„AÈ;; €!ǃpƒî €"ǃe‹Ÿ"„@À;; €#ǃeƒã €$ǃm‹Ÿ"„A@;; €%ǃmƒë €&ǃI‹Ÿ"„@@;; €'ǃI‹"‹ #‚};;;; €(ǃK‹Ÿ"„@@;; €)ǃK‹"‹ #‚€;;;; €*ǃg‹Ÿ"„@ ;; €+ǃgƒå €,¿)/„@  €-ǃq‹Ÿ"„AÈ;; €.ǃqƒï €/ǃf‹Ÿ"„@À;; €0ǃfƒä €1ǃn‹Ÿ"„A@;; €2ǃnƒì €3ǃJ‹Ÿ"„@@;; €4ǃJ‹"‹ #‚~;;;; €5ǃL‹Ÿ"„@@;; €6ǃL‹"‹ #‚;;;; €7ǃh‹Ÿ"„@ ;; €8ǃhƒæ €9¿ñ2„AP €:ǃ]‹"‹ #‚ˆ;;;; €;¿¶±„A` €<ǃt‹Ÿ"„A ;; €=ǃtƒñ €>ǃs‹Ÿ"„A ;; €?ǃsƒð €@ǃN‹Ÿ"„A ;; €AǃNƒÚ €BǃO‹Ÿ"„A ;; €CǃOƒÛ €DÁ €E¥ÿÿù‡ €H¤"; €I“‚<„?€ €J¥ÿÿÿç €K¤"; €L“‚<„@ €M¥ÿÿÿç €N¤" ; €O“‚<„@@ €P¥ÿÿÿç €Q¤"!; €R“‚<„@€ €S¥ÿÿÿç €T¤""; €U“‚<„@  €V¥ÿÿÿç €W¤"#; €X“‚<„@À €Y¥ÿÿÿç €Z¤"$; €[“‚<„@à €\¥ÿÿÿç €]¤"%; €^“‚<„A €_¥ÿÿÿç €`¤"&; €a“‚<„A €b¥ÿÿÿç €c¤"; €d“‚<„A €e¥ÿÿÿç €f¤"; €g“‚<„A0 €h¥ÿÿÿç €i¤"; €j“‚<„A@ €k¥ÿÿÿç €l¤"; €m“‚<„AP €n¥ÿÿÿç €o¤"; €p“‚<„A` €q¥ÿÿÿç €r¤- ƒ-; €s”Š¸ƒ-;;„?€=•c €t™ USUAL KEYBOARD, ENTER, SPACE ... €u“‚<Š—‹#ƒ-,„?€,„?€;;;; €v˜s”Š¸ƒ-;;„@=•V €w™ESC OR ARROWS ... €x“‚<„Š—‹#ƒ-,„@,„?€;;;;- €y— €z”‚<„A=• “‚<„D^ €{¥ÿÿþÜ €~¤º$‚׃/;ƒ.‚Ø‚Ù €™'RECORDFOUND = 0, OR FOUND RECORD NUMBER €€™-NEXT.RECORD.NUMBER, RECORD TO BE INSERTED ... €“ƒ.…# €‚“‚R„ €ƒ£ÿÿéi‚×;‚× €„“‚ØŠº‚×;;‚)/ €…”‚Ø„?•­ €†“‚Ù„?€ €‡¬ €ˆ™FOR RECORDF = 1 TO RECCOUNTF €‰Ä#‚×,‚Ù €Š”‚ׄ?€=• “ƒ.ƒG €‹”‚ׄ@=• “ƒ.ƒX €Œ”‚ׄ@@=• “ƒ.ƒd €”‚ׄ@€=• “ƒ.ƒe €Ž”‚ׄ@ =• “ƒ.ƒf €”‹"‹% ƒ/;;;;‹"‹% ƒ.;;;;=•1 €£ÿÿð‘‚×;‚× €‘“‚R‚Ù €’°R €“— €”“‚قل?€+ €•”‚Ù‚Ø>•° €–™ NEXT RECORD €—­ÿÿþk €˜— €™£ÿÿíï‚×;‚× €š¥ÿÿýO €¤8; €ž“‚„ €Ÿ¬ € “ƒÚ‹ …u,…',…#,…î,„,„A ;; €¡”‚„¿€=•°K €¢“ƒÛ‹ …v,…',…#,…î,„,„A ;; €£° €¤­ÿÿÿc €¥”‚„=•` €¦£ÿÿæ„A`;, €§Ä#„A`,„?€ €¨ÇƒNƒÚ €©ÇƒOƒÛ €ªÅ#„A`,„?€ €«Ã#„A` €¬— €­¥ÿÿþÑ €°¤¢ >;ƒ0 €±“‚„ €²¬ €³“ƒ0‹!‹¢%;;,„@;;‹#‹¢%;;,„@€,„@;;+ €´“ƒ0‹ …å,…+,ƒ0,…¦,„@€,„@€;; €µ­ÿÿÿu®Š7'ƒ0;;„Ep[ €¶”‚„=•4Ö‹!ƒ0,„@;;…M+‹$ƒ0,„@;;+ €·¬ €¸“ƒ0‹#‹ ;;,„@€,„@;;‹#‹ ;;,„?€,„@;;+‹#‹ ;;,„@à,„@€;;+ €¹“ƒ0‹ …s,…*,ƒ0,…¦,„A,„A;; €º­ÿÿÿL®Š7'‹#ƒ0,„?€,„@;;;;„B<Š7'‹#ƒ0,„@@,„@;;;;„AP<& €»”‚„=•c׋#ƒ0,„@@,„@;;…8+‹#ƒ0,„?€,„@;;+…8+‹#ƒ0,„@ ,„@€;;+ €¼¥ÿÿýg €¿¤†‚Ú; €À™BLOCK VERSION 1.0 €Á“‚„ €ÂÝ„?€,T‚Ú£6; €ì €Ä”‚•° €Å­ÿÿÿâ €ÆÝ„?€,O €Ç¥ÿÿÿƒ €ʤòƒ1;‚Û‚Ü‚Ý €Ë“‚ÛŠ7'‹#ƒ1,„?€,„@;;;; €Ì“‚ÜŠ7'‹#ƒ1,„@€,„@;;;;„?€-„Aô* €Í“‚ÝŠ7'‹#ƒ1,„@à,„@€;;;;„C¶žú* €Γ‚ Š·‚Û‚Ü+‚Ý+;; €Ï¥ÿÿÿ €Ѥ"; €Ò“‚„¿€ €Ó¥ÿÿÿç €Ö™+---------- Start Of [OPENPRN(),CLOSEPRN(),] €×™ !!! NOT USED IN CURRENT CODE !!! €ؤ٠Aƒ2‚Þƒ3‚ß; €Ù“ƒƃ2 €Ú“ƒǃ3 €Û„,‚Þ,„A˜,‚Þ €Ü‘Š·„A Š¸ƒÆ;;-„@/;;,‚Þ €Ý’ƒÆ €Þ‘Š·„A Š¸ƒÇ;;-„@/;;,‚ß €ß’ƒÇ €à¥ÿÿÿ0 €㤮‚à; €䔊¸ƒÆ;;‚à>•+ €哃Æ‹#ƒÆ,„?€,‚à;; €æ— €甊¸ƒÇ;;‚à>•+ €蓃Ç‹#ƒÇ,„?€,‚à;; €é— €ê¥ÿÿÿ[ €í¤ç07;ƒ5ƒ4‚ã‚âƒ6‚á €5…G €4…H €ð“‚ã„ €ñ“‚„@@ €ò“‚â„ €ó™$SECURE = 0 - WRONG PASSWORD, -1 - OK €ô¬ €õ“ƒ6…# €ö„,„,„CŸ€,„Co €÷»„ €ø“‚„ €ù“ƒ6‹…¹,…(,…#,…Ã;; €ú”‚„¿€=•°Š €û„,„,„CŸ€,„Co €ü»„ €ý”‹% ‹"ƒ6;;;;‹% ‹"ƒ5;;;;=•! €þ“‚ã„¿€ €ÿ° €˜ù”‹% ‹"ƒ6;;;;‹% ‹"ƒ4;;;;=‚„=&•| €„,„,„CŸ€,„Co €»„ €“‚á„BÆ €„,„,„CŸ€,„Co €»„ €“‚ã„¿€ €°F €˜4”‹% ‹"ƒ6;;;;…#=‚„¿€=|•! € “‚ã„ € °ò € ˜à”‹% ‹"ƒ6;;;;‹% ‹"ƒ5;;;;?‚„=&•– € „,„,„CŸ€,„Co € »„ €“‚á„BÆ €£ÿÿû…•,„?€,…#,„@;,,,, €“‚á„BÆ €£ÿÿøË„@;, €“‚ã„ €° €— €­ÿÿüì €„,„,„CŸ€,„Co €»„ €¥ÿÿü" €¤×C‚æƒ7‚å;‚ä €”‚å„?•+ €„,„,„CŸ€,„Co €»„ €— € “‚ä„BÆ €!£ÿÿúƒ7,‚æ,…#,„@;ƒ7‚æ,, €"“‚ä„BÆ €#”‚å„?•£ÿÿ÷¤‚å;‚å €$¥ÿÿÿ2 €'¤µdDƒ?;ƒ8ƒ9ƒ:ƒ;ƒ<ƒ=ƒ>‚ç €(™PROGRAMM INFORMATION SCREEN" €)„,„,„CŸ€,„Co €*“‚„A €+ì„?€ €,“ƒ8…É €-“ƒ9…# €.“ƒ:…š €/“ƒ;‹"‹% ƒñ;;;; €0“ƒ<‹"‹% ƒð;;;; €1“ƒ=…R €2”‹"‹% ƒÛ;;;;…#=• €3“ƒ>…4 €4–+ €5“ƒ>‹"‹% ƒÛ;;;; €6— €7‘„CŸŠ¸ƒ9;;„A@*-„@/,„A@ €8’ƒ9 €9‘„CŸŠ¸ƒ:;;„A@*-„@/,„BH €:’ƒ: €;‘„CŸŠ¸ƒ;;;„A@*-„@/,„B´ €<’ƒ; €=‘„CŸŠ¸ƒ<;;„A@*-„@/,„Bð €>’ƒ< €?µ„,„B@„@p*,„Bþ„@ *,„B@„@p* €@‘„CŸŠ¸ƒ=;;„A@*-„@/,„C €A’ƒ= €B‘„CŸŠ¸ƒ>;;„A@*-„@/,„CH €C’ƒ> €D´„,„,„CŸ€,„Co,„ €E™SHOW PLU MASTER FROM €F£t„C,„A°;,, €G“‚„A €H‘„Bª,„AP €I’ƒ8 €J™STRING2SHOW$ = "" €K™FOR X=26 TO 1 STEP -1 €L™ CHAR$ = MID$(SPLASH1$,X,1) €M™% STRING2SHOW$ = CHAR$ + STRING2SHOW$ €N™ REM DSPFONT=8 €O™ LOCATE 81,13 €P™ PRINT STRING2SHOW$ €Q™NEXT X €R™DSPFONT=CURRENTFONT €S”ƒ?…û=•ü €T“‚<„ €U”‹"‹% ƒñ;;;;…ó=‹"‹% ƒñ;;;;…ó=&•»„@,…ˆ,…Ï €V»„AP,…‡,…! €W¬ €X”‚<„?•° €Y­ÿÿÿÜ €Z„,„,„CŸ€,„Co €[»„ €\”‚<„@=• £q„;, €]– €^£ÿÿñò„@ ;, €_— €`”‚<„A?•Ê €a›­‚ç„œ‚6„C‚4„@€ €b´„‚ç+,„‚ç+,„CŸ€‚ç-,„Co‚ç-,„ €c´„‚ç+,„‚ç+,„CŸ€‚ç-,„Co‚ç-,„ €džÿÿÿ„‚ç‚6‚4 €e›ƒ‚ç„œ‚6„C‚4„@ €f‚ç,„,‚ç„?€+,„Co €g„CŸ‚ç-,„,„CŸ€‚ç-,„Co €hžÿÿÿ®‚ç‚6‚4 €i›}‚ç„œ‚6„Bî‚4„?€ €j„C,‚ç,„C,‚ç €k„C,„Cn‚ç-,„C,„Co‚ç- €lžÿÿÿ´‚ç‚6‚4 €m— €n„,„,„CŸ€,„Co €o“‚<„ €p¥ÿÿøT €r¤–‚è‚é; €s“‚„@€ €t‘‚è„@À-,‚é„AP- €u’…± €v“‚„?€ €w‘‚è„@-,‚é„@À- €x’…e €y“‚„@€ €z¥ÿÿÿs €}¤;‚ê €~£ÿÿÒ†„A`;, €“‚ꊺ„A`;; €€”‚ê„B =•* €Ä#„A`,„?€ €‚£ÿÿÚÒ„A`;, €ƒ–n €„“ƒñ‹Ÿ"„A ;; €…“ƒð‹Ÿ"„A ;; €†“ƒÚ‹Ÿ"„A ;; €‡“ƒÛ‹Ÿ"„A ;; €ˆ— €‰£ÿÿØ,„A`;, €Š”‹"‹% ƒñ;;;;…#=‹"‹% ƒð;;;;…#=|‚ê„=|•8 €‹£<„;, €Œ”‚%„=• €ä €Ž €— €— €‘¥ÿÿþz €”¤”4‚í;ƒN‚ìƒTƒSƒRƒQƒPƒF‚ïƒ@ƒA‚î‚ëƒBƒCƒDƒEƒGƒHƒIƒJƒKƒLƒMƒO €•™OLDDSPFONT = DSPFONT €–“‚„@€ €—„,„,„CŸ,„Co €˜»„ €™™,BLOCK REG. VERSION FOR DEMO VERSION FLAG ... €š”‚í„=•8 €›“ƒN‹ „AP;;…^+ €œ“‚ì„ €˜F”‚í„>•4 €ž“ƒN‹ „AP;;…ý+ €Ÿ“‚ì„A@ € — €¡¬ €¢“‚„ €£“‚%„ €¤“ƒT‹ …Í,…)ƒN+,…#,…î,‚í,„A ;; €¥£ÿÿ뇄?€;, €¦”‚„¿€=•° ö €§“ƒS‹ …Ì,…)ƒN+,…#,…î,‚í,„A ;; €¨£ÿÿë„?€;, €©”‚„¿€=•° Ž €ª“ƒR‹ …ï,…DƒN+,…#,…Ã,‚ì,„A@;; €«£ÿÿê·„?€;, €¬”‚„¿€=•° & €­”‹"‹% ƒT;;;;…#=‹"‹% ƒS;;;;…#=&•) €®“ƒR‹¡$„A@,…?;; €¯–D €°“ƒT‹"‹% ƒT;;;; €±“ƒS‹"‹% ƒS;;;; €²“ƒQƒT €³“ƒPƒS €´“ƒTƒTƒS+ €µ“ƒSƒSƒT+ €¶“ƒF…# €·›9‚ï„?€œ‚6Š¸ƒT;;‚4„?€ €¸“ƒ@‹"‹ #Š—‹#ƒT,‚ï,„?€;;;;;;;; €¹“ƒA‹"‹ #Š—‹#ƒS,‚ï,„?€;;;;;;;; €º“‚îŠ7'ƒ@;;Š7'ƒA;;‚ï+* €»“ƒFƒF‹"‹ #Š–‚î;;;;;;+ €¼žÿÿÿ‚ï‚6‚4 €½“‚ë„ €¾›{‚ï„?€œ‚6Š¸ƒF;;‚4„?€ €¿“‚ë‚ëŠ7'‹#ƒF,‚ï,„?€;;;;+ €ÀžÿÿÿÁ‚ï‚6‚4 €Á„,„,„CŸ,„Co €“ƒ@‹#‹"‹% ƒT;;;;,„?€,„?€;; €ÓƒA‹#‹"‹% ƒT;;;;,„@@,„?€;; €Ä“ƒB‹#‹"‹% ƒT;;;;,„@€,„?€;; €Å“ƒC‹#‹"‹% ƒS;;;;,„@,„?€;; €Æ“ƒD‹#‹"‹% ƒS;;;;,„@@,„?€;; €Ç“ƒE‹#‹"‹% ƒS;;;;,„@€,„?€;; €È“ƒG‹"‹ #‚늖‚]„A@+Š—ƒ@;;-;;*;;;; €É“ƒH‹"‹ #‚늖‚]„AÀ+Š—ƒA;;-;;*;;;; €Ê“ƒI‹"‹ #‚늖‚]„A0+Š—ƒB;;-;;*;;;; €Ë“ƒJ‹"‹ #‚늖‚]„A+Š—ƒC;;-;;*;;;; €Ì“ƒK‹"‹ #‚늖‚]„A¨+Š—ƒD;;-;;*;;;; €Í“ƒL‹"‹ #‚늖‚]„A¨+Š—ƒE;;-;;*;;;; €ΓƒMƒGƒH+ƒI+ƒJ+ƒK+ƒL+ €Ï”Š¸ƒM;;„A@>•+ €ГƒM‹#ƒM,„?€,„A@;; €Ñ— €Ò— €Ó”ƒRƒM=•¨ €Ô“‚%„¿€ €Õ“‚„@@ €Ö„,„,„CŸ,„Co €דƒO…’ €Ø£jƒO,„A ,‚,„?€,…e;ƒO,‚,, €Ù“ƒO…ò €Ú£'ƒO,„B ,‚,„?€,…e;ƒO,‚,, €Û“ƒO…U €Ü£äƒO,„Bp,‚,„?€,…e;ƒO,‚,, €Ý£ÿÿÆ-„A`;, €Þ“ƒñƒQ €ß“ƒðƒP €àǃt‹Ÿ"„A ;; €áǃs‹Ÿ"„A ;; €âǃtƒñ €ãǃsƒð €äÅ#„A`,„?€ €åÃ#„A` €æ˜Ò”ƒR‹¡$„A@,…?;;=•¨ €ç“‚%„¿€ €è“‚„@@ €é„,„,„CŸ,„Co €듃O…w €ì£ ƒO,„A ,‚,„?€,…e;ƒO,‚,, €퓃O…E €î£]ƒO,„B ,‚,„?€,…e;ƒO,‚,, €O…U €ð£ƒO,„Bp,‚,„?€,…e;ƒO,‚,, €ñ£ÿÿÄc„A`;, €ò“ƒñ…ó €ó“ƒð…ó €ôǃt‹Ÿ"„A ;; €õǃs‹Ÿ"„A ;; €öǃtƒñ €÷ǃsƒð €øÅ#„A`,„?€ €ùÃ#„A` €ú– €û„,„,„CŸ€,„Co €ü™ LOCATE 7, 100 €ý™PRINT " WRONG CODE! " €þ“ƒO…ú €ÿ£݃O,„BÈ,‚,„?€,…e;ƒO,‚,, €™PRINT REGISTRATION.CODE$ €™PRINT FINAL.CODE$ €”‹ …h;;…#?•Ë…h €ä € €— €“‚<„ €»„A,…,…² €´„,„,„CŸ€,„Co,„ € µ„,„CY,„CŸ,„CY € ¬ € ”‚<„?•° € ­ÿÿÿÜ € „,„,„CŸ,„Co €»„ €”ƒRƒM=•£ÿÿÚš; €° €­ÿÿò„ €”‚„¿€=•4 €„,„,„CŸ,„Co €»„ €ä € €— €™DSPFONT = OLDDSPFONT €¥ÿÿðu €¤X ;‚ðƒU €“‚ðŠ3!„?€;; €”‚ð„@„^?‚ð„@„?€^?&‚ð„@„@^?&‚ð„@„@@^?&‚ð„@„@€^?&•¾ €™,******************************************** €“ƒU‹¡$Š¸‹"‹ #Š˜;;;;;;;;,…$;; € ”Š´‹"‹ #Š¶„?€;;;;;;,…:;;„>• €!“ƒ‹¡$Š¸‹"‹ #Š¶„?€;;;;;;;;Š´‹"‹ #Š¶„?€;;;;;;,…:;;-,…$;; €"– €#“ƒÂ…# €$— €%™NLEN.AFTER.POINT1$ = STRING$(LEN(STR$(INTERVAL))-INSTR(STR$(INTERVAL),"."),"#") €&™.********************************************** €'”Š´‹ #Šµ;;;;,…:;;„?•“ƒƒU…:+ƒÂ+ €(”Š´‹ #Šµ;;;;,…:;;„=• “ƒƒU €)™.********************************************** €+— €,¥ÿÿü± €/¤œ;‚ñƒV €0“‚„@@ €1“‚ñŠ3!„?€;; €2”‚ñ„=•A €3™,******************************************** €4“ƒV‹¡$Š¸‹"‹ #Š™„?€;;;;;;;;,…$;; €6”Š´‹"‹ #Š¶„?€;;;;;;,…:;;„>• €7“ƒ‹¡$Š¸‹"‹ #Š¶„?€;;;;;;;;Š´‹"‹ #Š¶„?€;;;;;;,…:;;-,…$;; €8– €9“ƒÂ…# €:— €;™.********************************************** €<”Š´‹ #Š¶„?€;;;;,…:;;„?•“ƒƒV…:+ƒÂ+ €=”Š´‹ #Š¶„?€;;;;,…:;;„=• “ƒƒV €>™.********************************************** €?™+UN-USUAL BUT FORMAT WILL BE FIXED: XXXX.X G €@™WEIGHT.FORMAT2$ = "####.#" €A™,DON'T FORGET FOR SCALE 2 VALUES x 1000 !!!!! €B™6BADCODE.FORMAT$ = LEN.BEFORE.POINT1$+LEN.AFTER.POINT1$ €C— €D¥ÿÿüm €G¤õ.ƒW‚ò;‚ó‚ô €H™ LOCATE 00,52 €I‘„A ,„B  €J’‹Ÿ"„AÀ;; €K™ LOCATE 00,52 €L‘„A ,„B  €M’…À;ƒW;… €NÂ…Å,#„AP,ƒW,‚ò €OÆ#„AP,‚ò‡ƒc €P“‚󊺄AP;;‚ò/ €QÂ…k›‡#„?€ €R’#„?€,ƒW,‚ò,‚ó;… ,‹ „AP;; €S£ÿÿÕ¿„?;, €TÃ#„?€ €U“‚ô„?€ €V¬ €W™FOR RECNO.PR=1 TO RECCOUNT.PR €XÄ#„AP,‚ô €YÂ…k›‡#„?€ €Z’#„?€,ƒc,‹ „AP;; €[£ÿÿÕ$„?;, €\Ã#„?€ €]”‚ó„>•W €^™ LOCATE 00,58 €_‘„A ,„BÈ €`½…%;Š·‚ô‚ó/„BÈ*;;;…& €a— €b™NEXT X €c“‚ô‚ô„?€+ €d”‚ô‚ó>•° €e­ÿÿþÅ €fÃ#„AP €g‘„,„BP €h’‹Ÿ"„AÀ;; €i‘„,„Bh €j’‹Ÿ"„AÀ;; €k¥ÿÿý €n¤šH;‚öƒ[ƒYƒXƒ\‚õ‚÷ƒZ €o”‹"‹% ƒñ;;;;…ó=‹"‹% ƒð;;;;…ó=&•þ €p“‚ö„¿€ €q™&RESTORE DATE OF INSTALLATION FROM FILE €r“ƒ[…[‹"‹ #‚];;;;+…=+ €sÂ…Å,#„Ap,ƒ[,„A €tÆ#„Ap,„A ‡ƒY €u”Šº„Ap;;„=•â €v™ FIRST RUN €w“ƒX‹#‹ ;;,„@€,„@;;…8+‹#‹ ;;,„?€,„@;;+…8+‹#‹ ;;,„@à,„@€;;+ €xǃY‹Ÿ"„A ;; €yǃYƒX €z“ƒ\ƒY €{Å#„Ap,„?€ €|–: €}™ USUAL CHECK €~Ä#„Ap,„?€ €“ƒ\ƒY €€— €Ã#„Ap €‚™CHECK IF PERIOD EXPIRED OR NOT €ƒ“ƒX‹#‹ ;;,„@€,„@;;…8+‹#‹ ;;,„?€,„@;;+…8+‹#‹ ;;,„@à,„@€;;+ €„£ÿÿÑqƒX;ƒX €…“‚õ‚ €†£ÿÿÑNƒ\;ƒ\ €‡“‚÷‚ €ˆ”Š–‚õ‚÷-;;„A`>•û €‰„,„,„CŸ€,„Co €Š»„ €‹“ƒZ… €Œ£6ƒZ,„Að,‚,„?€,…e;ƒZ,‚,, €“ƒZ… €Ž£óƒZ,„BH,‚,„?€,…e;ƒZ,‚,, €“ƒZ… €£°ƒZ,„BŒ,‚,„?€,…e;ƒZ,‚,, €‘“‚<„ €’»„@À,…Œ,…Î €“»„@à,…,…# €”»„A,…Ž,…# €•»„A,…,… €–¬ €—”‚<„?•° €˜­ÿÿÿÜ €™”‚<„A=•. €š„,„,„CŸ€,„Co €›ä €œ €˜6”‚<„@À=•$ €ž£ÿÿá „@€;, €Ÿ“‚<„ € — €¡— €¢– €£“‚ö„ €¤— €¥¥ÿÿúo €§¤G ƒ]; €¨Â…k›‡#„A@ €©’#„A@,ƒ] €ªÃ#„A@ €«¥ÿÿÿ €®¤60/ƒ_‚ý‚û‚üƒ^;‚ø‚ù‚ú €¯™SAVE OLD SETTINGS €°“‚ø‚ €±™OLD.T = TEXTSIZE €²“‚ù‚ €³“‚ú‚ €´“‚‚û €µ”ƒ^…e=•!“ƒ_‹"‹% ƒ_;;;; €¶ì‚ü €·”ƒ^…e=•(“‚„C ŠŸ ƒ_;;‚ü*„@/- €¸”ƒ^…™=• “‚„A  €¹”ƒ^…œ=• “‚„@à €º”ƒ^…Å=•"“‚„C ŠŸ ƒ_;;‚ü*- €»”‚„<• “‚„ €¼“‚‚ý €½‘‚,‚ €¾’ƒ_ €¿™ RESTORE ALL €À“‚‚ø €Áì„?€ €“‚‚ù €Ó‚‚ú €Ä¥ÿÿýÓ €Æ: €Ç„,„,„CŸ€,„Co €È“ƒÃ…3 €É£ÿÿýˆƒÃ,„BŒ,‚,„?€,…e;ƒÃ,‚,, €Ê“ƒÃ…€‹ #Š ;;;;+ €Ë£ÿÿý.ƒÃ,„B´,‚,„?€,…e;ƒÃ,‚,, €Ì“ƒÃ…›‹ #Šœ;;;;+ €Í£ÿÿüÔƒÃ,„BÜ,‚,„?€,…e;ƒÃ,‚,, €Ï»„@ ,…‹,…N €л„A ,……,…Ñ €Ñ“‚<„ €Ò¬ €Ó”Š·Š5&;;„@/;;Š5&;;„@/-„=•L €Ô“ƒÃ…3 €Õ£ÿÿüƒÃ,„Bp,‚,„?€,…e;ƒÃ,‚,, €Ö–" €ׄ@,„Bp,„Cž€,„Bª €Ø— €Ù­ÿÿÿK®‚<„? €Ú„,„,„A˜,„@@ €Û”‚<„A =• €Üä €Ý €Þ— €ß“‚<„ €ໄ@ ,…#,…# €ỄA ,…#,…# €⢠€å™-SUPPORT FOR UDP SERVER INSERTED IN 03-11-2004 €æ™---------------------------------------------- €è¤½5; €é™LUDP NETWORK **************************************************************** €ê™ADECLARATION FOR NETWORK ***************************************** €ëàƒÊ‚`‚a €ìàƒ¹ €íàƒº €î™ €ïàƒV €ðàƒÑ €ñà‚@ €òàƒMƒ¨ƒµ €óŸƒÓ,„@€ €ôàƒÓ„@€‚ €õ™PLACE1 FOR DIRECT CONNECT €ö™4VARIABLES FOR TRUE SIMULATION VIA FILE TO PC SERVER; €÷™777 => PC BUFFER.777; €ø™ PC => 777 BUFFER.PC; €ùà ƒ¾ƒ¶ €ú™*PACKET STATUS, FILE PACKET.PC, 1 CHAR: Y/N €ûà ƒ_ƒÏ €ü™ €ýà‚e €þ™O******************************************************************************* € ¥ÿÿýL € ™K*************************************************************************** € ¤`-‚;ƒeƒd € ”‚„=•= € Â…Å,#‚`,…«,‚a € Æ#‚`,‚a‡ƒÊ € ˜í”‚„?€=•g € “ƒe…J € “ƒd…jƒe+…7+ € Â…Å,#‚`,ƒd,‚a € Æ#‚`,‚a‡ƒÊ € ˜u”‚„@=•c € “ƒe…J € “ƒd…lƒe+…7+ € Â…Å,#‚`,ƒd,‚a € Æ#‚`,‚a‡ƒÊ € — € ¥ÿÿþ© € ¤ ; € Ã#‚` € ¥ÿÿÿë € ¤‡ƒf;‚ € àƒõƒúƒûƒü € àƒóƒ÷ƒþƒÿ € àƒôƒýƒùƒø € à ƒöƒò € ™#PORT OPENED AND DATA IN NET.BUFFER$ € !“ƒõ…# € "“ƒó…# € #“ƒú…# € $“ƒ÷…# € %“ƒþ…# € &“ƒû…# € '“ƒü…# € (“ƒÿ…# € )“ƒö…# € *“ƒò…# € ,“ƒõ‰÷…‚;,; € -“ƒó‰Ü…q;,; € .“ƒú‰Á…¿;,; € /“ƒ÷‰¦…;,; € 0“ƒþ‰‹…ç;,; € 1“ƒû‰p…Á;,; € 2“ƒü‰U…Æ;,; € 3“ƒÿ‰:…í;,; € 4“ƒô‰…t;,; € 5“ƒý‰…æ;,; € 6“ƒù‰é…ª;,; € 7“ƒø‰Î…©;,; € 8“ƒö‰³…ƒ;,; € 9“ƒò‰˜…a;,; € ;”‹"‹% ƒõ;;;;…#?Š¸ƒó;;„>&ƒþ…Å=&•7 € <”ƒ÷…·=•B € =Â…Å,#„A,ƒõ,Š¸ƒó;; € >Ã#„A € ?˃õ € @— € AÂ…Å,#„A,ƒõ,Š¸ƒó;; € BÆ#„A,Š¸ƒó;;‡ƒV € C“‚Šº„A;;Š¸ƒó;;/ € D“‚‚„?€+ € EǃV‹Ÿ"Š¸ƒó;;;; € FǃVƒó € GÅ#„A,‚ € HÃ#„A € I”ƒf…û=•b € J‘„,„ € K½…;… € L‘„,„ € M½…;…ž;ƒõ;Š7'ƒú;;;…& € N— € O”ƒü…#?•K € P”ƒú…C?• £(m…ð;, € Q”ƒú…C=• £(L…ã;, € R–' € S”ƒú…C=• £("…ã;, € T— € U˜@”‹"‹% ƒõ;;;;…#?ƒþ…×=&•K € V™SEND FILE TO PC € W£øƒõ,…û;ƒõ, € X“ƒú…C € Y˜Â”‹"‹% ƒõ;;;;…#=ƒþ…e=&•Ž € Z™8COMMAND ARRIVED, JUST EXECUTE, BUT SET TAG.PRGR$ = "100" € [™0TO USE THE SAME EXIT LIKE 100% OF FILE ACCEPTED! € \“ƒú…C € ]— € ^¥ÿÿù‚ € a¤(d8ƒgƒh;‚ƒnƒkƒlƒjƒmƒi € bàƒUƒ܃» € cà‚”‚b‚•‚\ € e“ƒg‹"‹% ƒg;;;; € g£; € hÂ…Å,#„A`,ƒg,„?€ € i“‚Šº„A`;; € jÃ#„A` € l”‚„>•‚ € n™& 500 - 64 bytes reserved in ANY packet € o“‚•„CÚ € p¬ € q”‚Š·‚‚•/;;‚•*-„=• € r“‚Q‚• € s°V € t— € u“‚•‚•„?€- € v”‚•„?€=• € w“‚Q‚• € x° € y— € z­ÿÿÿ` € {“‚\‚‚Q/ € |™CREATE TAGS IN A PACKET € }“ƒn…ë € ~“ƒk‰ }…‚,‹"‹% ƒg;;;;;,,; € “‚”„?€ € €“‚b„@@ € “‚•„?€ € ‚¬ € ƒ”ƒh…û=•3£ÿÿìä‹Ÿ"„Bp;;,„C*,„@€,„?€,…e;,,,,, € …Â…Å,#„Ap,ƒg,‚Q € †Æ#„Ap,‚Q‡ƒU € ‡Ä#„Ap,‚• € ˆ“ƒ܃U € ‰Ã#„Ap € ‹™SEND TO SERVER € Œ“ƒ÷…# € ”‚•„?€=• “ƒ÷…· € Ž”‚•„?€>• “ƒ÷…Y € “ƒl…‘ƒ÷+ € “ƒj‰ñ…q,ƒÜ;,ƒÜ; € ’™CALCULATE PRGR VALUE € “”‚\„>•T € ”“ƒm‰™…¿,‹"‹ #Š·‚•‚\/„BÈ*;;;;;;;,,; € •— € –“ƒiƒnƒk+ƒl+ƒm+ƒj+ € —£Óƒi;ƒi € ™”ƒh…û=•N € š‘„,„ € ›½…;…Ý;ƒg;Š·‚•‚\/„BÈ*;;;…& € œ— € ž”‚@„=•p € Ÿ™READ TAG.PRPL$ €  £; € ¡”ƒû…¦=• € ¢“ƒi…¾‹"‹ #‚•;;;;+…+‹"‹ #‚”;;;;+ € £“‚•‚•„?€- € ¤“‚”‚”„?€+ € ¥”ƒh…û=•E € ¦£ÿÿ鲃i,„C*,„@€,„?€,…e;ƒi,,,, € §£ÿÿ·Ž„?€;, € ¨— € ©”‚”‚b>• € ª“‚„ÂÈ € «°5 € ¬— € ­˜&”ƒû…û=• € ®“‚”„ € ¯— € °–Á € ±“ƒi…¨‹"‹ #‚@;;;;+ € ²”ƒh…û=•E € ³£ÿÿèăi,„C*,„@€,„?€,…e;ƒi,,,, € ´£ÿÿ¶ „@;, € µ— € ¶“‚„ÂÊ € ·“‚@„@ € ¸“‚<„BÆ € ¹°> € º— € »“‚•‚•„?€+ € ¼”‚•‚\>•° € ½­ÿÿû € ¾˜§”‚„=•• € ¿™CREATE TAGS IN A PACKET € À“ƒn…é € Á“ƒk‰á…‚,‹"‹% ƒg;;;;;,,; € “ƒiƒnƒk+ € ãIƒi;ƒi € Ä— € Å € Æ¥ÿÿ÷á € ɤ‡d6ƒpƒoƒq;‚ƒvƒsƒuƒtƒr € ʬ € Ë™+CHECK IF IT IS "INGRDTS.DAT" OR "RLIST.DAT" € Ì™IF SO CHECK CACHE € Í”ƒp…—=ƒp…Ó=|•A € Δˆ©Xƒp;ƒp;• € Ï“‚@„ € аœ € Ñ— € Ò— € Ó“‚„ € Ô£f; € Õ™CREATE TAGS IN A PACKET € Ö“ƒv…ì € דƒs‰0…‚,‹"‹% ƒp;;;;;,,; € Ø“ƒu…È € Ù”‹"‹% ƒo;;;;…#?•/ € Ú“ƒt‰¾…¯,ƒo;,ƒo; € Û– € Ü“ƒt…# € Ý— € Þ“ƒrƒvƒs+ƒt+ƒu+ € ࣃr;ƒr € á™)READ SERVER REPLY - CHECK NET.ERROR AFTER € â£9…Ÿ,ƒq;,ƒq € ã° € ä­ÿÿý½ € å¥ÿÿý‚ € è¦åƒ;‚§ € 锊´ƒÊ,ƒ;;„=• € ꓃…# € ë–‹ € ì“‚§Š7'‹#ƒÊ,Š´ƒÊ,ƒ;;„@ +,„@@;;;; € 퓃‹#ƒÊ,Š´ƒÊ,ƒ;;„A+,‚§;; € î— € ï§ÿÿÿ$ € ò¦£ƒƒ; € ó™$TXT1,'"1234567" -> "TXT1,007:1234567 € ô“ƒƒ‹$…A‹"‹ #Š¸ƒ;;;;;;+,„@@;;+…M+ƒ+ € õ§ÿÿÿf € ø¤@=ƒw;‚ € ù”‚d~•L € úǃʃÔƒw+‹Ÿ"‚a„@-Š¸ƒw;;-;;+ƒA+ € û–! € üǃʃÔƒw+ƒA+ € ý— € þ™PLACE 3 FOR DIRECT CONNECT € ÿ”ƒ¾…ß?•Ð € ”‚d~• € Å#‚` € –¤ € £ÿÿëû; € “‚‚a € “‚aŠ¸ƒÔƒw+ƒA+;; € £ÿÿêT„@;, € ǃʃÔƒw+ƒA+ € Å#‚` € £ÿÿë†; € “‚a‚ € £ÿÿê„@;, € — € ˜ ”ƒ¾…ß=•Ž € Â…Å,#„A,…b,‚a € Æ#„A,‚a‡ƒ¶ € ǃ¶‹Ÿ"‚a;; € ǃ¶ƒÊ € Å#„A,„?€ € Ã#„A € £ÿÿ¯ „?€;, € — € ¥ÿÿýÉ € ¤ß ;‚‚ € ™PLACE 4 FOR DIRECT CONNECT € ”ƒ¾…ß?•- € “‚‚a € “‚Š¹‚`;; € ”‚„>•æ € £ÿÿê; € “‚a„?€ € !£ÿÿ蔄@;, € "»„@à,…,… € #“‚<„ € $¬ € %”Š¹‚`;;„>• € &Ä#‚` € '– € (°) € )— € *”‚<„?•° € +­ÿÿÿš € ,£ÿÿé]; € -“‚a‚ € .£ÿÿçÜ„@;, € /— € 0˜H”ƒ¾…ß=•6 € 1”Š¸‹ …c;;;;„>•Ë…c € 2— € 3»„@à,…#,…# € 4¥ÿÿþ* € 7¤ë?;‚ € 8»„ € 9 € :”‚@„?€=•E € ;£ÿÿÞ¾…~,„,„@€,„?€,…e;,,,,, € <£ÿÿ¬ž„?€;, € =˜©”‚@„@=•E € >£ÿÿÞh…},„,„@€,„?€,…e;,,,,, € ?£ÿÿ¬H„?€;, € @˜S”‚@„@@=•A € A£ÿÿÞ…,„,„@€,„?€,…e;,,,,, € B£ÿÿ«ò„?€;, € C— € D”‚@„?‚e&•§ € E»„@ ,…‹,… € F»„A,…,…ÿ € G“‚<„ € H“‚„ € I¬ € J­ÿÿÿö®‚<„? € K»„ € L € M”‚<„@ =• “‚„¿€ € N“‚<„ € O— € P¥ÿÿþ € S¤FH;ƒy‚ ‚ ‚ ƒxƒzƒ{ƒ| € T™.SEARCH FOR SERVER AND SYNCRONIZE DATE AND TIME € U™&GETS ALSO WORKSTATION NAME FROM SERVER € V™WORKSTATION.NAME$ € W™FLUSH DATE TIME FILE FIRST € Xàƒƒ‚$ € Y¬ € Z»„ € [„,„,„CŸ€,„Co € \“ƒy…# € ]£ÿÿôƒ…z,ƒy,…û;,ƒy, € ^“‚ „ € _“‚ „ € `”ƒô…#?ƒý…#?&ƒù…#?&•! € a“‚<„ € b“ƒ‹"‹% ƒù;;;; € c“ƒ‹"‹% ƒø;;;; € d“ƒÖ‹"‹% ƒ;;;; € e“‚$„¿€ € f„,„,„CŸ€,„Co € g»„A,…,…ÿ € h£ÿÿÚ«…¼,„Að,„@€,„?€,…e;,,,,, € i™(NOTE THAT DATE ALREADY IN AMERICAN STYLE € j”‹ ;;ƒô?•I € k”Š7'‹#ƒô,„?€,„@;;;;„>Š7'‹#ƒô,„?€,„@;;;;„AP<&Š7'‹#ƒô,„@€,„@;;;;„>Š7'‹#ƒô,„@€,„@;;;;„Aø<&&Š7'‹#ƒô,„@à,„@€;;;;„Dú>Š7'‹#ƒô,„@à,„@€;;;;„E;€<&&• € l׃ô € m– € n“‚ „¿€ € o— € p— € q”‹¢%;;ƒý?•I € r”Š7'‹#ƒý,„?€,„@;;;;„]Š7'‹#ƒý,„?€,„@;;;;„AÀ<&Š7'‹#ƒý,„@€,„@;;;;„]Š7'‹#ƒý,„@€,„@;;;;„Bp<&&Š7'‹#ƒý,„@à,„@;;;;„]Š7'‹#ƒý,„@à,„@;;;;„Bp<&&• € sÖƒý € t– € u“‚ „¿€ € v— € w— € x“‚ Š5&;; € y¬ € z“ƒx‹#‹ ;;,„@€,„@;;…8+‹#‹ ;;,„?€,„@;;+…8+‹#‹ ;;,„A,„@;;+ € {“ƒz… ƒx+…+ € |£ÿÿÖÓƒz,„Bp,„@€,„?€,…e;ƒz,,,, € }“ƒ{…‹¢%;;+…+ € ~£ÿÿÖ‚ƒ{,„B´,„@€,„?€,…e;ƒ{,,,, € £ÿÿÖR…r,„Bð,„@€,„?€,…e;,,,,, € €“ƒ|…ùƒ+ € £ÿÿÖƒ|,„C,„@€,„?€,…e;ƒ|,,,, € ‚“ƒ|…øƒ+ € ƒ£ÿÿÕ̃|,„C4,„@€,„?€,…e;ƒ|,,,, € „”Š5&;;‚ -„@@>• “‚<„A € …­ÿÿýú®‚<„? € †°] € ‡–B € ˆ“ƒ…­ € ‰“ƒƒà € Š“ƒÖƒà € ‹“‚$„ € Œ— € ° € Ž­ÿÿøé € »„ € „,„,„CŸ€,„Co € ‘“‚<„ € ’¥ÿÿ÷à € •¤^@2ƒ~ƒ€;‚ ‚‚ ‚ƒ}ƒ € –à‚ € —™5READS SERVER DATA - THIS IS STANDARD FOR ANY REQUESTS € ˜™WHICH 7XX EXPECTS FROM SERVER € ™™RESULT RETURNS IN NET.ERROR € š™1READMODE$ = "LOOP" - WAIT UNTIL SIGNAL OR TIMEOUT € ›™6 "THRU" - JUST CHECK IF IT IS ENOUGH DATA AND EXIT € œ”ƒ~…Ÿ=•v € „,„,„CŸ€,„A  € ž‘„,„ € Ÿ’…÷ €  »„ € ¡™KEY 9, "FMENU9", " EXIT " € ¢“‚<„ € £— € ¤“‚ „¿€ € ¥“‚Š5&;; € ¦“‚ „A € §“‚@„ € ¨“‚ „?€ € ª™PLACE 5 FOR DIRECT CONNECT € «”ƒ¾…ß?•¼ € ¬“‚ „ € ­¬ € ¯”‚:• € °“‚Š5&;;‚;- € ±“ƒ}‹$…@‹"‹ #Š·‚„Bp/;;;;;;+,„@;; € ²“ƒ‹$…@‹"‹ #‚Š·‚„Bp/;;„Bp*-;;;;+,„@;; € ³‘„,„Bp € ´½…;…|;ƒ};…M;ƒ € µ‘„,„B´ € ¶½…;…d;‚9 € ·— € ¹”Š¹‚`;;‚a„?€->•Ä € º“‚Š5&;; € »“‚ „¿€ € ¼Ä#‚` € ½”‚:•“‚9‚9‚a+ € ¾£ÿÿÚ’ƒ€;ƒ€ € ¿”ƒú…C=ƒú…#=|•; € À“‚ „¿€ € Á“‚@„ € “‚<„BÆ € ð“ € Ä— € Å— € Ç”‚<„?•, € È“‚R„ € É“‚@„@@ € Ê°M € Ë— € Í”Š5&;;‚-„@ >• € Γ‚@„@ € Ï° € З € Ò­ÿÿý` € Ô˜”ƒ¾…ß=• € Õ¬ € Ö”‚:• € ד‚Š5&;;‚;- € Ø“ƒ}‹$…@‹"‹ #Š·‚„Bp/;;;;;;+,„@;; € Ù“ƒ‹$…@‹"‹ #‚Š·‚„Bp/;;„Bp*-;;;;+,„@;; € Ú‘„,„Bp € Û½…;…|;ƒ};…M;ƒ € Ü‘„,„B´ € ݽ…;…d;‚9 € Þ— € à”Š¸‹ …c;;;;„B =•" € â“‚Š5&;; € ã“‚ „¿€ € äÂ…Å,#„A,…c,‚a € åÆ#„A,‚a‡ƒ¶ € æÄ#„A,„?€ € çǃʃ¶ € èÃ#„A € éË…c € ꔂ:•“‚9‚9‚a+ € ë£ÿÿ×qƒ€;ƒ€ € 씃ú…C=ƒú…#=|•; € í“‚ „¿€ € î“‚@„ € ï“‚<„BÆ € ð°“ € ñ— € ò— € ô”‚<„?•, € õ“‚R„ € ö“‚@„@@ € ÷°M € ø— € ú”Š5&;;‚-„@ >• € û“‚@„@ € ü° € ý— € ÿ­ÿÿüý € — € ”‚@„?ƒ~…ä?&•£ÿÿíg; € ¥ÿÿ÷« € ™??? € ¤t0;‚ € “‚Š5&;; € “ƒÏ…# € “‚<„ € »„ € ™KEY 7, "FMENU7", "EXIT" € ¬ € ”ƒ¾…ß?•c € ”Š¹‚`;;‚a„?€->•4 € Ä#‚` € “ƒωÿÿ清Á;,; € °‘ € — € –ì € ”Š¸‹ …c;;;;„B =•» € Â…Å,#„A,…c,‚a € Æ#„A,‚a‡ƒ¶ € Ä#„A,„?€ € ǃʃ¶ € Ã#„A € Ë…c € ™OIF LOADING.SHOW THEN LOADING.BYTES = LOADING.BYTES + REMOTE.NETWORK.BUFFER.SIZE € “ƒωÿÿåš…Á;,; € !™#CALL ANALYZE.BUFFER.NET(SHOW.TEXT$) € "™)IF TAG.PRGR$ = "100" OR TAG.PRGR$="" THEN € #™ CLEAR.NET.BUFFER.TIMER = -1 € $™ NET.ERROR = 0 € %™ MAINMENU = 99 € &™ EXIT DO € '™END IF € (°¢ € )— € *— € ,”Š5&;;‚-„@ >•, € -“ƒÏ…¦ € .“‚@„@ € /°P € 0— € 1”‚<„?•, € 2“ƒÏ…¦ € 3“‚@„@@ € 4° € 5— € 6­ÿÿý € 7¥ÿÿü• € 8™??? € ;¤tX;ƒƒ;ƒ…‚ƒˆƒ‡ƒ‚ƒ†ƒ„ € <”ƒƒ…ã=•, € =“ƒ…… € >£ÿÿå3ƒ…;ƒ… € ?˜ù”ƒƒ…ð=•ç € @™1NEED TO REQUEST FROM SERVER NEXT RCRD (TAG.RCRD$) € A™FILE NAME,DATA WINDOW € B™FILE MODE FOR SERVER € C“‚Š7'ƒü;; € D“‚‚„?€+ € E“ƒü‹"‹ #‚;;;; € F“ƒˆ…ì € G™ FILE NAME € H“ƒ‡…‚‹¡$„@@Š¸‹"‹% ‹ #Š¸ƒõ;;;;;;;;;;-,…?;;+‹"‹% ‹ #Š¸ƒõ;;;;;;;;+…M+‹"‹% ƒõ;;;;+ € I™'IS USED JUST TO SHOW PACKET WINDOW SIZE € J“ƒ‚‹¡$„@@Š¸‹"‹ #Š¸ƒó;;;;;;;;-,…?;;‹"‹ #Š¸ƒó;;;;;;+ € K“ƒ†…qƒ‚+…M+‹Ÿ"Š¸ƒó;;;;+ € L“ƒ„…Ç‹$…Aƒü+,„@@;;+ € M“ƒ…ƒˆƒ‡+ƒ„+ƒ†+ € N£ÿÿâ7ƒ…;ƒ… € O— € P¥ÿÿü• € S¤»K;‚ € T»„A,…,… € U“‚<„ € V“‚„ € W¬ € X­ÿÿÿö®‚<„? € Y”‚<„A=• “‚„¿€ € Z“‚<„ € [„,„,„CŸ€,„Co € \»„ € ]¥ÿÿÿN € `¤Ù1; € aàƒaƒáƒ`ƒà € b™LOAD T.PLATFORM.TYPE € cÂ…Å,#„Ap,…Ô,„@  € dÆ#„Ap,„@@‡ƒa,„@‡ƒ` € e”Šº„Ap;;„@ ?•½ € fÃ#„Ap € gË…Ô € hÂ…Å,#„Ap,…Ô,„@  € iÆ#„Ap,„@@‡ƒa,„@‡ƒ` € jǃa‹Ÿ"„@@;; € kǃa…½ € lǃ`‹Ÿ"„@;; € mǃ`…B € nÅ#„Ap,„?€ € o— € pÄ#„Ap,„?€ € q“ƒá‹"‹% ƒa;;;; € r“ƒà‹"‹% ƒ`;;;; € sÃ#„Ap € t™ € u¥ÿÿþ0 € x¤ÞN; € y™SAVE T.PLATFORM.TYPE € zÂ…Å,#„Ap,…Ô,„@  € {Æ#„Ap,„@@‡ƒa,„@‡ƒ` € |ǃa‹Ÿ"„@@;; € }ǃaƒá € ~ǃ`‹Ÿ"„@;; € ǃ`ƒà € €Å#„Ap,„?€ € Ã#„Ap € ‚¥ÿÿÿ+ € …¤™*;ƒ‰‚ € †™DELAYS REMOVED TO TEST € ‡™9LOADS FILE BPLANPC{ID}.788 FROM PC AND ALL NEEDED RECIPES € ˆ„,„,„CŸ€,„Co € ‰“ƒ‰…`ƒÖ+…;+ € Š£ÿÿÙ°ƒ‰,…#,…û;ƒ‰,, € Œ”ƒò…#=•• € Ž™ CALL DELAY(1) € £ÿÿr4„@ ;, € “‚NŠº„@ ;;‚4/ € ‘£ÿÿx€„@ ;, € ’”‚N„>‚@„=&• € “£ÿÿqÓ„@ ;, € ”“‚„?€ € •¬ € –‘„,„Að € —½…;…y;Š·‚‚N/„BÈ*;;;…& € ˜Ä#„@ ,‚ € ™£ÿÿy÷„@ ;, € š£ÿÿØzƒì,…#,…û;ƒì,, € ›™ CALL DELAY(1) € œ“‚‚„?€+ € ”‚‚N>‚@„?|•° € ž­ÿÿÿ € Ÿ£ÿÿwK„@ ;, €  — € ¢— € ¤™CLS 0,30,319,40 € ¥¥ÿÿýp € ¨¤K|E‚ƒŽ;ƒƒ‹‚ƒƒŠ‚‚‚‚‚‚‚‚‚ƒŒ‚ ‚ € ©à‚S‚T‚U‚V‚W € ª™,USE WITH FILE 1,2,4 WITH OPTIONS 'R','L','D' € «“ƒ…Q € ¬“ƒ‹…Þ € ­“‚‚ € ®“‚R„ € ¯“ƒ…# € °“ƒŠ… € ±™CALL EMPTYVRBLFILE(FNUMBER) € ²£ÿÿoN‚;‚ € ³“‚Šº‚;;‚)/ € ´“‚„?€ € µ“‚„@€ € ¶“‚„@ € ·ì„?€ € ¸“‚„?€ € ¹“‚„?€ € º“‚„ € »„,„,„CŸ€,„Co € ¼»„ € ½“‚&„?€ € ¾“‚„?€ € À”‚„@=•­ € Á“‚„ € ›e‚„?€œ‚6‚‚4„?€ € ÔƒÁ‚;…x=•“‚‚„?€+ € ÄžÿÿÿÌ‚‚6‚4 € Å”‚‚=‚„>&• “‚O„¿€ € Æ— € Ȭ € É„,„,„CŸ€,„Co € Ê™HARDWARE$ = "SW" € Ë”ƒ¾…ß=•»„Ap,…m,…# € Ì”ƒ¾…L=•»„A€,…m,…# € Í™HARDWARE$ = "788" € Ï»„?€,…#,…# € л„@,…#,…# € Ñ»„@@,…#,…# € Ò»„@€,…#,…# € Ó»„@ ,…#,…# € Ô”‚„@@=‚„@=|•»„@à,…,… € Öµ„,„B$,„CŸ€,„B$ € Ø™ € Ù™.IF FNUMBER = 3 THEN LINE1$ = "ADD TO 788 PLAN" € Ú”‚„@€=•\ € Û“ƒŒ…Kƒ+…6+ƒ+….+ € Ü£ÿÿºXƒŒ,„A ,„@€,„?€,…e;ƒŒ,,,, € Ý— € Þ”‚„@ =•\ € ß“ƒŒ…ºƒ+…6+ƒ+….+ € à£ÿÿ¹çƒŒ,„A ,„@€,„?€,…e;ƒŒ,,,, € á— € â“‚‚‚+ € ã“‚ „?€ € ä“‚‚ € å¬ € 攊º‚;;„?•š € çÄ#‚,‚ € è£ÿÿsb‚;‚ € ꔂ„@=•à € ë™CALL DEBUG(T.INGRCODE$) € ì£&a„?€,ƒÝ,‹ „CI;;;,ƒÝ, € 픂X„>•F € î£ÿÿj;„?€;, € ïÄ#„?€,‚X € ð£ÿÿr¶„?€;, € ñ£ÿÿp†„?€;, € ò— € ó™CALL DEBUG(STR$(RECORDFOUND1)) € ô“‚„@ € õì„@ € ö‘„Aˆ,„Ap„B‚ *+ € ÷”‚X„>•’ƒß € ø”‚X„=•’…® € ù‘„C„€,„Ap„B‚ *+ € ú’ƒÁ‚; € ûì„?€ € ü“‚„?€ € ý‘„Aˆ,„B „B‚ *+ € þ’ƒÝ € ÿ“‚ ‚ „?€+ € ˜•”‚„@@=ƒÒ…§=&•œ € “‚„@ € ì„@ € ‘„Aˆ,„Ap„B‚ *+ € ’ƒí € ì„?€ € “‚„?€ € ‘„Aˆ,„B „B‚ *+ € ’ƒâ € “‚ ‚ „?€+ € ˜Ü”‚„@@=ƒÒ…i=&•œ € “‚„@ € ì„@ € ‘„Aˆ,„Ap„B‚ *+ € ’ƒâ € ì„?€ € “‚„?€ € ‘„Aˆ,„B „B‚ *+ € ’ƒí € “‚ ‚ „?€+ € ˜#”‚„@€=• € “‚„@ € ì„@ € ‘„Aˆ,„Ap„B‚ *+ € ’‹#ƒî,„?€,„A ;; € ”‚}‚€<•+ € ‘„C„€,„Ap„B‚ *+ € !’…x € "— € #ì„?€ € $“‚„?€ € %‘„Aˆ,„B „B‚ *+ € &”‹$‹ #‚};;,„?€;;…B=‚}„A0?&•p € '’ƒã;…;‹$…‹"‹ #‚};;;;+,„@@;;;…;…;ƒå;…;‚€„?€- € (–m € )’ƒã;…;‹$…‹"‹ #‚};;;;+,„@@;;;…;…;ƒå;…;‚€„?€- € *— € +“‚ ‚ „?€+ € -˜”‚„@ =•þ € /“‚„@ € 0ì„@ € 1‘„Aˆ,„Ap„B‚ *+ € 2’‹#ƒï,„?€,„A ;; € 3”‚~‚<•+ € 4‘„C„€,„Ap„B‚ *+ € 5’…x € 6— € 7ì„?€ € 8“‚„?€ € 9‘„Aˆ,„B „B‚ *+ € :”‹$‹ #‚~;;,„?€;;…B=‚~„A0?&•p € ;’ƒä;…;‹$…‹"‹ #‚~;;;;+,„@@;;;…;…;ƒæ;…;‚„?€- € <–m € =’ƒä;…;‹$…‹"‹ #‚~;;;;+,„@@;;;…;…;ƒæ;…;‚„?€- € >— € ?“‚ ‚ „?€+ € A— € C–u € D“ƒŒ…2 € E£ÿÿ±±ƒŒ,„C>,‚,„?€,…e;ƒŒ,‚,, € F»„A,…#,…# € G»„A,…#,…# € H— € J”Š›‚;;„¿€=•°9 € K“‚‚„?€+ € L”‚‚>•° € M­ÿÿ÷t € O”‚„@@?‚„@?&•»„@À,…Œ,…¢ € P”‚‚>•»„A,…Ž,…O € Q”‚‚]•»„A,…#,…# € R”‚‚<•»„A,…,…¥ € S”‚„?€=•»„A,…#,…# € T“‚<„ € Uµ„?€,„CY,„CŸ,„CY € V”ƒŽ…Å=•4 € W”‚‚>• € X»„?€,…#,…# € Y–8 € Z”Šº‚;;„?•»„?€,…„,…P € [— € \”‚„?€+‚>• € ]»„@,…#,…# € ^–8 € _”Šº‚;;„?•»„@,…ˆ,…P € `— € a”‚„@+‚>• € b»„@@,…#,…# € c–8 € d”Šº‚;;„?•»„@@,…‰,…P € e— € f”‚„@@+‚>• € g»„@€,…#,…# € h–8 € i”Šº‚;;„?•»„@€,…Š,…P € j— € k”‚„@€+‚>• € l»„@ ,…#,…# € m–8 € n”Šº‚;;„?•»„@ ,…‹,…P € o— € p— € r´„,„,„CŸ€,„Co,„ € t“‚„@ € uì„@ € v‘„Aˆ,„@  € w’ƒ € y¬ € z”‚„@@=•³ € {”Š5&;;„@/Š·Š5&;;„@/;;-„=•: € |‘„AˆŠŸ ƒ;;+„?€+,„@  € }’… € ~–7 € ‘„AˆŠŸ ƒ;;+„?€+,„@  € €’… € — € ‚— € ƒ”‚„@?‚„@@?&•à € „”Š½„?€;;~•L € …‘„@ ,„@  € †½… ƒ+…"+;…Ø;Š¬„?€;;;…˜ € ‡–Z € ˆ‘„@ ,„@  € ‰½… …+‹¡$Š¸ƒ;;,…;;+… +;…Ø;…µ € Š— € ‹™IF NOT OVERCAP(2) THEN € Œ™ LOCATE 165,5 € ™;PRINT USING "\ \"+WEIGHT.FORMAT2$+" \\";"S2:";GROSS(2);"KG" € Ž™ELSE € ™ LOCATE 165,5 € ™LPRINT USING "\ \"+"\ "+STRING$(LEN(WEIGHT.FORMAT2$)," ")+"\";"S2:";"OVERCAP" € ‘™END IF € “— € ””‚„@=•W € •™CALL DEBUG(T.RECIPENAME$) € –“ƒŒƒî…+ƒã+….+ € —£ÿÿªNƒŒ,„@,„@€,„?€,…e;ƒŒ,,,, € ˜“ƒŒ…£‹"‹ #‚;;;;+…+‹"‹ #‚|;;;;+ € ™£ÿÿ©ÑƒŒ,„A¨,„@€,„?€,…e;ƒŒ,,,, € ›™SHOW IF MIX COMPLETED € œ™.IF RECIPE.DONE AND TIMER/2-INT(TIMER/2)=0 THEN € ™ DSPFONT = 2 € ž™ TEXTSIZE = 2 € Ÿ™ LOCATE 3,222 €  ™PRINT "MIX DONE" € ¡™3ELSEIF RECIPE.DONE AND TIMER/2-INT(TIMER/2)<>0 THEN € ¢™ DSPFONT = 2 € £™ TEXTSIZE = 2 € ¤™ LOCATE 3,222 € ¥™PRINT " " € ¦™END IF € §”‚O•°+ € ¨— € ª™ € «”‚„@€=‚„@ =|•æ € ¬›Ù‚„?€œ‚6„A‚4„?€ € ­”‚‚;•‹ € ®“‚‚;„ € ¯„,„,„CŸ€,„Co € °‘„,„ € ±’…Ð;‹"‹ #‚;;;; € ²£ÿÿuw„?€;, € ³“‚<„DyÀ € ´— € µžÿÿÿX‚‚6‚4 € ¶— € ·­ÿÿùή‚<„? € ¹”‚„@@=‚<„A?&‚<„A?&‚<„?€?&‚<„@?&‚<„@@?&‚<„@€?&‚<„@ ?&•Ü € »”‚<„B‚]‚<„B´[&‚<„B=|•) € ¼“ƒƒ‹ ‚<;;+ € ½˜¥”‚<„D^=Š¸ƒ;;„>&•: € ¾“ƒ‹!ƒ,Š¸ƒ;;„?€-;; € ¿˜C”‚<„B@]‚<„Bd[&•% € À“ƒƒ‹ ‚<;;+ € Á— € ãÿÿ]«„@@;, € Ä”ƒÒ…§=•)£ò„@@,ƒ,‹ „CI;;;,ƒ, € Å”ƒÒ…i=•)£´„@@,ƒ,‹ „CJ;;;,ƒ, € Æ£ÿÿV£„@@;, € È”‚Z„>• € É“‚‚Z € Ê– € Ë“‚„?€ € Ì— € Η € Д‚<„A=•“‚‚‚-‚&- € Ñ”‚<„A=•“‚‚‚+‚&+ € Ò”‚„?€<• “‚„?€ € Ó”‚‚>• “‚‚ € Ô™ € Õ”‚<„?€=•! € Ö“‚R‚ € ×° € ؘš”‚<„@=•' € Ù“‚R‚„?€+ € Ú°Ò € Û˜b”‚<„@@=•' € Ü“‚R‚„@+ € Ý°š € Þ˜*”‚<„@€=•' € ß“‚R‚„@@+ € à°b € á˜ò”‚<„@ =•' € â“‚R‚„@€+ € ã°* € 䘺”‚<„@À=• € å° € 昗”‚<„@à=•… € ç°ä € è™6ELSEIF MAINMENU = ASC("P") OR MAINMENU = ASC("p") THEN € é™CALL PRINT.LIST(FNUMBER) € ê™BROWSEREC = 1 € ë— € ì™2IF RECALLMODE$="R" THEN RECALL.TRIGGER.MODE$ = "X" € í“‚<„ € O•° € ï­ÿÿåÊ € ð£ÿÿYò‚;‚ € ñ»„ € ò„,„,„CŸ€,„Co € ó™CALL DEBUG(STR$(MAINMENU)) € ô”‚O~•¿ € õ”‚R„>•¥ € ö”‚„?€=• “‚S‚R € ÷”‚„@=• “‚T‚R € ø”‚„@@=• “‚U‚R € ù”‚„@€=• “‚V‚R € ú”‚„@ =• “‚W‚R € û— € ü— € ý¥ÿÿá¾ € ¤ W\3;ƒ“‚!ƒƒ–‚"ƒ‘ƒ•ƒ”ƒ’ € ¬ € »„ € „,„,„CŸ€,„Co € £ÿÿ Z…ô,„A ,„@€,„?€,…e;,,,,, € ”ƒ¾…ß=•»„Ap,…m,…# € ”ƒ¾…L=•»„A€,…m,…# € »„@,…ˆ,…þ € ™KEY 3, "FMENU3", "ZERO 2" € »„@€,…Š,… € »„A0,…†,… € ™KEY 11, "FMENU11", "YES" € ™:IF T.PLATFORM.TYPE$ = "PC" THEN KEY 11, "FMENU11", "LOAD" € ”‚$~•»„@ ,…‹,…Ë…,+ € ™CIF IS.CONNECTED THEN KEY 5, "FMENU5", "RECONNECT" + "(CONNECTED)" € »„@À,…Œ,…S € ™KEY 7, "FMENU7", "INGRDTS" € »„A,…,…Ò € ™BLOG OUT ********************************************************** € “ƒ“…”‹"‹% ƒÖ;;;;+…<+ € Â…Å,#„A@,ƒ“,„BÈ € Æ#„A@,„BȇƒT € “‚!Šº„A@;;„BÈ/ € Ã#„A@ € ”‚!„>•\ € “ƒ…Û‹"‹ #‚!;;;;+…-+ € ™KEY 13,"FMENU13",KEYSTR1$ € – € !™ KEY 13,"","" € "— € #™B****************************************************************** € %™BTOTALS *********************************************************** € &“ƒ–…”‹"‹% ƒÖ;;;;+…>+ € 'Â…Å,#„A@,ƒ–,„Bh € (Æ#„A@,„Bh‡ƒT € )“‚"Šº„A@;;„Bh/ € *Ã#„A@ € +”‚"„>•\ € ,“ƒ‘…Ü‹"‹ #‚";;;;+…-+ € -™KEY 12,"FMENU12",KEYSTR2$ € .– € /™ KEY 12,"","" € 0— € 1™B****************************************************************** € 3“‚<„ € 4“‚@„ € 5µ„,„B ,„CŸ€,„B € 6“‚„@ € 7ì„@ € 8¬ € 9™ LOCATE 5,5 € :™nPRINT USING "\ \"+WEIGHT.FORMAT1$+" \\ \ \"+WEIGHT.FORMAT2$+" \\";"S1:";GROSS(1);"KG";"S2:";GROSS(2)*1000;"G " € ;‘„@ ,„@  € <½… ƒ+…"+;…Ø;Š¬„?€;;;…˜ € =­ÿÿÿ)®‚<„? € >”‚<„@=• € ?Ú„?€ € @˜ ”‚<„@@=• € AÚ„@ € B˜蔂<Š—…Ã;;=‚<Š—… ;;=|•! € C € D»„ € Eä € F € G˜””‚<„@€=•Ü € H™CREATE 788 PLAN € I“ƒá…L € J£ÿÿÖ>; € K„,„,„CŸ€,„Co € L“‚;Š5&;; € M“‚:„¿€ € N£ÿÿ±C…Ó,…#,…û;,,, € O”‚@„=•£þ; € P“‚:„ € Q”‚U„>•°¹ € R˜§”‚<„@ =•/ € S„,„,„CŸ€,„Co € T£ÿÿºô; € U˜g”‚<„@À=• € V£ÿÿn[…û;, € W˜=”‚<„A=• € X°, € Y˜”‚<„A0=•Œ € Z™ LOAD PC PLAN € [“ƒá…½ € \à‚;‚:‚9 € ]“‚;Š5&;; € ^“‚:„¿€ € _“‚9„ € `£ÿÿÕb; € a™STR1$ = "BPPC:" + TAG.BPPC$ € b™CALL DEBUG(STR1$) € c”ƒò…#=•ý € e”‚@„=•£ÿÿ¯]…—,…#,…û;,,, € f“‚:„ € g™CLEAR BPLANPCx.788 € h”‚@„=•† € i“ƒ•…ê € j™FTAG.FILE.STR$ = TEXT2TAG.NET$("FILE,",LTRIM$(RTRIM$(FILE.NAME2SEND$))) € k“ƒ”ƒ• € l£ÿÿ²ºƒ”;ƒ” € m— € o˜²”ƒò…{=•  € q € r“ƒ’…» € s£ÿÿ• ƒ’,„BÈ,„@ ,„?€,…e;ƒ’,,,, € t»„A,…,… € u“‚<„ € v¬ € w”‚<„?•° € x­ÿÿÿÜ € y»„ € {— € |° € }˜}”‚<„AP=•/ € ~„,„,„CŸ€,„Co € £ÿþê; € €˜=”‚<„A@=•+ € „,„,„CŸ€,„Co € ‚£ÿþê©; € ƒ— € „­ÿÿóü € …“‚<„ € †¥ÿÿó² € ‰¤Ã; € ŠàƒÒ € ‹¬ € Œ»„ € „,„,„CŸ€,„Co € £ÿÿ”…o,„@@,„@€,„?€,…e;,,,,, € »„@,…ˆ,…Ú € ‘»„@@,…‰,…Ù € ’»„@à,…,… € ““‚<„ € ”¬ € •­ÿÿÿö®‚<„? € –”‚<„@=•I € —“ƒÒ…§ € ˜£ÿÿÔC„@@,…Å;,, € ™”‚R„>•°Œ € š˜z”‚<„@@=•I € ›“ƒÒ…i € œ£ÿÿÓé„@@,…Å;,, € ”‚R„>•°2 € ž˜ ”‚<„@à=• € Ÿ° €  — € ¡­ÿÿþb € ¢¥ÿÿþF € ¥¤ H(‚$ƒ˜ƒ—;‚'‚#‚%ƒ™‚&‚(ƒš € ¦™2FIELD.CHAR$=CHR$(201)-RECIPE NAME, CHR$(202)-CODE € §à‚X‚Y‚Z‚[ € ¨àƒP € ©”‚$„?€=• “‚X„ € ª”‚$„@@=• “‚Z„ € «“ƒ¸…# € ¬”‚$„@@=•H € ­“ƒ¸…Ó € ®“ƒ˜‹"‹% ƒ˜;;;; € ¯“‚)„B4 € °— € ±”‚$„?€=•H € ²“ƒ¸…— € ³“ƒ˜‹"‹% ƒ˜;;;; € ´“‚)„B € µ— € ·“‚'‚)„BÈ* € ¹Â…Å,#‚$,ƒ¸,‚' € ºÆ#‚$,‚'‡ƒP € »“‚#„ € ¼“‚%„ € ½“ƒ™…# € ¾“ƒ™ƒ—ƒ˜+ € ¿“‚&Š·Šº‚$;;‚'/;;„?€+ € À“‚(„?€ € Á¬ € ÂǃP‹Ÿ"‚';; € ÃÄ#‚$,‚( € Ä“ƒšƒP € Å“‚%Š´ƒš,ƒ™;; € Ç™CALL DEBUG(T.FIELD$) € É”‚%„>•• € Ê“‚#‚#‚%+ € Ë”‚$„?€=•"“‚XŠ·‚#‚)/;;„?€+ € Ì”‚$„@@=•"“‚ZŠ·‚#‚)/;;„?€+ € Í°\ € Ζ € Ï“‚#‚#‚'+ € З € Ñ“‚(‚(„?€+ € Ò”‚(‚&>•° € Ó­ÿÿþŒ € ÔÃ#‚$ € Õ“ƒš…# € Ö“ƒP…# € ×¥ÿÿûé € Ú¦<ƒ;ƒƒƒ‚¨‚ª‚« € ÛàƒF € Ü™F-1 IF MATCHED USE LOCAL COPY, 0 NONE AND NEED TO LOAD FILE FROM SERVER € Ý™BBEFORE FILE2CHECK REQUEST DECIDE IF IT WAS CHANGED ON SERVER OR NO € Þ“ƒ…è € ß“ƒ‰ÿÿ©¤…‚,‹"‹% ƒ;;;;;,,; € à“ƒƒƒ+ € â™-DELAY TO AVOID 1024 BYTES IN PC SERVER BUFFER € ã£ÿÿ[„?€;, € å£ÿÿ©Æƒ;ƒ € æ£ÿÿ¸"…Ÿ,…¦;,, € ç™+FINF$=XXXXXXXDD-MM-YYYYHH:MM:SS (25 BYTES); € è“‚¨„AP € éÂ…Å,#‚¨,…f,„B € êÆ#‚¨,„B‡ƒF € ë“‚ªŠº‚¨;;„B/ € ì“‚«„?€ € í“‚©„ € º‚¨;;„>•ë € ï¬ € ðÄ#‚¨,‚« € ñ”‹#ƒF,„?€,„A@;;‹#ƒö,„?€,„A@;;=•U € ò”ƒFƒö=• € ó“‚©„¿€ € ô– € õ“‚ª‚«„?€- € ö— € ÷°> € ø— € ù“‚«‚«„?€+ € ú”‚«‚ª>•° € û­ÿÿÿ € ü— € ý”‚©~•} € þǃF‹Ÿ"„B;; € ÿǃFƒö €“‚ª‚ª„?€+ €™ CALL DEBUG(STR$(RECCOUNT.CACHE)) €Å#‚¨,‚ª €— €Ã#‚¨ €§ÿÿü ªU