ÁÚ\Ì€ $à ¤+lüSS0S<U¸?X¬[”'=?\Ìmanweigh777_a3.bas08/12/200418:56:22PD= ACCEPTED CUSTOMERS MAN WEIGH TO SELECT ACCEPTED AWM LIMITED CARD BUSY. FOR EDIT FOR DELETE FOR RECALL FOR WEIGHT. PRESS ENTER 777 HARDWARE! CLEAR TOTAL? DEMO VERSION FULL VERSION IS WRITTEN FOR 14 DAYS PERIOD ALREADY EXISTS! CURRENT SOFTWARE ENTER CUST. NAME ENTER ITEM NAME ENTER YOUR NAME FOLLOWING ERROR LICENCED TO USER UNLIMITED PERIOD ? ALL| CONDITIONS OCCURED. CURRENT NOT FOUND! DEL KG N NAME: NEW| NOT FOUND! OK ONE OR MORE OF THE ONE| RECORD RECORDS RESPOND TO REQUEST SCALE CARD DID NOT \\!#&'9','0'-LEFT/RIGHT'BCKSPC','+'-UP,DOWN'FNCT'-EXIT(0-20 chars)(4 digits)(4-20 CHARS)(DDMMYYYY)(HHMM)*** LAST RECORD! ******** NO DATA! *******INTERNAL PROBLEM**+00 44(0)1284 701222,-..REG0112 DIGITS CODE1200192002240024572909448007779600:<>A03 08-12-2004 18:28ACCEPTABLE WEIGHTALLALPHNUMERICAWMBATCH CODEBAUD|BLANK - 14 DAYS TRIALBZCALIBRATION REQUIREDCLEARCODECOMCOM1:9600,N,8,1,BCOM2:9600,N,8,1,BCOMMON.KEYSCOMMON.KEYS(KBRD$)CUSTOMER NAMECUSTOMERSCZDD/B |DATA RECORDED!DATA UPDATED!DATEDEALER FIRMDEALER PHONEDEMO PERIOD EXPIRED!DEW1CUST.DATDEW1GTOTL.DATDEW1TOTL.DATEEDITED CUSTOMER NAMEEDIT|ENTER PASSWORDENTER TAREERROR: FIRSTFMENU17FMENU18FMENU19FMENU20FMENU21FMENU22FMENU23FMENU24FMENU6FMENU7FMENU8FMENU9FNCTGROSS: INCORRECT PASSWORD!ITEM DESCRIPTIONITEM SIZELINE : LIST|MMAINMAX 20 CHARSMAX 4 DIG.'0'-NONEMAX FORMAT ###.###MAX. 20 CHARSMOMW-CUST.DATMW-NAME.DATMW-PAR.DATMW-PASS.DATN TOTAL:NNEW PASSWORDNUMERICOOCOKOVER WEIGHTPPASSWORDPHONE 00441284701222PRINTPRINTERPRTY|PS-SETUP.DATQRREG FIRMREG NAMEREPORTSRESET TTLRESETSS/BSCANNERSCROLL LIST HOT KEYSSIB: ANALOG FAILURE.SSI: ERROR CONDITIONTTARE ERROR!TARETIMETIME/DATETO EXITTO REGISTERUU.R.C.UNDER WEIGHTUNREGISTEREDWC-ITEMS.DATWC-OWNER.DATWRONG CODEYYOUR 14 DAYS IS OVER!ZERO \ \\ \\ \ #.#####\ \ \ \________SETUP________________MENU____________________________exitmainmax 20 charsqregsetup{BACK}{COM PORT}{CONTINUE RESTART}{CONTINUE}{CUSTOMERS}{MAIN}{PARAMETERS}{PASSWORD}{PRINTER}{REPORTS}{RESET}{RESTART}{RETURN}{SETUP}|BACK(<PUiyˆœ°ÄØì(<PRfw‹Ÿ³ÇÛí 27 :D ITXlqx€”¨«¬¬­®À Ô ß ë õ  %9Mabcdhijx|‚†ŠŽ“–š›œ±Â ÅÐ ÓÝâ÷ù * ;F X enpqv „‘ •  ¬ À Ì Ùåæúÿ  #*18?FMT[agmsw~‘ ¡ª±¶· »ÇÙ ëø ú    %/ 0<CDF HST\pu| Ž—Ÿ ¦¯´µ¸¿Óçû ü   *+ 1 = I U akl†š  «¿ÀÔèü  ) = GR X d n w€ ‡˜ŸATTEMPTSBLINCKTIMEBUFFERNBUFFERSIZEBUFFERZEROBZCOUNTOFDAYSCURMESSAGECZDELAY.FLAGDEMO.VERSIONDLYDSPFONTERRNOFILE.LENGTHFNUMBERFORWARD.KEYINSTR.DISPISREGISTEREDLENBUFFERLENFORMATFILELENFORMATFILE1LENFORMATFILE10LENFORMATFILE11LENFORMATFILE12LENFORMATFILE13LENFORMATFILE14LENFORMATFILE15LENFORMATFILE2LENFORMATFILE3LENFORMATFILE4LENFORMATFILE5LENFORMATFILE6LENFORMATFILE7LENFORMATFILE8LENFORMATFILE9LENGTHLIFEPERIOLIFEPERIODMAINMENUMAXCOLUMNNUMBERMAXIMUM.RECORDSMOOCOK2PRINTOLD.PRODUCT.CODEPRINTED.WEIGHTPRINTERPRODUCT.NOT.SELECTED.KEYRECALLMENURECCOUNT_TMPRECORD2FOUNDRECORDFOUNDREDUCEBUFFERREGIDREMOTEREMOTE.BUFFER.LENGTHRETURN.KEYSCALES.COUNTSCROLL.DELAYSECURESELECTED.PRODUCT.CODESETUP.FILE.LENGTHSHOW.PROCESSSHOWCURVAR.KEYSTATUSFILE1STATUSFILE10STATUSFILE11STATUSFILE12STATUSFILE13STATUSFILE14STATUSFILE15STATUSFILE2STATUSFILE3STATUSFILE4STATUSFILE5STATUSFILE6STATUSFILE7STATUSFILE8STATUSFILE9T.ACCEPT.WTT.AUTO.PRINT.DELAYT.AUTO.PRINT.INTERVALT.CUST.CODET.MAINCONSECT.MINWEIGHTT.OVER.WTT.PRN.BAUDT.PRN.DATAT.PRN.PORTT.PRN.STOPT.PRN.TYPET.TOTALT.UNDER.WTTIMEDELAYTMP.GROSSWEIGHTTMP.NETWEIGHTTMP.TAREWEIGHTYZZEROSTRING_ABS_N!_ASC_S!_BLOZERO_!_CAPACITY_!_CAPACITY_N!_CARDS_!_CARDS_N!_CZERO_!_ERL_!_ERR_!_GROSS_!_IFP1_IFP2_IFP3_IFP4_IFP5_IFP6_INSTR_SS!_INTERVAL_!_INTERVAL_N!_INT_N!_LEN_S!_LOF_N!_MOTION_!_OVERCAP_!_RELAY_NN!_S10_EXIT.FLAG_S10_FNUMBER_S10_SELECTED.ITEM.WEIGHT_S10_SELECTED.TOTAL_S10_T.ITEM.WEIGHT_S11_FNUMBER_S12_BROWSEREC_S12_BROWSEREC2_S12_COLUMNNUMBER_S12_FNUMBER_S12_FNUMBER.MAIN_S12_LINECOUNT_S12_OLDRECNO_S12_RECCOUNT_S12_RECNO_S12_RECORDFILE_S12_X_S13_FNUMBER_S14_FNUMBER_S14_RECCOUNT_S14_RECORD2UPDATE_S16_PAR1_S1_FLAG1_S1_T_S31_BUFFERSIZE_S31_BUFFERVAL1_S31_BUFFERVAL2_S31_X_S32_CURRENTDAYS_S32_STOREDDAYS_S34_CHECK.SUM_S34_MIN.URC_S34_REGMODE_S34_TEMP1_S34_X_S36_X_S37_DIGIT1_S37_DIGIT2_S37_DIGIT3_S38_DELAY.TIME_S38_SIMDLY_S3_RECCOUNT_S3_X_S40_SCALE.STATUS_S41_K_S41_N_S42_CA_S42_GR_S42_ZEROERROR_S45_MES1Y_S45_MES2Y_S46_MAXLENGTH_S47_SHOWTIME_S47_YSHOW_S50_FNUMBER_S50_SEL1_S51_FNUMBER_S52_FNUMBER_S52_SEL2_S53_FNUMBER_S53_SEL3_S54_FNUMBER_S54_SEL4_S55_FNUMBER_S55_SEL5_S58_MAX.PORT_S5_EXITDO8_S61_TICKET.NUMBER_S61_TMP.LEFTMARGIN_S62_BYTES.FROM.TOP_S62_FNUMBER_S62_MAX.FIELD_S62_RECORDFOUND.ARRAY_S62_X_S62_XS_S6_T.RECAL.ID_S7_ARRIND_S7_FNUMBER_S7_RECCOUNT_S7_RECORDFOUND_S7_X_S8_FNUMBER_S8_LENGTHFILE_S8_RECNUMFILE_S8_UPDATEREC_SCLSTAT_N!_STEP1_STEP2_STEP3_TARE_!_TIMER_!_TO1_TO2_TO3_VAL_S!ACK$ARRAY.FIELD$BLINKDASH$BUFFER$BUFFERAR$BUFFERAR2$CURUNIT$DEVICEMODE$EOF$EOT$ESC$ETX$F.ACCEPT.WT$F.AUTO.PRINT$F.AUTO.PRINT.DELAY$F.AUTO.PRINT.INTERVAL$F.CUST.CODE$F.CUST.NAME$F.DEALER.FIRM$F.DEALER.PHONE$F.FIELD.MARKER1$F.FIELD1$F.FOOTER1$F.FOOTER2$F.FOOTER3$F.FOOTER4$F.FOOTER5$F.HDR1$F.HDR2$F.HEADER1$F.HEADER2$F.HEADER3$F.HEADER4$F.HEADER5$F.MAINCONSEC$F.OVER.WT$F.PASSWORD$F.PRINTER.INI$F.PRN.BAUD$F.PRN.DATA$F.PRN.PARITY$F.PRN.PORT$F.PRN.STOP$F.PRN.TYPE$F.REGISTRATION.FIRM$F.REGISTRATION.NAME$F.REMOTE.CHAR$F.SCANNER.INI$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.TICKET.NUMBER$F.TMPFIELD$F.TOTAL$F.UNDER.WT$FIELD.NAME$FIELD22FIND$FILEFIELD$FORMAT.PRODUCT.CODE$FORMAT.PRODUCT.PRICE$HDR.ARRAY$INP.T.CUST.NAME$INP.T.ITEM.DESC$INP.T.ITEM.SIZE$LABELDATE$LF$LIST.ARRAY$MESSAGESTRING1$MESSAGESTRING2$NAK$NDA$NEWMODE$OLDBUFFER$PRINTER.REPLY$RECALLMENU$RECALLMODE$REMOTE.PORT$RUN.MODE$SBUFFER$SEARCH.MODE$SELECTED.CUST.NAME$STRING1$STX$T.AUTO.PRINT$T.CUST.NAME$T.DEALER.FIRM$T.DEALER.PHONE$T.FOOTER1$T.FOOTER2$T.FOOTER3$T.FOOTER4$T.FOOTER5$T.HDR1$T.HDR2$T.HEADER1$T.HEADER2$T.HEADER3$T.HEADER4$T.HEADER5$T.PASSWORD$T.PRINTER.INI$T.PRN.PARITY$T.REGISTRATION.FIRM$T.REGISTRATION.NAME$T.SCANNER.INI$T.SECURE$T.TICKET.NUMBER$T.YOUR.NAME$TICKET.NUMBER$TMP$TMP.FILE.NAME$TMPSECURE$TYPEMODE$WAIT.MODE$WEIGHT.FORMAT1$WEIGHT.FORMAT2$WT.FUNCTION$YES$_CHR$_N!_DATE$_!_IFP1$_IFP2$_IFP3$_IFP4$_IFP5$_IFP6$_INP$_SSSS!_INP$_SSSSNN!_LEFT$_SN!_LTRIM$_S!_MID$_SNN!_RIGHT$_SN!_RTRIM$_S!_S10_B4.T.CUST.NAME$_S10_B4.T.ITEM.DESC$_S10_R.E.D.ASK$_S10_RECALLMODE$_S10_SELECTED.ITEM.DESC$_S10_SELECTED.ITEM.SIZE$_S10_T.ITEM.DESC$_S10_T.ITEM.SIZE$_S11_RECALLMODE$_S12_F.ITEM.DESC$_S12_F.ITEM.SIZE$_S12_F.ITEM.WEIGHT$_S12_HEADER$_S12_LN$_S13_T.ITEM.DESC$_S13_T.ITEM.SIZE$_S15_PAR1$_S17_TMP.TARE$_S1_TMP1$_S2_CURRENTDATE$_S2_CURRENTTIME$_S2_ST$_S2_UT$_S31_CURRENT.VARIABLE$_S31_MODE$_S31_STANDART.NEW.HEADER1$_S31_STANDART.NEW.HEADER2$_S32_CURRENTDATE$_S32_F.DATE.INST$_S32_REGFILENAME$_S32_T.DATE.INST$_S34_CHAR1$_S34_CHAR2$_S34_CHAR3$_S34_CHAR4$_S34_CHAR5$_S34_CHAR6$_S34_CHECK.CODE$_S34_CODE1$_S34_CODE2$_S34_CODE3$_S34_CODE4$_S34_CODE5$_S34_CODE6$_S34_FINAL.CODE$_S34_INP.PROMPT$_S34_OLD.REGISTRATION.FIRM$_S34_OLD.REGISTRATION.NAME$_S34_REGISTRATION.CODE$_S34_REGISTRATION.FIRM$_S34_REGISTRATION.NAME$_S36_CHAR$_S36_SPLASH1$_S36_SPLASH2$_S36_SPLASH3$_S36_SPLASH4$_S36_SPLASH5$_S36_SPLASH6$_S36_SPLASH7$_S36_STRING2SHOW$_S36_WAIT.MODE$_S37_NEEDEDDATE$_S40_BADCODE.FORMAT$_S40_LEN.AFTER.POINT1$_S40_LEN.BEFORE.POINT1$_S45_MS1$_S45_MS2$_S47_SHOWMESS$_S49_VALUE$_S55_T.TOTAL$_S56_KBRD$_S57_F.RECAL.ID$_S58_CI$_S58_CURRENT.INI$_S58_DEVICEMODE$_S58_T.BAUD$_S58_T.DATA$_S58_T.PARITY$_S58_T.PORT$_S58_T.STOP$_S5_T.MYID$_S60_BATCH.CODE$_S61_CURRENTDATE$_S61_CURRENTTIME$_S61_TICKETMODE$_S62_F.FIELD$_S62_FILE.NAME$_S62_SMODE$_S62_STRING2FIND$_S62_STRING2FIND.S$_S62_T.FIELD$_S63_STRING2PRINT$_S6_F.RECAL.ID$_S6_T.RECAL.ID$_S7_F.FIELD$_S7_T.FIELD$_S9_LINE1$_S9_LINE2$_S9_LINE3$_S9_LINE4$_SPACE$_N!_STR$_N!_STRING$_NS!_TIME$_!_UNIT$_!_VERSION$_N!‚ ‚‚ ‚ #‚-‚ /‚ :‚D‚ F‚$ P‚(\‚,_‚0f‚4 k‚8v‚< }‚@ ˆ‚D ’‚H ž‚L §‚P´‚T‚XÑ‚\à‚`ï‚dþ‚h ‚l‚p*‚t8‚xF‚|T‚€b‚„p‚ˆ~‚ŒŒ‚ ’‚ÿÿÿì ›‚”¥‚˜­‚œ¼‚ Ë‚¤Í‚¨Ï‚¬ׂ°ç‚´õ‚¸ü‚¼ ‚À ‚Ä *‚È 6‚Ì A‚ÐM‚ÔR‚ØX‚Ü l‚à v‚ÿÿÿ𠂂䎂蔂쩂𠺂ôÆ‚ø Ô‚ü ß‚ ë‚ ÷‚ ‚ ‚ ‚ '‚ 2‚ =‚ H‚$ S‚( ^‚, i‚0 t‚4 ‚8Š‚<œ‚@ ±‚D ¼‚H È‚L Ó‚P Ü‚T æ‚X ð‚\ ú‚` ‚d‚h ‚l ‚p(‚t 7‚xD‚|R‚€S‚„ T‚ˆ^‚Œe‚ l‚” v‚˜ ‚œ‚  •‚¤ž‚¨¦‚¬¬‚°²‚´º‚ÿÿÿô¿‚ÿÿÿèÄ‚ÿÿÿÜÉ‚ÿÿÿÐ΂ÿÿÿÄÓ‚ÿÿÿ¸ Ø‚¸ ₼ í‚Àù‚Ä‚È‚Ì ‚Ð ‚Ô !‚Ø+‚ÿÿÿì 9‚ÿÿÿüE‚ÿÿÿ ^‚ÿÿÿŒq‚ÿÿÿœ ƒ‚ÿÿÿü‚ÿÿÿè‚ÿÿÿ䬂ÿÿÿØ ½‚ÿÿÿüÉ‚ÿÿÿøÚ‚ÿÿÿì è‚ÿÿÿÔ õ‚ÿÿÿô ‚ÿÿÿÜ ‚ÿÿÿð‚ÿÿÿà !‚ÿÿÿü -‚ÿÿÿü 9‚ÿÿÿôF‚ÿÿÿø X‚ÿÿÿü a‚ÿÿÿüj‚ÿÿÿøo‚ÿÿÿÌ~‚ÿÿÿÈ‚ÿÿÿÄœ‚ÿÿÿÀ¢‚ÿÿÿ̲‚ÿÿÿÈÁ‚ÿÿÿ€ Ï‚ÿÿÿì Û‚ÿÿÿü ç‚ÿÿÿ„ñ‚ÿÿÿ ÷‚ÿÿÿ ý‚ÿÿÿð ‚ÿÿÿì ‚ÿÿÿè‚ÿÿÿü -‚ÿÿÿø 8‚ÿÿÿüD‚ÿÿÿøI‚ÿÿÿüZ‚ÿÿÿø`‚ÿÿÿüf‚ÿÿÿøm‚ÿÿÿüt‚ÿÿÿô ‚‚ÿÿÿ𠌂ÿÿÿà–‚ÿÿÿü ¤‚ÿÿÿì ±‚ÿÿÿü »‚ÿÿÿü Ç‚Ü Ђÿÿÿü Ü‚ÿÿÿü è‚à ñ‚ÿÿÿü ý‚ä ‚ÿÿÿü ‚è ‚ÿÿÿü '‚ì 0‚ÿÿÿœ =‚ÿÿÿðH‚ÿÿÿØZ‚ÿÿÿÔm‚ÿÿÿÀ €‚ÿÿÿüŒ‚ÿÿÿÔš‚ÿÿÿ °‚ÿÿÿ¤¶‚ÿÿÿн‚ÿÿÿä Ë‚ÿÿÿä Õ‚ÿÿÿü à‚ÿÿÿèì‚ÿÿÿøû‚ÿÿÿà ‚ÿÿÿü ‚ÿÿÿô ‚ÿÿÿð '‚ÿÿÿø 4‚ð ?‚ô E‚ø K‚ü Q‚ X‚ `‚ d‚  h‚ l‚ sƒ wƒ$ ƒƒ4 ƒ@ ”ƒL ƒ\ §ƒÿÿÿô ¯ƒl ºƒx ¾ƒ„ ƒ ƃœ ʃ¨ Öƒ´ ãƒÀ öƒÌ ƒØ ƒä $ƒð 2ƒü Aƒ Qƒ Zƒ dƒ, nƒ8 xƒD ‚ƒP Œƒ\ “ƒh šƒt ¤ƒ€ ®ƒŒ ¸ƒ˜ ƒ¤ ̃° Ùƒ¼ ãƒÈ îƒÔ üƒà ƒì ƒø ƒ *ƒ 5ƒ @ƒ( Tƒ4 hƒ@ vƒL „ƒX Œƒd •ƒp žƒ| §ƒˆ °ƒ” ¹ƒ  ƒ¬ ˃¸ ÔƒÄ ÝƒÐ æƒÜ îƒè ÷ƒô ƒ ƒ ƒ ƒ$ $ƒ0 -ƒ< 6ƒH ?ƒT Hƒ` Pƒl Yƒx bƒ„ kƒ tƒœ }ƒ¨ †ƒ´ ƒÀ ˜ƒÌ ¡ƒØ ªƒä ²ƒ𠻃ü ă ̓ Öƒ ߃, èƒ8 ñƒD úƒP ƒ\ ƒh ƒt ƒ€ %ƒŒ -ƒ˜ 5ƒ¤ =ƒ° Mƒ¼ XƒÈ `ƒÔ kƒà vƒì ‚ƒø Œƒ  ƒ µƒ ¿ƒ, σ8 ߃D ïƒP ùƒ\ üƒhƒxƒ„%ƒ)ƒœ-ƒ¨ 5ƒ´?ƒÀ MƒÌ XƒØ cƒä oƒðxƒü €ƒŒƒŸƒ §ƒ, «ƒ8 ¸ƒDăPÒƒ\ áƒh ëƒt õƒ€ ÿƒŒ  ƒ˜ƒ¤ƒ° !ƒ¼ +ƒÈ 5ƒÔ ?ƒà Iƒì Sƒø^ƒ  lƒ yƒ ƒ (¡ƒ 4 ¯ƒ @¸ƒ L ȃ XÔƒ d⃠pæƒ | ôƒ ˆ þƒ ” ƒ  ƒ ¬ ƒ ¸ /ƒ Ä;ƒ Ð?ƒ ÜGƒ èOƒÿÿÿôUƒÿÿÿè[ƒÿÿÿÜaƒÿÿÿÐgƒÿÿÿÄmƒÿÿÿ¸ sƒ ô ~ƒ ‹ƒ •ƒ  Ÿƒ $ ©ƒ 0 ´ƒ <¾ƒÿÿÿÒƒÿÿÿÈæƒÿÿÿàõƒÿÿÿðƒÿÿÿÔƒÿÿÿ°5ƒÿÿÿ¼Fƒÿÿÿ¤Wƒÿÿÿðgƒÿÿÿ°xƒÿÿÿ¤‰ƒÿÿÿ˜ œƒÿÿÿ¼¨ƒÿÿÿȰƒÿÿÿðÁƒÿÿÿä Òƒÿÿÿô܃ÿÿÿô êƒÿÿÿìóƒÿÿÿôƒÿÿÿèƒÿÿÿЃÿÿÿÜ!ƒÿÿÿÜ 7ƒÿÿÿÐAƒÿÿÿô[ƒÿÿÿèuƒÿÿÿ܆ƒÿÿÿè—ƒÿÿÿô¨ƒÿÿÿÐ ¹ƒÿÿÿ” ăÿÿÿˆ σÿÿÿt Úƒÿÿÿh åƒÿÿÿ\ ðƒÿÿÿPûƒÿÿÿ¤  ƒÿÿÿD ƒÿÿÿ8 !ƒÿÿÿ, ,ƒÿÿÿ 7ƒÿÿÿ BƒÿÿÿMƒÿÿþü]ƒÿÿÿðmƒÿÿÿ°ˆƒÿÿÿ¼£ƒÿÿÿȺƒÿÿÿÔуÿÿÿà èƒÿÿÿ„ òƒÿÿÿè ÿƒÿÿÿÜ  ƒÿÿÿÐ ƒÿÿÿÄ &ƒÿÿÿ¸ 3ƒÿÿÿ¬ @ƒÿÿÿ Mƒÿÿÿ”^ƒÿÿÿômƒÿÿÿô}ƒÿÿÿØ‘ƒÿÿÿ䧃ÿÿÿ𠾃ÿÿÿô ǃÿÿÿäЃÿÿÿð Þƒÿÿÿô éƒÿÿÿð öƒÿÿÿôƒÿÿÿôƒÿÿÿ܃ÿÿÿè)ƒÿÿÿô 9ƒÿÿÿÄ Eƒÿÿÿ¬Qƒÿÿÿ¸ _ƒÿÿÿÐ kƒÿÿÿ  wƒÿÿÿô‚ƒÿÿÿô’ƒÿÿÿ裃ÿÿÿÜ´ƒÿÿÿô ăÿÿÿÄуÿÿÿØ àƒÿÿÿäëƒÿÿÿðüƒÿÿÿ´ ƒÿÿÿ¨ƒÿÿÿô.ƒÿÿÿô=ƒÿÿÿè Lƒÿÿÿì XƒÿÿÿÔ dƒÿÿÿô nƒÿÿÿè xƒÿÿÿÜ ‚ƒÿÿÿÐ Œƒ H–ƒ T žƒ `ªƒ l²ƒ x ºƒ „APPLICATION.ERRORÞˆALREADY.EXISTSCHECK.DEMOCHECK.HARDWARECHECKMESSAGESTRINGCHECKREGISTRATIONCHECKWEIGHTFORMATCLOSEFILECLOSEPRNCOMMON.KEYSDATA.MANAGERDATE2DAYSDEBUGDELAY.RESETDELAYDELETE.RECORDEDIT.PASSWORDEMPTYVRBLFILEENTER.DATAENTER.DEALER.DETAILSENTER.TAREFLD2VRBLFILEFMENU17FMENU18FMENU19FMENU20FMENU21FMENU22FMENU23FMENU24FMENU6FMENU7FMENU8FMENU9FNCTGLOBAL.SEARCHHELPINSERT.RECORDKILLFILEMAINSCREENMENUNEW.INPUTBOXNOT.FOUNDOPENFILEOPENPRNPAUSEPRINTTICKETREGISTRATIONSECURITYSETTIMEDATESETUP.MENUSETUP.READSETUP.WRITESETUP1SETZEROSHOWMESSAGESHOW_MESSAGESPLASHSCREENSTANDARD.LISTSTANDARD.NEWSTANDARD.RECALLUPDATE.RECALL.SCREENUPDATESCREENVRBL2FLDFILEk ‹Á²Ã&±J8øIªƒ Z¹c°C k· v<í ‚¨‹Þ ªY›©  9L ­7S ºÀû ÇиÑŸ& åk¹ ï¾’ûnn= ngn‘n»nå%o,o93mk9m•?m¿EméKoc O×á\Cr `iËm¹p u% ƒo ki˜¶± °§®¥ ¬Ñ; ·’ŠÃ3@ Ë³Í Ö1b àij êϾõÇ"û¯ °i  ²  f %Y¤ 2dt>E|MTè aX mºt¼ ‚p ¼ ƒ… ¼ ' ¼ = ¼ =‚p ¼ D ¼ D‚p ¼ ‚p ¼ * ¼  ¼ ¼ ¼ + ¼04ƒ…ƒ†ƒ‡ƒˆ ¼'H4ƒ…ƒ†ƒ‡ƒˆ‚t‚u ¼ƒ…ƒ† ¼ , ¼ ,‚p ¼ ‚p ¼ƒ…‚q ¼ ƒ… ¼ ‚p ¼ 5ƒ… ¼$ƒ…‚q‚r ¼ - ¼ / ¼@‚p‚q ¼ƒ…‚q ¼ 6ƒ… ¼ F‚p ¼ ‚p ¼ ‚p ¼!‚pƒ† ¼ 0 ¼ $ ¼ % ¼ 2 ¼ &ƒ… ¼ 7‚p efg&h4iBjUkcƒvl‰„—m¥n³oÁ‹ÏŒñvw5xCyViz{”ާº|×}å~ó ‘#Ô6öI÷\øo؇ù•Ù£ú±Ý¿ûÒ€™ €™ €™ €™ €™ €™PERED VSEMI COMMON €æ¡Þ>: €™ € ™ € ™ € ™ € ™FILE #2, WC-SETUP.DAT € à[ƒ ƒƒƒƒƒƒûƒüƒýƒþƒÿƒôƒõƒöƒ÷ƒøƒùƒú €à[‚[‚Y‚Wƒr‚Z‚Xƒkƒlƒmƒnƒoƒdƒeƒfƒgƒhƒiƒj €™FILE #3, WC-CUST.DAT €àƒîƒïƒB‚\ƒò‚ €à‚SƒaƒJƒKƒL €à‚]‚V‚PƒCƒƒê €àƒ] €àƒTƒ~‚+‚*‚‚ €à‚‚0‚ €à‚=ƒå‚- €™ €à$‚A‚H‚I‚J‚K‚L‚M €à)‚N‚O‚B‚C‚D‚E‚F‚G €à‚ €à$‚‚‚‚‚‚ ‚! €à)‚"‚#‚‚‚‚‚‚ €à ƒ‚< € àƒp €!àƒvƒ|ƒM‚& €"™ BARCODE VAR €#à ƒGƒH €%à3ƒƒƒ$ƒ/ƒ:ƒ<ƒ=ƒ>ƒ?ƒ €&à3ƒƒƒƒƒƒƒƒƒƒ €'à3ƒƒƒƒƒƒ ƒ!ƒ"ƒ#ƒ% €(à3ƒ&ƒ'ƒ(ƒ)ƒ*ƒ+ƒ,ƒ-ƒ.ƒ0 €)à3ƒ1ƒ2ƒ3ƒ4ƒ5ƒ6ƒ7ƒ8ƒ9ƒ; €*™ €+à‚ €,™REMOVE WARNINGS €-àƒƒ ƒ ƒðƒñ €.à‚Tƒtƒsƒbƒc €/àƒD €0à‚ ‚ ‚ €1™ €2àƒZ‚/‚ƒPƒQ €3™ €4à)ƒæƒçƒèƒ_ƒéƒRƒÞƒS €5à‚^‚‚'ƒ{ €6™ €7à ƒ^ƒ‚ €8™ €9™&COMMON F1$,F2$,F3$,F4$,F5$,F6$,F7$,F8$ €:™&COMMON T1$,T2$,T3$,T4$,T5$,T6$,T7$,T8$ €<à‚_‚a‚` €=™,TMP.ORDERNUMBER$,TMP.QUANTITY €>à‚4‚‚3ƒ\ €?à ƒƒ€ €Aà‚; €Bà ‚(‚) €D™"***********NEW INPUT BOX VARIABLES €Eà3ƒáƒ[ƒU‚ƒà‚@‚‚‚b‚c €Fà$‚5ƒ}‚‚dƒE‚9‚ €Gàƒ €Iàƒx €J™ €K™YCOMMON F.REP.TIME$,F.REP.DATE$,F.REP.DESC$,F.REP.ORDERN$,F.REP.GWT$,F.REP.NWT$,F.REP.QUA$ €L™VCOMMON T.REP.TIME$,T.REP.DATE$,T.REP.DESC$,T.REP.ORDERN$,T.REP.GWT,T.REP.NWT,T.REP.QUA €M™ ROOT CODE €Nà ƒFƒó €OàƒA €P™ €QŸƒß,„Dú €Rà ƒß„Dú €S™COMMON BUFFER$ €TàƒN‚$‚1ƒWƒXƒz €Uà‚? €Và‚7ƒY‚8ƒ €W™SETUP €Xà ‚>ƒV €Yàƒƒ ƒëƒíƒì €Zàƒqƒuƒ`‚R‚Q €[™AUTO PRINT OPTIONS €\à‚,‚.‚Uƒwƒ@ƒy €]™BLINC €^™****************************** €a™COMMON BATCH.NUMBER$ €bà‚ƒà‚‚ €dŸƒâ,„BÈ €eà ƒâ„BÈ €fŸƒã,„BÈ €gà ƒã„BÈ €hŸƒI,„BÈ €ià ƒI„BÈ €jŸƒO,„BÈ €kà ƒO„BÈ €l™************************** €m™REGISTRATION ID €nà‚6 €oà‚2 €p“‚6„Bº €q™************************** €t£§w; €u™-PROTOCOL SIGNALS HERE *********************** €v“ƒN‹ƒ„AP;; €w“ƒä‹ú$;; €x“‚:Šk„?€;; €y™-AFTER 'COMMON' ****************************** €z™ FOR TRANSFER €{“‚/„A €|“ƒN‹ƒ„AP;; €}“‚0„?€ €~“‚1„¿€ €“ƒX…] €€“‚„?€ €“ƒå…¢ €‚“‚%„ €ƒ“ƒá…/ €„“‚„@@ €…™ MAINMENU = 0 €†“‚„ €‡“ƒà… €ˆ™CHECK REGISTRATION €‰Þ„?€,„?€,„ €ŠÞ„?€,„@,„ €‹Þ„?€,„@@,„ €Œ£ƒ¦; €™ €Ž£“…/;, €™SHOW MAIN SCREEN €”Šk„?€;;„>•£œÙ; €‘“‚>„A¨ €’£¶ð; €“™*******READ PASWWORD********* €”“‚„@€ €•“‚‚ €—£; €˜ä €™ €œ¤1&;‚•‚–ƒ¤ €“‚7„A` €ž“ƒá…/ €Ÿ“‚„A  € “‚'„ €¡“‚„ €¢“ƒà… €£“‚@„ €¤“ƒ}…Ç €¥“‚„¿€ €¦“‚„ €§“‚d„ €¨“‚„ €©“‚5„ €ª“‚„@@ €«“‚b„ €¬“‚c„ €­™REMOTE.PORT$ = T.SCANNER.INI$ €®™-********************************************* €¯„,„,„A˜,„@@ €°»„ €±¬ €²“‚ „ €³“‚'„ €´“ƒà… €µ™ BUFFER$ = "" €·»„ €¹™END IF €º“‚•„¿€ €»“‚–ŠÙ#;; €¼»„A€,…b,…/ €½™1 - ITEM, 3 - CUSTOMER €¾¬ €¿»„Aˆ,…x,… €À»„A˜,…z,… €Á™ KEY 20, "FMENU20","UNITS" €Â»„A°,…},…¶ €Ã»„A¸,…~,…„ €Ä»„AÀ,…,…\ €Å™$IF PRODUCT.NOT.SELECTED.KEY = 0 THEN €Æ»„A¨,…|,…¡ €Ç»„A€,…b,…/ €È“‚'„ €É“‚d„ €Ê™RECORDFOUND = 0 €Ë„,„,„A˜,„ €Ì¬ €Í£ ¡; €Î£—L„>™™š;, €Ï”ƒàƒ}?• €Ð“ƒàƒ} €Ñ˜{”ƒàƒ}=•i €Ò”‚„=• €Ó“ƒà… €Ô˜8”‚„?•& €Õ“ƒàƒâ‚„?€+‚-; €Ö— €×— €Ø‘Šzƒá;;,„@@ €Ù’ƒà €Ú™ LOOP UNTIL MAINMENU <> 0 €Û­ÿÿþ쮂'„? €Ü™KEY 0 €Ý„,„@,„A˜,„@ €Þ™ CALL DEBUG("b") €ß”‚'„B<>‚'„B¸<&•e €à“ƒáƒá‹ƒ‚';;+ €á”Šzƒá;;„A >•“ƒá‹ƒá,„A ;; €â˜Ø”‚'„A=•_ €ã”Šzƒá;;„>•6 €ä“ƒá‹ƒá,Šzƒá;;„?€-;; €å— €æ˜h”‚'„B=•V €ç“ƒáƒá…+ €è”Šzƒá;;„A >•“ƒá‹ƒá,„A ;; €é— €ë™******INPT STRING************ €í„,„@@,„A˜,„@@ €î‘„,„@@ €ï’ƒá €ñ™****** €ò”Šzƒá;;„>•a €ó™)CALL FINDBYSORTED(FNUMBER,BUFFER$,"SOFT") €ô£Â¬‚,ƒá,…w;‚ƒá, €õ– €ö“‚4„ €÷— €ø”‚4„>•p €ù£¡$‚;‚ €úÄ#‚,‚4 €û£¨à‚;‚ €ü££Q‚;‚ €ý‘„,„@ €þ’ƒa €ÿ–ç €‘„,„@ €”Šz‹Ž‹‘ƒá;;;;;;„>•’… €™ CALL DEBUG(BUFFER$) €™5 IF NOT BUFFERZERO THEN PRINT " CURRENT NOT FOUND! " €™ PRINT " CURRENT NOT FOUND! " €£ª1‚;‚ €— €™ CLS 0,3,19,3 €£Ç ƒá;ƒá € ”‚'„AP=•_ € “‚'„ € ™#IF LTRIM$(RTRIM$(BUFFER$))<>"" THEN € ”‚4„=• € “ƒaƒá €“‚\„ €£R;„@@,‚4;,‚4 €»„ €„,„,„A˜,„@@ €‘„,„ €’…h €£‘"„@;, €„,„,„A˜,„@@ €‘„,„@ €’ƒa €‘„,„@@ €’ƒá €™ CALL PRINTTICKET("T") €°‹ €— €˜t”‚'„A˜=• €Ú €˜U”‚'„A¨=‚+~&‚~&Šzƒá;;„?&‚,&•n €!™7 YES$ = INP$("DO YOU WISH","TO HIDE YOUR WEIGHT?","NO") €"”‚4„=• “ƒaƒá €#™ T.CUST.NAME$ = BUFFER$ €$“‚\‚\‚_+ €%™ CALL DEBUG("PRIN") €&£·¬…²;, €'“‚,„ €(™ IF RECORDFOUND = 0 THEN €)£Oü„@@,‚4;,‚4 €*™- CALL GLOBAL.SEARCH(FNUMBER,BUFFER$,"FIRST") €+™ RECORDFOUND = RECCOUNT €,˜«”‚'„A°=• €-£qf; €.£™h; €0˜}”‚'„A¸=• €1“ƒ¤‹Œ…t,…·,…/,…ž,„?€,„@€;; €2“ƒá…/ €3”ƒ¤…J=•N €4™ MAINMENU = 0 €5“‚ „¿€ €7„,„,„A˜,„@@ €8°Ð €9— €:“‚'„ €<˜ª”‚'„AÀ=•˜ €=„,„,„A˜,„@@ €>”ŠÝ%ƒp;;„?•£¬; €?”‚<„¿€=• €@£ Ì; €A— €B“‚'„ €C“ƒá…/ €D“ƒà… €E— €F­ÿÿôw €G£oÄ; €H™ MAINMENU = 0 €I”‚'„A¸=•° €J“‚'„ €K­ÿÿóg €M¥ÿÿñØ €P¤ 0=;ƒ¥ƒ¦ƒ¨ƒ§ €Q“ƒ¥‹‹„ ;;,„@€,„@;;…?+‹‹„ ;;,„?€,„@;;+…?+‹‹„ ;;,„@à,„@€;;+ €R“ƒ¦‹‹ù";;,„@ ;; €S™ LOCATE 15,3 €T™ PRINT CURRENTTIME$ €U™MAIN CODE HERE €V“‚_Šo ;; €W™ TMP.TAREWEIGHT = TARE €X™ TMP.NETWEIGHT = NET €Y“‚+Š};; €Z“‚*Š|;; €[“‚Šl;; €\“‚Šg;; €]“ƒ¨‹ú$;; €^”‚_„A Šw;;*<• “‚,„¿€ €_”Š};;~•M €`‘„?€,„ €a½…Ä…0+ƒ+…-+;……;‚_;‹ú$;; €b–7 €c„,„,„Aˆ,„ €d™ CLS 0,1,19,1 €e— €g‘„,„?€ €h’… €i”‚_‚]<•° €j”Š~„?€,„?€;;„?€=Š~„?€,„@;;„?€=|Š~„?€,„@@;;„?€=|•G €kÞ„?€,„?€,„ €lÞ„?€,„@,„ €mÞ„?€,„@@,„ €n— €o˜│_‚]>‚_‚P<&•z €p™ RELAY 1,1,1 €q”Š~„?€,„?€;;„=•\ €rÞ„?€,„?€,„?€ €sÞ„?€,„@,„ €tÞ„?€,„@@,„ €u™ RELAY 1,5,0 €v— €w™ PRINT " - UNDER WEIGHT - " €x™BELOW.ZERO.KEY = 0 €y™‘ ELSEIF RELAY(1,2)=0 AND (TMP.GROSSWEIGHT>=(T.DUVET.WT-T.TOLERANCE)*T.DUVETS.NR AND TMP.GROSSWEIGHT<=(T.DUVET.WT+T.TOLERANCE)*T.DUVETS.NR ) THEN €z˜K”‚_‚V<‚_‚P>&‚+~&•- €{”Š~„?€,„@;;„=•[ €|Þ„?€,„@,„?€ €}™ RELAY 1,2,1 €~Þ„?€,„?€,„ €Þ„?€,„@@,„ €€— €™PRINT " -ACCEPTABLE WEIGHT-" €‚™BELOW.ZERO.KEY = 0 €ƒ™RELSEIF RELAY(1,3)=0 AND TMP.GROSSWEIGHT>(T.DUVET.WT+T.TOLERANCE)*T.DUVETS.NR THEN €„˜ú”‚_‚V>‚+~&•á €…”Š~„?€,„@@;;„=•[ €†Þ„?€,„@@,„?€ €‡™ RELAY 1,3,1 €ˆÞ„?€,„?€,„ €‰Þ„?€,„@,„ €Š— €‹™LOCATE 0,3 €Œ™PRINT " - OVER WEIGHT - " €™BELOW.ZERO.KEY = 0 €Ž— €™ END IF €™ END IF €‘™REM REM LOCATE 0,2 €’™%REM REM PRINT " YOUR NAME BELOW " €“™ LOCATE 0,2 €”™ PRINT BUFFER$ €•“ƒ§…/ €–”‚ŠØ!;;„=&• €—“ƒ§…Z €˜— €™”‚ŠØ!;;„=&• €š“ƒ§…e €›— €œ”‚*• €“ƒ§…‘ €ž— €Ÿ”‚+• € “ƒ§…› €¡— €¢”ƒ§…/>•< €£™DRAW STATUS LINE €¤‘„A,„ €¥’ƒ§ €¦– €§‘„A,„ €¨’… €©— €ª¥ÿÿöê €¬¤ Û';‚¨‚© €­“‚'„ €®¬ €¯™IF MODE$ = "ADM" THEN €°‘„,„ €±’…É €²»„A,…y,…d €³»„A˜,…z,…© €´»„A ,…{,…« €µ»„A°,…},…Ð €¶»„A¸,…~,…Œ €·»„AÀ,…,…¢ €¸»„A€,…b,…/ €¹‘„A,„@@ €º’…× €»‘„,„?€ €¼’…Õ €½‘„,„@ €¾’…Ú €¿‘„,„@@ €À’…Û €Á‘„A`,„@ €Â’…Ö €Ñ„AP,„?€ €Ä’…Þ €Å™ELSEIF MODE$ = "SUP" THEN €Æ™ LOCATE 0,0 €Ç™ PRINT "__SUPERVISOR__MENU__" €È™' KEY 18, "FMENU18", "CUSTOMERS" €É™ KEY 22, "FMENU22", "PASS" €Ê™' KEY 23, "FMENU23", "MAIN" €Ë™ LOCATE 0,1 €Ì™ PRINT "{CUSTOMER}" €Í™ LOCATE 14,2 €Ι PRINT "{MAIN}" €Ï™ LOCATE 14,1 €Й PRINT "{PASS}" €Ñ™ END IF €Ó¬ €Ô­ÿÿÿö®‚'„? €Ö”‚'„A=•² €×™ IF MODE$ = "SUP" THEN €Ø™CALL SHOWSTANDARDSCR(2,"SUP") €Ù£³„@@;, €Ú™ ELSE €Û™CALL SHOWSTANDARDSCR(2,"ADM") €Ü™END IF €Ý“‚'„ €Þ˜H”‚'„A˜=•Y €ߣÅ„@@,…¦;,, €à”‚4„?• €⣧X…¦;, €ã— €ä“‚'„ €å˜Þ”‚'„A =•s €æ“‚'„ €ç„,„,„A˜,„@@ €軄 €é‘„,„?€ €ê’… €ë‘„,„@ €ì’…Ê €í»„@À,…€,…( €@à,…,… €ﻄA,…ƒ,…ß €𬠀ñ­ÿÿÿö®‚'„? €ò”‚'„@à=•õ €󣋶„@@;, €ô“‚¨Š{„@@;;„Aè/ €õ£ì„@@;, €÷›¤‚©„?€œ‚Ú‚¨‚Õ„?€ €ø£‹M„@@;, €ùÄ#„@@,‚© €ú£“ „@@;, €û£‚„@@;, €ü“‚\„ €ý£>„@@,‚©;,‚© €þžÿÿÿ‚©‚Ú‚Õ €ÿ˜v”‚'„@À=•d €£{„@@,…¦;,, €”‚4„?•3 €“‚\„ €£=‚,‚4;‚‚4 €— €— €„,„,„A˜,„@@ €»„ €˜Z”‚'„A°=•j € ™0 IF VAL(T.SV.PASSWORD$)<>0 THEN CALL SECURITY() € ™ CALL EDIT.PASSWORD() € £f; € ˜ß”‚'„A¸=•L € “‚'„ €„,„,„A˜,„@@ €™ KEY 0 €°í €˜‚”‚'„AÀ=•p €“‚'„ €Þ„?€,„?€,„ €Þ„?€,„@,„ €Þ„?€,„@@,„ €„,„,„A˜,„@@ €»„ €¬ €£A”…»,…,‹Ž‹÷‚];;;;,…™,„@à,„,„Dyÿð;,,,,,,, €“‚]ŠÝ%ƒá;; €“ƒá…/ €”‚ „¿€=•°B €£A…,…,‹Ž‹÷‚V;;;;,…™,„@à,„,„Dyÿð;,,,,,,, €“‚VŠÝ%ƒá;; €“ƒá…/ € ”‚ „¿€=•°¯ €!£@n…S,…,‹Ž‹÷‚P;;;;,…™,„@à,„,„Dyÿð;,,,,,,, €"“‚PŠÝ%ƒá;; €#“ƒá…/ €$™IF ERRNO = -1 THEN EXIT DO €%° €&­ÿÿþ+ €'”‚ ~•f €(£9î„?€,„;,, €)„,„,„A˜,„@@ €*‘„,„ €+’…h €,£xã„@;, €-– €.— €/™CALL SETUP1("PRINTER") €0™ELSEIF MAINMENU = ASC("D") THEN €1™ CALL SECURITY() €2™3 IF SECURE = -2 THEN CALL CREATE.DEFAULT.DATA() €3— €4„,„,„A˜,„@@ €5™ KEY 0 €6“‚'„ €7™ BUFFER €8™END IF €9­ÿÿôd €:“ƒà… €;¥ÿÿô. €=¤Ö1; €>“‚'„ €? €@»„ €A‘„,„ €B’…È €C»„A,…y,…© €D»„A˜,…z,…ª €E™ KEY 22, "FMENU22", "PASS" €F»„A¸,…~,…Œ €G‘„,„?€ €H’…Ø €I‘„,„@ €J’…Ù €K‘„A`,„@ €L’…Ö €M¬ €N­ÿÿÿö®‚'„? €O”‚'„A=• €P£¿; €Q˜\”‚'„A˜=•J €R“‚'„ €S„,„,„A˜,„@@ €T»„ €U£”5…¢;, €V— €W„,„,„A˜,„@@ €X™ KEY 0 €Y“‚'„ €Z¥ÿÿþ3 €\¤ /;ƒâ‚Á €]“ƒv…I €^“ƒâ…J €_“‚<„ €`“‚„@@ €a“‚Á„ €b™$SECURE = 0 - WRONG PASSWORD, -1 - OK €c¬ €d“ƒ|…/ €e„,„,„A˜,„@@ €f»„ €g“‚ „ €h“ƒ|‹‹ …Ÿ,…6,…/,…¥;; €i”‚ „¿€=•° €j„,„,„A˜,„@@ €k»„ €l”‹‘‹Žƒ|;;;;‹‘‹Žƒv;;;;=•! €m“‚<„¿€ €n°C €o˜1”‹‘‹Žƒ|;;;;‹‘‹Žƒp;;;;=•! €p“‚<„¿€ €q°å €r˜Ó”‹‘‹Žƒ|;;;;‹‘‹Žƒâ;;;;=‚ „=&•V €s„,„,„A˜,„@@ €t»„ €u“‚„BÆ €v“‚<„¿€ €w°F €x˜4”‹‘‹Žƒ|;;;;…/=‚ „¿€=|•! €y“‚<„ €z°ò €{˜à”‹‘‹Žƒ|;;;;‹‘‹Žƒv;;;;?‚ „=&•– €|„,„,„A˜,„@@ €}»„ €~“‚„BÆ €£yª…†,„?€,…/,„@;,,,, €€“‚„BÆ €£r„@;, €‚“‚<„ €ƒ° €„— €…­ÿÿü´ €†„,„,„A˜,„@@ €‡»„ €ˆ¥ÿÿûþ €Фñ;ƒîƒï‚Ê €‹¬ €Œ“ƒp‹Œ…˜,…Ž,ƒp,…—,„?€,„@€;; €”‚ •°á €Ž“‚„@à €Â…¦,#„A0,…•,‚ €Æ#„A0,„@€‡ƒ,„@@‡ƒî €‘Ä#„A0,„?€ €’“ƒïƒî €“ǃ‹ö„@€;; €”ǃƒp €•ǃî‹÷‚Ê;; €–Å#„A0,„?€ €—Ã#„A0 €˜° €™­ÿÿþÓ €𔂠• €›™RESTORE €œ“‚„@à €Â…¦,#„A0,…•,‚ €žÆ#„A0,„@€‡ƒ,„@@‡ƒî €ŸÄ#„A0,„?€ € “ƒpƒ €¡Ã#„A0 €¢— €£¥ÿÿþ €¥¤™,‚Ì‚Î;ƒð‚͂˂σñ €¦”‚Ì„?€=•] €§Â…¦,#„Ap,…½,„BX €¨Æ#„Ap,„BX‡ƒð €©“‚ÍŠ{„Ap;;„BX/ €ª˜ƒ”‚Ì„@@=•] €«Â…¦,#„Ap,…’,„Aè €¬Æ#„Ap,„A臃ð €­“‚ÍŠ{„Ap;;„Aè/ €®– €¯“‚Í„ €°— €±”‚Í„>•O €²“‚Ë„?€ €³›‚Ï„?€œ‚ڂ͂Մ?€ €´Ä#„Ap,‚Ï €µ“ƒñƒð €¶”‚Ï‚Î?•/ €·“ƒß‚Ë;ƒñ €¸“‚˂˄?€+ €¹— €ºžÿÿÿ”‚Ï‚Ú‚Õ €»Ã#„Ap €¼™ €½”‚Ì„?€=•G €¾Ë…½ €¿Â…¦,#„Ap,…½,„BX €ÀÆ#„Ap,„BX‡ƒð €Á˜U”‚Ì„@@=•C €ÂË…’ €ÃÂ…¦,#„Ap,…’,„Aè €ÄÆ#„Ap,„A臃ð €Å— €ƛʂτ?€œ‚Ú‚Í„?€-‚Õ„?€ €Ç“ƒñƒß‚Ï; €È”‚Ì„?€=•ǃð‹ö„BX;; €É”‚Ì„@@=•ǃð‹ö„Aè;; €Êǃðƒñ €ËÅ#„Ap,‚Ï €Ìžÿÿÿm‚Ï‚Ú‚Õ €Í— €ÎÃ#„Ap €Ï¥ÿÿüp €Ò¤} ‚Ð;‚Ó‚Ñ‚Ò €Ó™ FNUMBER = 1 - ITEM, 3 - CUSTOMER €Ô¬ €Õ“‚'„ €Ö„,„,„A˜,„@@ €×»„A¸,…~,…/ €Ø™KEY 21, "FMENU21", "" €Ù™KEY 18, "FMENU18", "" €Ú™KEY 19, "FMENU19", "" €Û»„@À,…€,…Š €Ü»„@à,…,…$ €Ý»„A,…‚,…s €Þ»„A,…ƒ,…! €ß™ LOCATE 0,1 €à™PRINT "{HELP}" €á™ LOCATE 0,2 €â™PRINT "{RECALL}" €ã‘„A`,„@ €ä’…Ñ €滄A€,…b,…/ €è™5IF FNUMBER = 1 THEN STRING1$ = "_______ITEMS________" €é™5IF FNUMBER = 3 THEN STRING1$ = "_____CUSTOMERS______" €ê™ LOCATE 0,0 €ë™PRINT STRING1$ €ì‘„,„ €í’… €î“‚Ó„ €ï£w#‚Ð;‚Ð €ð“‚ÑŠ{‚Ð;; €ñ£y[‚Ð;‚Ð €ó“‚Ò‚Ñ‚/ €ô”‚Ò„?€=•u €õ‘„,„?€ €ö’‹öŠz‹÷‚Ò;;;;„A+;; €÷‘„@@,„?€ €ø’‹÷‚Ò;;…)+ €ù–r €ú‘„,„?€ €û’‹öŠz‹÷‚Ò;;;;„A+;; €ü‘„@@,„?€ €ý’‹÷‚Ò;;…*+ €þ— €ÿ™ END IF €¬ €”‚'„?•° €­ÿÿÿÜ €»„ €™?1 - NEW, 2 - RECALL, 3 - EDIT, 4 - DELETE, 5 - PRINT, 6 - BACK. €”‚'„@À=• €£%‚Ð;‚Ð €˜‘”‚'„@à=• €£"Ç‚Ð;‚Ð € ˜c”‚'„A=•. € £—…¯,…2,…3,…4;,,,, € ˜$”‚'„A˜=•> € £b‚Ð,…¦;‚Ð, € ”‚4„>•°ç €˜Õ”‚'„A=•$ €£‚Ð,…q;‚Ð, €˜ ”‚'„A=•$ €£Þ‚Ð,…f;‚Ð, €˜k”‚'„A¨=•. €™CALL STANDARD.PRINT(FNUMBER) €˜,”‚'„A¸=‚'„AØ=|• €° €— €­ÿÿú €“‚'„ €™KEY 0 €„,„,„A˜,„@@ €¥ÿÿùŒ €¤0#ƒòƒóƒôƒõ; €»„ € €!»„@À,…€,…/ €"»„@à,…,…/ €#»„A,…‚,…/ €$»„A,…ƒ,…/ €%»„Aˆ,…x,…/ €&»„A,…y,…/ €'»„A˜,…z,…/ €(»„A ,…{,…/ €)»„A¨,…|,…/ €*»„A°,…},…/ €+»„A¸,…~,…/ €,»„AÀ,…,…/ €-»„A€,…b,…/ €.‘„,„ €/’ƒò €0‘„,„?€ €1’ƒó €2‘„,„@ €3’ƒô €4‘„,„@@ €5’ƒõ €6“‚'„ €7¬ €8”‚'„?•° €9­ÿÿÿÜ €:»„ €; €<¥ÿÿþ €>¤dt;‚€ƒ•;‚ƒ”ƒ–ƒ“ƒ˜ƒ—ƒ™‚‚ƒƒ’‚‚ €?“‚„ €@™''R' - RECALL, 'E' - EDIT, 'D' - DELETE. €A“ƒ”…/ €B£zÙ‚€;‚€ €C„,„,„A˜,„@@ €D“‚ „ €E“ƒ[…/ €F“‚4„¿€ €G£i‚€,ƒ•;‚€ƒ• €H¬ €I»„A¸,…„,…/ €J»„A€,…a,…/ €K»„A,…ƒ,…/ €L“‚'„ €M“ƒà… €N¬ €O™%IF RIGHT$(VERSION$(2),2) = "SW" THEN €P™ KEY 15,"COMMON.KEYS","" €Q™ ELSE €R™ KEY 16,"COMMON.KEYS","" €S™ END IF €T”ƒà…=ŠÙ#;;‚>&•3 €U“‚ŠÙ#;;„>™™š+ €V“ƒà…Ç €W˜S”ƒà…Ç=ŠÙ#;;‚>&•/ €X“‚ŠÙ#;;„>™™š+ €Y“ƒà… €Z— €[”‚„A <•9 €\“‚Šzƒ[;; €]‘‚,„@@ €^’ƒà €_— €b”‚'„?•° €c­ÿÿþL €d»„ €e”‚'„ÁØ=•< €f“‚4„ €g£ ÿ‚€,ƒ•;‚€ƒ• €h° ® €i— €j”‚'„AP=‚4„>&•@ €k»„ €l£mp„@@;, €mÄ#„@@,‚4 €n£u0„@@;, €o£o¥„@@;, €p„,„,„A˜,„@@ €r”ƒ•…¦=•6 €s™READ CURRENT SELECTED €t™IF FNUMBER = 1 THEN €u™# SELECTED.ITEM.DESC$ = T.ITEM.DESC$ €v™% SELECTED.ITEM.SIZE$ = T.ITEM.SIZE$ €w™% SELECTED.ITEM.WEIGHT = T.ITEM.WEIGHT €x™ELSEIF FNUMBER = 3 THEN €y™# SELECTED.CUST.NAME$ = T.CUST.NAME$ €z™END IF €{™EXIT DO €|˜c”ƒ•…q=•Š €}™ IF FNUMBER = 1 THEN €~™ B4.T.ITEM.DESC$ = T.ITEM.DESC$ €™ B4.T.ITEM.SIZE$ = T.ITEM.SIZE$ €€™" B4.T.ITEM.WEIGHT = T.ITEM.WEIGHT €™ ELSEIF FNUMBER = 3 THEN €‚™$ B4.T.CUST.NAME$ = T.CUST.NAME$ €„™ END IF €…™,REM REM CALL QUICK.EDIT(FNUMBER,RECORDFOUND) €†“ƒJƒa €‡£#W…r,ƒa,…/,…U,„A ,„,„;,ƒa,,,,, €ˆ“ƒaƒá €‰“ƒá…/ €Š”ƒa…/=• “ƒaƒJ €‹”‚ „¿€=•°ó €Œ£ÿ‚€,‚4;‚€‚4 €™END IF €Ž™ €„,„,„A˜,„@@ €‘„,„ €‘’…i €’£[Ô„@;, €“™END IF €”™ EXIT DO €•™INP. - NEW VALUES €–”‚€„?€=‹Ž‹‘ƒ–;;;;‹Ž‹‘ƒ“;;;;=&•6 €—“ƒ–ƒ˜ €˜“ƒ—ƒ™ €™“‚‚ƒ €š˜m”‚€„@@=‹Ž‹‘ƒ];;;;‹Ž‹‘ƒ’;;;;=&•# €›“ƒ]ƒa €œ“‚‚‚\ €— €ž°D €Ÿ˜È”ƒ•…f=•¶ € ™IF FNUMBER = 1 THEN €¡™ B4.T.ITEM.DESC$ = T.ITEM.DESC$ €¢™ B4.T.ITEM.SIZE$ = T.ITEM.SIZE$ €£™! B4.T.ITEM.WEIGHT = T.ITEM.WEIGHT €¤™ELSEIF FNUMBER = 3 THEN €¥™! B4.T.CUST.NAME$ = T.CUST.NAME$ €¦™ B4.T.TOTAL = T.TOTAL €§™END IF €¨£ÿÿ餂€,‚4;‚€‚4 €©™]IF FNUMBER = 1 AND LTRIM$(RTRIM$(SELECTED.ITEM.DESC$)) = LTRIM$(RTRIM$(B4.T.ITEM.DESC$)) THEN €ª™ SELECTED.ITEM.DESC$ = "" €«™ SELECTED.ITEM.SIZE$ = "" €¬™ SELECTED.ITEM.WEIGHT= 0 €­™aELSEIF FNUMBER = 3 AND LTRIM$(RTRIM$(SELECTED.CUST.NAME$)) = LTRIM$(RTRIM$(B4.T.CUST.NAME$)) THEN €®™ SELECTED.CUST.NAME$ = "" €¯™END IF €°™EXIT DO €±™ €²— €³“‚'„ €´°\ €µ™END IF €¶— €·”‚'„B<>‚'„B¸<&•e €¸“ƒ[ƒ[‹ƒ‚';;+ €¹”Šzƒ[;;„A >•“ƒ[‹ƒ[,„A ;; €º˜Ø”‚'„A=•_ €»”Šzƒ[;;„>•6 €¼“ƒ[‹ƒ[,Šzƒ[;;„?€-;; €½— €¾˜h”‚'„B=•V €¿“ƒ[ƒ[…+ €À”Šzƒ[;;„A >•“ƒ[‹ƒ[,„A ;; €Á— €‘„,„@@ €Ã’‹ö„A ;; €Ä‘„,„@@ €Å’‹ƒ[,„A ;; €Æ™ €Ç”Šzƒ[;;„>•a €È™)CALL FINDBYSORTED(FNUMBER,BUFFER$,"SOFT") €É£„b‚€,ƒ[,…w;‚€ƒ[, €Ê– €Ë“‚4„ €Ì— €Í”‚4„>•V €ΣbÚ‚€;‚€ €ÏÄ#‚€,‚4 €Уj–‚€;‚€ €Ñ£e‚€;‚€ €Ò– €Ó£l΂€;‚€ €Ô— €Õ£¢‚€,ƒ•;‚€ƒ• €Ö‘„,„@@ €×’‹ö„A ;; €Ø‘„,„@@ €Ù’‹ƒ[,„A ;; €Ú­ÿÿñä €Û»„ €Ü„,„,„A˜,„@@ €Ý¥ÿÿ𥠀ᤴ<‚„ƒš; €│4„>•À €ã‘„,„ €ä’‹ö„A ;; €å‘„,„?€ €æ’‹ö„A ;; €ç‘„,„@ €è’‹ö„A ;; €é™ €ꔂ„„?€=•Æ €ë™ LOCATE 0,0 €ì™PRINT MID$(T.ITEM.DESC$,1,20) €í™ LOCATE 0,1 €î™PRINT MID$(T.ITEM.SIZE$,1,20) €ï™ LOCATE 0,2 €ð™/PRINT USING "\ \ #.#####";"WGT:";T.ITEM.WEIGHT €ñ˜e”‚„„@@=•S €ò‘„,„ €ó’… €ô‘„,„?€ €õ’… €ö‘„,„@ €÷’ƒa €ø— €ù˜Ô‚4„¿€=•< €ú™ FIRST ENTRY €û‘„,„ €ü”‚„„?€=• €ý’… €þ˜!”‚„„@@=• €ÿ’… €— €”ƒš…¦=•# €‘„,„?€ €’… €˜e”ƒš…q=•# €‘„,„?€ €’… €˜1”ƒš…f=• €‘„,„?€ € ’… € — € ‘„,„@ € ’‹ø „A ,…?;; € ˜v”‚4„=•d €™ NOT FOUND! €‘„,„ €”‚„„?€=• €’… €˜!”‚„„@@=• €’… €— €”ƒš…¦=•# €‘„,„?€ €’… €˜e”ƒš…q=•# €‘„,„?€ €’… €˜1”ƒš…f=• €‘„,„?€ €’… €— €‘„,„@ € ”ƒ[…/?• €!’… €"–! €#’‹ø „A ,…?;; €$— €%— €&¥ÿÿûU €)¤ Èh9‚ˆ;‚‰‚Œ‚ނЂ…‚†‚‚‚‡‚‹ƒŸƒžƒ›ƒœƒ €*“‚‰‚ˆ €+£fႈ;‚ˆ €,£\ƒ‚ˆ;‚ˆ €-“‚ŒŠ{‚ˆ;;‚/ €.“‚Ž„?€ €/“‚ „?€ €0“‚Š„?€ €1“‚…„?€ €2“‚†„ €3„,„,„A˜,„@@ €4»„ €5“‚„?€ €6»„A¸,…„,…/ €7»„A€,…b,…/ €8™'KEY 16, "ALPHANUMERICS4(CHARACTER$)","" €9“‚'„ €:“‚„ €;“‚‡„?€ €<”‚ˆ„?€=• “‚(„@@ €=”‚ˆ„@@=• “‚(„@ €>“‚ „ €?¬ €A„,„,„A˜,„@@ €B“‚‹‚ €C›*‚„?€œ‚Ú„@@‚Õ„?€ €D”Š{‚ˆ;;„>•3 €E“‚‚„?€+ €F”‚‚Œ>• €G“‚‚Œ €H— €IÄ#‚ˆ,‚ €J“ƒŸ‹ö„@@Šz‹Ž‹÷‚;;;;;;-;;‹Ž‹÷‚;;;;+ €K£a³‚ˆ;‚ˆ €L”‚ˆ„?€=•a €M”‚‡„?€=•h €N™HDR.ARRAY$(X) = "N DESC1:" €O™0LIST.ARRAY$(X) = LN$+" "+MID$(F.ITEM.DESC$,1,16) €P˜Ü”‚‡„@=•h €Q™HDR.ARRAY$(X) = "N DESC2:" €R™0LIST.ARRAY$(X) = LN$+" "+MID$(F.ITEM.SIZE$,1,16) €S˜c”‚‡„@@=•Q €T™HDR.ARRAY$(X) = "WEIGHT:" €U™ LIST.ARRAY$(X) = F.ITEM.WEIGHT$ €V— €W˜Î”‚ˆ„@@=•¼ €X”‚‡„?€=•V €Y“ƒI‚;…# €Z“ƒO‚;ƒŸ…+‹ƒï,„?€,„A€;;+ €[˜M”‚‡„@=•; €\“ƒI‚;…– €]“ƒO‚;ƒŸ…+ƒB+ €^— €_— €`“ƒžƒI‚; €a”‚(„?€>•¤ €b”‚‡„?€=• €c“ƒžƒž…Q+ €d˜m”‚‡„?€>‚‡‚(<&•$ €e“ƒž…Pƒž+…Q+ €f˜,”‚‡‚(=• €g“ƒž…Pƒž+ €h— €i— €j‘„,„ €k’ƒž €l™ €m”‚ˆ„?€=•Ô €n”‚‡„?€=•/ €o‘„,‚ €p½…Æ;ƒŸ;ƒ› €q˜ˆ”‚‡„@=•/ €r‘„,‚ €s½…Æ;ƒŸ;ƒœ €t˜H”‚‡„@@=•6 €u‘„,‚ €v½…Å;ƒŸ;ŠÝ%ƒ;; €w— €x˜N”‚ˆ„@@=•< €y‘„,‚ €z’‹ƒO‚;,„?€,„A ;; €{— €|–H €}‘„,„@@ €~’…; €£G„@;, €€“‚ „¿€ €¯u €‚— €ƒ”‚‚Œ=•B €„”‚„?€=• €…‘„,„@@ €†’…: €‡— €ˆ¯ €‰— €Šžÿÿú‚‚Ú‚Õ €‹”‚ „¿€=•°û €Œ™KEYS €“‚'„ €ެ €”‚'„B@=‚'„Bd=|‚'„B4=|‚'„A=|‚'„ÁØ=|•° €­ÿÿÿ¬ €‘”‚'„B@=•M €’“‚‡‚‡„?€+ €““‚‚‹ €””‚‡‚(>• “‚‡‚( €•˜”‚'„Bd=•M €–“‚‡‚‡„?€- €—“‚‚‹ €˜”‚‡„?€<• “‚‡„?€ €™˜¾”‚'„B4=•> €š“‚‚‹„?€+ €›”‚‚Œ>• “‚‚Œ €œ˜o”‚'„A=•> €“‚‚‹„?€- €ž”‚„<• “‚„ €Ÿ˜ ”‚'„ÁØ=• € ° €¡— €¢­ÿÿ÷Ž €£Ã#‚ˆ €¤“‚'„ €¥„,„,„A˜,„@@ €¦»„ €§¥ÿÿõA €©¤O:‚;ƒ ƒ¡ €ª™ €«£\X‚;‚ €¬„,„,„A˜,„@@ €­“‚ „ €®“ƒá…/ €¯¬ €±¬ €²”‚„?€=•q €³£ }…‡,…,…/,…U,„A ,„,„;,,,,,,, €´“ƒ ƒá €µ“ƒá…/ €¶”‚ „¿€=•°ý €·™.CALL FINDBYSORTED(FNUMBER,T.ITEM.DESC$,"HARD") €¸£r(‚,ƒ ,…w;‚ƒ , €¹”‚4„>•" €º£ ƒ ;ƒ  €»°n €¼— €½™ASK FOR ITEM SIZE €¾£ ]…ˆ,…,…/,…U,„A ,„,„;,,,,,,, €¿“ƒ¡ƒá €À“ƒá…/ €Á”‚ „¿€=•°Ý €™CALL SAMPLE SCREEN €Ù$REM REM CALL SAMPLE.BY.ITEM.WEIGHT() €Ä”‚ „¿€=•°{ €Å™ €Æ£¾‚,„;‚, €Ç»„ €È„,„,„A˜,„@@ €É‘„,„ €Ê’…h €Ë£A¥„@;, €̘Ô”‚„@@=• €Í™customer €Δ‚ „¿€=•° €Ï£Ð…c,…Í,…/,…U,„A ,„,„;,,,,,,, €Гƒaƒá €Ñ“ƒá…/ €Ò”‚ „¿€=•°P €Ó™.CALL FINDBYSORTED(FNUMBER,T.CUST.NAME$,"HARD") €Ô£o{‚,ƒa,…w;‚ƒa, €Õ”‚4„>•" €Ö£_ƒa;ƒa €×°Á €Ø— €Ù™JUST ADD RECORD HERE ... €Ú£ç‚,„;‚, €Û»„ €Ü„,„,„A˜,„@@ €Ý‘„,„ €Þ’…h €ߣ?΄@;, €à— €á™ €â“‚ „¿€ €ã° €ä­ÿÿû| €唂 „¿€=•° €æ­ÿÿûT €ç„,„,„A˜,„@@ €軄 €é¥ÿÿúº €ë¤- $‚‘‚“;‚’ €ì™OLD CODE COMPABILITY €í£L£‚‘;‚‘ €“„<• €ï“‚’„?€ €ð˜u”‚“„=•> €ñ“‚’Š{‚‘;;‚/ €ò“‚’‚’„?€+ €ó˜&”‚“„>• €ô“‚’‚“ €õ— €ö£O±‚‘;‚‘ €÷Å#‚‘,‚’ €ø£N/‚‘;‚‘ €ù¥ÿÿþÜ €û¤a ƒ¢; €ü €ý‘„,„ €þ’ƒ¢ €ÿ‘„,„@ €’… €£=¸„@@;, €¥ÿÿÿ¨ €¤H)‚”; €‘„,„?€ €’‚”;…% €£=h„@;, € ¥ÿÿÿÁ € ¤ª ;ƒ£ € ”Šk„?€;;„>•r € “‚ „ €“ƒ£‹Œ…´,…u,‹Ž‹‘‹÷Šo ;;;;;;;;,…—,„?€,„@ ;; €™&IF ERRNO = -1 THEN TMP.GROSSWEIGHT = 0 €”‚ „=•¬ €“‚aŠÝ%ƒ£;; €”‚a„]‚aŠh;;<&• €Ù„?€,‚a €–N € €»„ €‘„@ ,„?€ €’…³ €£;ã„@@;, € €»„ €— €— €»„ € € — €!¥ÿÿþ_ €$¤"; €%“‚'„@À €&¥ÿÿÿç €(¤"; €)“‚'„@à €*¥ÿÿÿç €,¤"; €-“‚'„A €.¥ÿÿÿç €0¤" ; €1“‚'„A €2¥ÿÿÿç €4¤"; €5“‚'„Aˆ €6¥ÿÿÿç €8¤"; €9“‚'„A €:¥ÿÿÿç €<¤"; €=“‚'„A˜ €>¥ÿÿÿç €@¤"; €A“‚'„A  €B¥ÿÿÿç €D¤"; €E“‚'„A¨ €F¥ÿÿÿç €H¤"; €I“‚'„A° €J¥ÿÿÿç €L¤"; €M“‚'„A¸ €N¥ÿÿÿç €P¤"; €Q“‚'„AÀ €R¥ÿÿÿç €T¤"!; €U“‚'„ÁØ €V¥ÿÿÿç €Z¤,@(ƒ«ƒ¬ƒ©ƒª‚—‚˜‚™;‚š €[“‚ „ €\“ƒá…/ €]“‚'„ €^“‚„ €_“ƒà… €`“‚@„ €a“ƒ}‹ƒ„C;; €b“‚„¿€ €c“‚„ €d“‚d„ €e“‚„ €f“‚5„ €g“‚b„ €h“‚c„ €i„,„,„A˜,„@@ €j»„@À,…€,…/ €k™ KEY 7,"FMENU7", "" CHR$(127) + €l™ KEY 8,"FMENU8", "" + CHR$(126) €m»„A,…ƒ,…/ €n»„Aˆ,…x,ƒ} €o‘„,„ €p’ƒ} €q»„A˜,…z,…/ €r»„A ,…{,…/ €s»„A¨,…|,…/ €t»„A°,…},…/ €u»„AÀ,…,…/ €v»„A¸,…~,…/ €w»„A€,…a,…/ €x™$*****CURRENT VARIABLE SHOW********* €y“‚Šzƒ©;; €z”‚‚—=• “‚„?€ €{™IF LENBUFFER>0 THEN €|›e‚š„?€œ‚Ú‚‚Õ„?€ €}“ƒâ‚š;‹ƒ©,‚š,„?€;; €~žÿÿÿÌ‚š‚Ú‚Õ €›T‚š„?€œ‚Ú‚‚Õ„?€ €€“ƒáƒáƒâ‚š;+ €žÿÿÿÝ‚š‚Ú‚Õ €‚™ END IF €ƒ™"*****HEADERS SMART SHOW ********* €„„?€,„,„A˜,„ €…„,„?€,„A˜,„?€ €†‘„A ŠyŠzƒ«;;„@/;;-,„ €‡’ƒ« €ˆ‘„A ŠyŠzƒ¬;;„@/;;-,„?€ €‰’ƒ¬ €Ь €‹™********INPUT MODE******** €Œ”ƒª…™=•I €”‚'„B>‚'„B8<&‚'„B<=|‚'„Bd>|• “‚'„ €Ž— €™********KEYBOARD*********** €™#OR VAL(CHR$(MAINMENU))<=BUFFERVAL €‘™. IF BUFFERVAL <10 AND BUFFERSIZE = 1 THEN €’™ VBUFFER$ ="" €“™ ELSE €”™ VBUFFER$ = BUFFER$ €•™ END IF €–™H IF MAINMENU >= 32 AND (VAL(VBUFFER$+CHR$(MAINMENU))<=BUFFERVAL) THEN €—”‚'„B]• €˜“ƒà… €™™*******STRING FORMATION PART €š”‚„=•- €›“‚‚„?€+ €œ“‚„ €–J €ž“‚5„¿€ €Ÿ“‚‚„?€- € ”‚„=• “‚„¿€ €¡— €¢”ƒ}…Ç=‚‚—<&• €£”‚„>‚„?€-‚>&• €¤›Š‚š„?€œ‚Ú‚„?€-‚-‚Õ„?€ €¥“‚b‚b„?€+ €¦“‚c‚c„?€+ €§“ƒâ‚b;ƒâ‚š; €¨žÿÿÿ³‚š‚Ú‚Õ €©“‚b‚b„?€+ €ª“‚c‚c„?€+ €«›o‚š‚‚-œ‚Ú‚‚Õ„?€ €¬“‚b‚b„?€+ €­“ƒã‚b;ƒâ‚š; €®žÿÿÿÈ‚š‚Ú‚Õ €¯›{‚š‚„?€+‚-œ‚Ú‚„?€+‚Õ„?€ €°“‚c‚c„?€+ €±“ƒâ‚c;ƒã‚š; €²žÿÿÿÈ‚š‚Ú‚Õ €³“ƒâ‚‚-;‹ƒ‚';; €´“‚‚„?€+ €µ“‚b„ €¶“‚c„ €·˜Ø”‚„?€-‚=‚„>&•ü €¸›Z‚š„?€œ‚Ú‚‚Õ„?€ €¹“ƒã‚š„?€+;ƒâ‚š; €ºžÿÿÿׂš‚Ú‚Õ €»“ƒã„?€;‹ƒ‚';; €¼“‚‚„?€+ €½›T‚š„?€œ‚Ú‚‚Õ„?€ €¾“ƒâ‚š;ƒã‚š; €¿žÿÿÿÝ‚š‚Ú‚Õ €À˜¹”‚„=‚„=&•) €Á“ƒâ‚;‹ƒ‚';; €˜s”‚„=‚&•[ €Óƒâ‚„?€+;ƒâ‚; €Ä“ƒâ‚;‹ƒ‚';; €Å“‚‚„?€+ €Æ— €ǘ픃}…Ç=‚‚—=&•P €È™ END OF STRING €É”‚„=•“ƒâ‚;‹ƒ‚';; €ʘ€”ƒ}‹ƒ„C;;=‚‚—[&•W €Ë“ƒâ‚‚-;‹ƒ‚';; €Ì”‚„>‚|•“‚‚„?€- €Í— €Γƒá…/ €Ï›T‚š„?€œ‚Ú‚‚Õ„?€ €Гƒáƒáƒâ‚š;+ €ÑžÿÿÿÝ‚š‚Ú‚Õ €Ò”‚5•) €Ó“‚‚„?€+ €Ô“‚5„ €Õ— €Ö™BLINCDASH IN THE END OF STRNG €×”‚‚—=‚„=&• “‚„?€ €Ø™#*******END OF STRING FORMATION PART €Ù— €Ú”‚'„@À=•J €Û”‚„>‚‚<&•“‚‚„?€+ €Ü“ƒà… €ݘj”‚'„A=•¨ €Þ”‚„>‚‚—[&‚„>&•“‚‚„?€- €ß™BLINCDASH IN THE END OF STRNG €à”‚‚—=‚„=&• “‚„?€ €ᓃà… €â˜±”‚'„A=•ú €㔂„>‚‚[&•Ð €䔂‚=•* €哃â‚„?€+‚-;…/ €æ˜2”‚‚<• €瓃â‚‚-;…/ €è— €雉‚š„?€œ‚Ú‚‚Õ„?€ €ꔃₚ;…/?•5 €ë“‚b‚b„?€+ €쓃â‚b;ƒâ‚š; €í— €îžÿÿÿ¨‚š‚Ú‚Õ €ï“‚b„ €ð”‚‚=‚„>&• €ñ“‚‚„?€- €ò— €ó“ƒá…/ €ô“‚‚„?€- €õ›T‚š„?€œ‚Ú‚‚Õ„?€ €ö“ƒáƒáƒâ‚š;+ €÷žÿÿÿÝ‚š‚Ú‚Õ €ø— €ù˜¦”‚'„Aˆ=•z €ú”ƒ}‹ƒ„C;;=• €û“ƒ}…Ç €ü– €ý“ƒ}‹ƒ„C;; €þ— €ÿ‘„,„ €’ƒ} €˜”‚'„A˜=•Û €”‚d„=•› €“‚d„¿€ €›N‚š„?€œ‚Ú‚‚Õ„?€ €“ƒâ‚š;…/ €žÿÿÿ゚‚Ú‚Õ €“ƒá…/ €“‚„ € “‚„ € ˜#”‚d• € “‚d„ € “‚Šzƒ©;; € ”‚‚—=• “‚„?€ €›e‚š„?€œ‚Ú‚‚Õ„?€ €“ƒâ‚š;‹ƒ©,‚š,„?€;; €žÿÿÿÌ‚š‚Ú‚Õ €›T‚š„?€œ‚Ú‚‚Õ„?€ €“ƒáƒáƒâ‚š;+ €žÿÿÿÝ‚š‚Ú‚Õ €— €˜/”‚'„A¨=•e €”‚„A +‚[• €“‚‚„A + €– €“‚‚ €— €“ƒà… €˜¹”‚'„A°=•§ €”‚„A -„]‚‚—<&• €“‚‚„A - €˜O”‚‚—<• € “‚„ €!˜&”‚‚—=• €"“‚„?€ €#— €$“ƒà… €%— €&”Šzƒá;;‚—>•“ƒá‹ƒá,‚—;; €'™******INPT STRING************ €(”‚—„A [•? €)„,„@,„A˜,„@ €*‘„,„@ €+’ƒá €,˜ˆ”‚—„B [‚—„A >&• €-„,„@,„A˜,„@@ €.‘„,„@ €/’‹ƒá,„?€,„A ;; €0‘„,„@@ €1’‹ƒá,„A¨,‚„A -;; €2˜Þ”‚—„Bp[‚—„B >&•À €3„,„?€,„A˜,„@@ €4‘„,„?€ €6’‹ƒá,„?€,„A ;; €7‘„,„@ €8’‹ƒá,„A¨,‚„A -;; €9‘„,„@@ €:’‹ƒá,„B$,‚„B -;; €;— €<“‚'„ €=“‚d„ €>¬ €?£"´„>LÌÍ;, €@”ƒàƒ}?• €A“ƒàƒ} €B˜{”ƒàƒ}=•i €C”‚„=• €D“ƒà… €E˜8”‚„?•& €F“ƒàƒâ‚„?€+‚-; €G— €H— €I”„@Šy‚—„A +„Bp/;;-Šy‚‚-„A /;;+„@Šy‚—„B +„Bp/;;+[•˜ €J‘‚„A ŠyŠe‚‚-;;„A /;;*-‚-,„@Šy‚—„A +„Bp/;;-ŠyŠe‚‚-;;„A /;;+ €K’ƒà €L— €M­ÿÿþ;®‚'„? €N”‚'„AP=• €O“‚'„ €P”ƒª…™=•” €Q”ŠÝ%ƒá;;‚™[ŠÝ%ƒá;;‚˜]&ƒá…@=|•H €R“ƒ©ƒá €S“‚„¿€ €T„,„,„A˜,„@@ €U°Ç €V— €W–I €X“‚„¿€ €Y“ƒ©ƒá €Z„,„,„A˜,„@@ €[°v €\— €]˜_”‚'„@à=•Ù €^™ MAINMENU = 0 €_™ RETURN.KEY = -1 €`™ CLS 0,0,19,3 €a™ EXIT DO €b™1 ELSEIF MAINMENU = 24 AND INPUTMOD$ = "EDIT" THEN €c™ MAINMENU = 0 €d™ FORWARD.KEY = -1 €e™ CLS 0,0,19,3 €f™ EXIT DO €g™9 ELSEIF MAINMENU = 20 AND (BOXNR1 <>0 OR BOXNR2 <>0) THEN €h™ MAINMENU = 0 €i™ RETURN.KEY = -1 €j™ rem ERRNO = -1 €k™ REM BUFFER$ = "" €l™ CLS 0,0,19,3 €m™ EXIT DO €n˜u”‚'„ÁØ=‚'„A¸=|•W €o“‚'„ €p“‚ „¿€ €q“ƒá…/ €r„,„,„A˜,„@@ €s° €t— €u­ÿÿèœ €v“‚'„ €w¥ÿÿãÝ €{¤/8;ƒ¯ƒ®ƒ­ƒ°‚›‚œ €|”‹Ž‹‘ƒt;;;;…¼=‹Ž‹‘ƒs;;;;…¼=&• €}“‚ „¿€ €~™&RESTORE DATE OF INSTALLATION FROM FILE €™IF FILE LENGTH = 0, FIRST RUN €€“ƒ¯…V‹Ž‹÷‚6;;;;+…A+ €Â…¦,#„Ap,ƒ¯,„A €‚Æ#„Ap,„A ‡ƒ® €ƒ”Š{„Ap;;„=•â €„™ FIRST RUN €…“ƒ­‹‹„ ;;,„@€,„@;;…?+‹‹„ ;;,„?€,„@;;+…?+‹‹„ ;;,„@à,„@€;;+ €†Çƒ®‹ö„A ;; €‡Çƒ®ƒ­ €ˆ“ƒ°ƒ® €‰Å#„Ap,„?€ €Š–/ €‹™ €ŒÄ#„Ap,„?€ €“ƒ°ƒ® €Ž— €Ã#„Ap €™CHECK IF PERIOD EXPIRED OR NOT €‘“ƒ­‹‹„ ;;,„@€,„@;;…?+‹‹„ ;;,„?€,„@;;+…?+‹‹„ ;;,„@à,„@€;;+ €’£'ƒ­;ƒ­ €““‚›‚ €”£ƒ°;ƒ° €•“‚œ‚ €–™ €—”Še‚›‚œ-;;„A`>•v €˜„,„,„A˜,„@@ €™‘„,„ €š’…m €›‘„,„?€ €œ’…  €‘„,„@ €ž’…¸ €Ÿ“‚'„ € »„@À,…€,…Ï €¡»„@à,…,… €¢»„A,…‚,… €£»„A,…ƒ,…Ë €¤¬ €¥”‚'„?•° €¦­ÿÿÿÜ €§”‚'„A=•. €¨„,„,„A˜,„@@ €©ä €ª €«˜6”‚'„@À=•$ €¬£Ü„@€;, €­“‚'„ €®— €¯— €°– €±“‚ „ €²— €³¥ÿÿúÚ €¶¤Š; €·£%¢„A`;, €¸“‚$Š{„A`;; €¹”‚$„B =•* €ºÄ#„A`,„?€ €»£-3„A`;, €¼–n €½“ƒt‹ö„A ;; €¾“ƒs‹ö„A ;; €¿“ƒb‹ö„A ;; €À“ƒc‹ö„A ;; €Á— €£'2„A`;, €Ô‹Ž‹‘ƒt;;;;…/=‹Ž‹‘ƒs;;;;…/=|‚$„=|•8 €Ä£<„;, €Å”‚„=• €Æä €Ç €È— €É— €Ê¥ÿÿþ €ͤ ”.‚Ÿ;ƒ¿‚žƒăÃÁƒÀƒ·‚¡ƒ±ƒ²‚ ‚ƒ³ƒ´ƒµƒ¶ƒ¸ƒ¹ƒºƒ»ƒ¼ƒ½ƒ¾ €΄,„,„A˜,„@@ €Ï»„ €Й,BLOCK REG. VERSION FOR DEMO VERSION FLAG ... €Ñ”‚Ÿ„=•8 €Ò“ƒ¿‹ƒ„AP;;…Y+ €Ó“‚ž„ €Ô˜F”‚Ÿ„>•4 €Õ“ƒ¿‹ƒ„AP;;…Á+ €Ö“‚ž„A@ €×— €ج €Ù“‚ „ €Ú“‚„ €Û“ƒÄ‹Œ…¨,…7ƒ¿+,…/,…¹,‚Ÿ,„A ;; €Ü£¡„?€;, €Ý”‚ „¿€=•° D €Þ“ƒËŒ…§,…7ƒ¿+,…/,…¹,‚Ÿ,„A ;; €ߣ9„?€;, €à”‚ „¿€=•° Ü €ᓃ‹Œ…º,…Dƒ¿+,…/,…¥,‚ž,„A@;; €â£Ñ„?€;, €㔂 „¿€=•° t €䔋Ž‹‘ƒÄ;;;;…/=‹Ž‹‘ƒÃ;;;;…/=&•) €哃‹ø „A@,…B;; €æ–- €瓃ċދ‘ƒÄ;;;; €蓃ËŽ‹‘ƒÃ;;;; €铃ÁƒÄ €꓃Àƒà €듃ăăÃ+ €쓃ÃÃÄ+ €퓃·…/ €î›9‚¡„?€œ‚ÚŠzƒÄ;;‚Õ„?€ €±‹Ž‹÷Šf‹ƒÄ,‚¡,„?€;;;;;;;; €ð“ƒ²‹Ž‹÷Šf‹ƒÃ,‚¡,„?€;;;;;;;; €ñ“‚ ŠÝ%ƒ±;;ŠÝ%ƒ²;;‚¡+* €ò“ƒ·ƒ·‹Ž‹÷Še‚ ;;;;;;+ €óžÿÿÿ‚¡‚Ú‚Õ €ô“‚„ €õ›{‚¡„?€œ‚ÚŠzƒ·;;‚Õ„?€ €ö“‚‚ŠÝ%‹ƒ·,‚¡,„?€;;;;+ €÷žÿÿÿÁ‚¡‚Ú‚Õ €ø €ù“ƒ±‹‹Ž‹‘ƒÄ;;;;,„?€,„?€;; €ú“ƒ²‹‹Ž‹‘ƒÄ;;;;,„@@,„?€;; €û“ƒ³‹‹Ž‹‘ƒÄ;;;;,„@€,„?€;; €ü“ƒ´‹‹Ž‹‘ƒÃ;;;;,„@,„?€;; €ý“ƒµ‹‹Ž‹‘ƒÃ;;;;,„@@,„?€;; €þ“ƒ¶‹‹Ž‹‘ƒÃ;;;;,„@€,„?€;; €ÿ“ƒ¸‹Ž‹÷‚Še‚6„A@+Šfƒ±;;-;;*;;;; €“ƒ¹‹Ž‹÷‚Še‚6„AÀ+Šfƒ²;;-;;*;;;; €“ƒº‹Ž‹÷‚Še‚6„A0+Šfƒ³;;-;;*;;;; €“ƒ»‹Ž‹÷‚Še‚6„A+Šfƒ´;;-;;*;;;; €“ƒ¼‹Ž‹÷‚Še‚6„A¨+Šfƒµ;;-;;*;;;; €“ƒ½‹Ž‹÷‚Še‚6„A¨+Šfƒ¶;;-;;*;;;; €“ƒ¾ƒ¸ƒ¹+ƒº+ƒ»+ƒ¼+ƒ½+ €”Šzƒ¾;;„A@>•+ €“ƒ¾‹ƒ¾,„?€,„A@;; €— € — € ”ƒƒ¾=•Ê € “‚„¿€ € € ‘„,„ €’… €‘„,„?€ €’… €‘„,„@ €’… €£2„A`;, €“ƒtƒÁ €“ƒsƒÀ €£Ç„A`;, €Å#„A`,„?€ €£I„A`;, €˜J”ƒ‹ø „A@,…B;;=•Ê €“‚„¿€ € €‘„,„ €’… €‘„,„?€ €’… € ‘„,„@ €!’… €"£F„A`;, €#“ƒt…¼ €$“ƒs…¼ €%£Û„A`;, €&Å#„A`,„?€ €'£]„A`;, €(–^ €) €*‘„@ ,„ €+’…¿ €,£¿„A`;, €-£„A`;, €.£^„A`;, €/ä €0 €1— €2“‚'„ €3»„A,…ƒ,…œ €5¬ €6”‚'„?•° €7­ÿÿÿÜ €8„,„,„A˜,„@@ €9»„ €:”ƒƒ¾=• €;£n; €<— €=° €>­ÿÿõ6 €?”‚ „¿€=•4 €@„,„,„A˜,„@@ €A»„ €Bä €C €D— €E¥ÿÿóu €H¤8; €I“‚ „ €J¬ €K“ƒb‹Œ…k,…5,…/,…¹,„,„A ;; €L”‚ „¿€=•°K €M“ƒc‹Œ…l,…5,…/,…¹,„,„A ;; €N° €O­ÿÿÿc €P”‚ „=•` €Q£¯„A`;, €RÄ#„A`,„?€ €Sǃðƒb €Tǃñƒc €UÅ#„A`,„?€ €VÃ#„A` €W— €X¥ÿÿþÑ €[¤¥|8ƒÎ;ƒƃǃȃɃʃ˃̃Í‚¢ƒÅ €\™PROGRAMM INFORMATION SCREEN" €^„,„,„A˜,„@@ €_“ƒÆ… €`”‹Ž‹‘ƒb;;;;…/=• €a“ƒÇ… €b– €c“ƒǃb €d— €e“ƒÈ… €f“ƒÉ‹Ž‹‘ƒt;;;; €g“ƒÊ‹Ž‹‘ƒs;;;; €h“ƒË…R €i”‹Ž‹‘ƒc;;;;…/=• €j“ƒÌ…= €k– €l“ƒ̃c €m— €n‘„,„?€ €o’ƒÈ €p‘Šy„A ŠzƒÉ;;-„@/;;,„@ €q’ƒÉ €r‘Šy„A ŠzƒÊ;;-„@/;;,„@@ €s’ƒÊ €t“ƒÍ…/ €u›Ž‚¢„A œ‚Ú„?€‚Õ„¿€ €v“ƒÅ‹ƒÆ,‚¢,„?€;; €w“ƒ̓ŃÍ+ €x‘„,„ €y’ƒÍ €zžÿÿÿ£‚¢‚Ú‚Õ €{£¼„@@;, €|„,„,„A˜,„@@ €}‘„,„ €~’ƒÇ €‘„,„?€ €€’ƒË €‘„,„@ €‚’ƒÌ €„”ƒÎ…À=•î €…“‚'„ €†”‹Ž‹‘ƒt;;;;…¼=‹Ž‹‘ƒt;;;;…¼=&•»„A,…ƒ,…Ï €‡»„@À,…€,…Ì €ˆ¬ €‰”‚'„?•° €Š­ÿÿÿÜ €‹”‚'„A=•$ €Œ£ÿÿíé„@€;, €“‚'„ €Ž— €– €£?„@@;, €‘“‚b„¿€ €’›Ñ‚¢„œ‚Ú„A˜‚Õ„?€ €“”‚b„¿€=•; €”›*‚b„œ‚Û„@@‚Ö„?€ €•‘‚¢,‚b €–’‹ƒ„C_;; €—›9‚c„?€œ‚Ü„B‚ׄ?€ €˜žÿÿÿø‚c‚Ü‚× €™‘‚¢,‚b €š’‹ƒ„C!;; €››9‚c„?€œ‚Ü„B‚ׄ?€ €œžÿÿÿø‚c‚Ü‚× €‘‚¢,‚b €ž’‹ƒ„C~;; €Ÿžÿÿÿ‚b‚Û‚Ö € ˜I”‚b„@€=•7 €¡›*‚b„@@œ‚Û„‚Ö„¿€ €¢‘‚¢,‚b €£’‹ƒ„C!;; €¤›9‚c„?€œ‚Ü„B‚ׄ?€ €¥žÿÿÿø‚c‚Ü‚× €¦‘‚¢,‚b €§’‹ƒ„C_;; €¨›9‚c„?€œ‚Ü„B‚ׄ?€ €©žÿÿÿø‚c‚Ü‚× €ª‘‚¢,‚b €«’‹ƒ„C~;; €¬žÿÿÿ‚b‚Û‚Ö €­— €®žÿÿý`‚¢‚Ú‚Õ €¯™END IF €°— €±„,„,„A˜,„@@ €²»„ €³“‚'„ €´¥ÿÿød €¶¤ò ƒÏ;‚£‚¤‚¥ €·“‚£ŠÝ%‹ƒÏ,„?€,„@;;;; €¸“‚¤ŠÝ%‹ƒÏ,„@€,„@;;;;„?€-„Aô* €¹“‚¥ŠÝ%‹ƒÏ,„@à,„@€;;;;„C¶žú* €º“‚Šy‚£‚¤+‚¥+;; €»¥ÿÿÿ €½¤D ‚¦;‚§ €¾™BLOCK VERSION 1.0 €¿“‚ „ €À”Šj;;„?•Z €Á™778 €ÂÝ„?€,T‚¦£Î; €ì €Ä”‚ •° €Å­ÿÿÿâ €ÆÝ„?€,O €Ç˜Š”Šj;;„=•r €È™ SIMULATOR €É›S‚§„?€œ‚Ú„C¥‚¦*‚Õ„?€ €Ê”‚ •¯ €Ëžÿÿÿä‚§‚Ú‚Õ €Ì— €Í¥ÿÿþÅ €Ϥ" ; €Г‚ „¿€ €Ñ¥ÿÿÿç €Ó¤(;‚ªƒÒƒуÐ €Ô“‚ªŠÔ„?€;; €Õ”‚ª„=• €Ö™,******************************************** €דƒÒ‹ø Šz‹Ž‹÷Ši„?€;;;;;;;;,…0;; €Ø“ƒÑ‹ø Šz‹÷Šx„?€;;;;;;Šv‹÷Šx„?€;;;;,…@;;-,…0;; €Ù™.********************************************** €Ú”Šv‹÷Šx„?€;;;;,…@;;„?•“ƒƒÒ…@+ƒÑ+ €Û”Šv‹÷Šx„?€;;;;,…@;;„=• “ƒƒÒ €Ü™.********************************************** €Ý“ƒЃÒƒÑ+ €Þ˜°”‚ª„?€=•` €ß‘„,„ €à’…, €á‘„,„?€ €â’…+ €ã‘„,„@ €ä’… €åä €æ €ç˜?”‚ª„@=•` €è‘„,„ €é’…' €ê‘„,„?€ €ë’… €ì‘„,„@ €í’… €îä €ï €ð˜Î”‚ª„@€=•, €ñ‘„,„?€ €ò’…[ €óä €ô €õ˜‘”‚ª„A=•F €ö‘„,„ €÷’…° €ø‘„,„?€ €ù’…± €úä €û €ü˜:”‚ª„A€=•( €ý‘„,„?€ €þ’… €ÿä € €— €¥ÿÿûï €¤s,‚¬;‚« €“‚¬‚¬„BÈ* €›9‚«„?€œ‚Ú‚¬‚Õ„?€ €žÿÿÿø‚«‚Ú‚Õ €¥ÿÿÿ– € ¤¹ 5;‚®‚­‚¯ € ”Šk„?€;;„>•w € “‚®Šo ;; € “‚­Šh;; €”Še‚®;;‚­„=#× *<• €Ú €– €“‚¯„¿€ €— €— €¥ÿÿÿP €™+---------- Start Of [OPENPRN(),CLOSEPRN(),] €¤&+; €ƒq›‡#‚/ €¥ÿÿÿã €¤; €Ã#‚/ €¥ÿÿÿë € ¤Ù 6ƒÓ‚°ƒÔ‚±; €!“ƒPƒÓ €"“ƒQƒÔ €#„,‚°,„A˜,‚° €$‘Šy„A ŠzƒP;;-„@/;;,‚° €%’ƒP €&‘Šy„A ŠzƒQ;;-„@/;;,‚± €'’ƒQ €(¥ÿÿÿ0 €+¤®‚²; €,”ŠzƒP;;‚²>•+ €-“ƒP‹ƒP,„?€,‚²;; €.— €/”ŠzƒQ;;‚²>•+ €0“ƒQ‹ƒQ,„?€,‚²;; €1— €2¥ÿÿÿ[ €5¤»7‚´ƒÕ‚³; €6”‚³„?• €7 €8»„ €9— €:“‚„BÆ €;£ÿÿþ ƒÕ,‚´,…/,„B ;ƒÕ‚´,, €<“‚„BÆ €=”‚³„?•£ÿÿöb‚³;‚³ €>¥ÿÿÿN €A¤; €B”‹û&„@@;;…M?•Ï €C™PERHAPS RUNNING IN 778! €D €E‘„,„ €F’… €G‘„,„@À €H’… €I‘„,„A@ €J’… €K»„A,…ƒ,…& €L¬ €M”‚'„?•° €N­ÿÿÿÜ €O €P»„ €Qä €R €S— €T¥ÿÿÿ €W¤¢ 0;ƒÖ €X“‚ „ €Y¬ €Z“ƒÖ‹‹ù";;,„@;;‹‹ù";;,„@€,„@;;+ €[“ƒÖ‹Œ…µ,…9,ƒÖ,…—,„@€,„@€;; €\­ÿÿÿu®ŠÝ%ƒÖ;;„Ep[ €]”‚ „=•4Ö‹ƒÖ,„@;;…O+‹ƒÖ,„@;;+ €^¬ €_“ƒÖ‹‹„ ;;,„@€,„@;;‹‹„ ;;,„?€,„@;;+‹‹„ ;;,„@à,„@€;;+ €`“ƒÖ‹Œ…j,…8,ƒÖ,…—,„A,„A;; €a­ÿÿÿL®ŠÝ%‹ƒÖ,„?€,„@;;;;„B<ŠÝ%‹ƒÖ,„@@,„@;;;;„AP<& €b”‚ „=•c׋ƒÖ,„@@,„@;;…?+‹ƒÖ,„?€,„@;;+…?+‹ƒÖ,„@ ,„@€;;+ €c¥ÿÿýg €f™1COMMON SUBROUTINES ****************************** €i¤^*‚µ; €j™$GENERATION DATE: 22.10.2001 12:22:43 €k¾‚¶‚µ €l¿ý¢„?€ €m™LENFORMATFILE1 = 72 €n“‚„A¨ €o“‚‚ €pÂ…¦,#„?€,…”,‚ €qÆ#„?€,„@à‡ƒC,„@à‡ƒ,„@à‡ƒê €r“‚A„?€ €s¿R „@ €u¿<†„@@ €v“‚„Aè €w“‚‚ €xÂ…¦,#„@@,…’,‚ €yÆ#„@@,„?€‡ƒò,„A ‡ƒï,„A‡ƒB €z“‚I„?€ €{¿­ „@€ €}¿—’„A` €~“‚„B  €“‚‚ €€Â…¦,#„A`,…¾,‚ €Æ#„A`,„A ‡ƒ ,„A ‡ƒ ,„A ‡ƒð,„A ‡ƒñ €‚“‚F„?€ €ƒÁ €„¥ÿÿý« €‡¤Q‚·; €ˆ™%GENERATION DATE: 13.12.2001 11:42:08 €‰Ã#‚· €Š¥ÿÿÿ¸ €Œ¤ü%‚¸; €™#GENERATION DATE: 15.04.02 11:42:07 €޾‚¹‚¸ €¿œ„?€ €Ë…” €‘¿|„@ €’Ë…n €“¿\„@@ €”Ë…’ €•¿<„@€ €–Ë…p €—¿„@  €˜Ë…o €™Á €š¥ÿÿÿ € ¤>‚º; €¡™$GENERATION DATE: 22.10.2001 12:22:43 €¢¾‚»‚º €£¿µ÷„?€ €¤ÇƒC‹ö„@à;; €¥ÇƒC‹Ž‹÷‚];;;; €¦Çƒ‹ö„@à;; €§Çƒ‹Ž‹÷‚V;;;; €¨Çƒê‹ö„@à;; €©Çƒê‹Ž‹÷‚P;;;; €ª™LSET F.ITEM.DESC$ = SPACE$(20) €«™ LSET F.ITEM.DESC$ = T.ITEM.DESC$ €¬™LSET F.ITEM.SIZE$ = SPACE$(20) €­™!LSET F.FIELD.MARKER2$ = CHR$(202) €®™ LSET F.ITEM.SIZE$ = T.ITEM.SIZE$ €¯™ LSET F.ITEM.WEIGHT$ = SPACE$(12) €°™1LSET F.ITEM.WEIGHT$ = LTRIM$(STR$(T.ITEM.WEIGHT)) €±¿µ „@ €³¿Ÿ„@@ €´Çƒò‹ƒ„CI;; €µÇƒï‹ö„A ;; €¶Çƒïƒa €·ÇƒB‹ö„A;; €¸ÇƒB‹Ž‹÷‚\;;;; €¹¿ „@€ €»¿ñ2„AP €¼Çƒ‹Ž‹÷‚T;;;; €½¿¶±„A` €¾Çƒ ‹ö„A ;; €¿Çƒ ƒt €Àǃ ‹ö„A ;; €Áǃ ƒs €Âǃð‹ö„A ;; €Ãǃðƒb €Äǃñ‹ö„A ;; €Åǃñƒc €ÆÁ €Ç¥ÿÿûó €ʤa‚¼; €Ë™$GENERATION DATE: 22.10.2001 12:22:43 €̾‚½‚¼ €Í¿Ï„?€ €ΙT.ITEM.DESC$ = F.ITEM.DESC$ €Ï™T.ITEM.SIZE$ = F.ITEM.SIZE$ €Й#T.ITEM.WEIGHT = VAL(F.ITEM.WEIGHT$) €Ñ“‚]ŠÝ%ƒC;; €Ò“‚VŠÝ%ƒ;; €Ó“‚PŠÝ%ƒê;; €Ô¿(A„@ €Õ™+T.MAX.REP.RECORDS = VAL(F.MAX.REP.RECORDS$) €Ö¿Þ6„@@ €דƒaƒï €Ø“‚\ŠÝ%ƒB;; €Ù¿Ÿ „@€ €Û¿‰2„AP €Ü“‚TŠÝ%‹Žƒ;;;; €Ý¿NI„A` €Þ“ƒtƒ €ß“ƒsƒ €à“ƒbƒð €ᓃcƒñ €âÁ €ã¥ÿÿý¨ €å¤´‚¾;ƒ× €æ™$GENERATION DATE: 22.10.2001 12:22:43 €ç¾‚¿‚¾ €è¿Nk„?€ €é™T.ITEM.DESC$ = SPACE$(20) €ê™T.ITEM.SIZE$ = SPACE$(20) €ë™T.ITEM.WEIGHT = 0 €ì¿Ú „@ €î¿ÄA„@@ €a‹ö„A ;; €ð“ƒ׋ö„A;; €ñ¿zu„A` €ò“ƒt‹ö„A ;; €ó“ƒs‹ö„A ;; €ôǃð‹ö„A ;; €õǃñ‹ö„A ;; €öÁ €÷¥ÿÿþU €ù¤ô ƒØ; €ú”ŠzƒØ;;„?€=•à €û™ USUAL KEYBOARD, ENTER, SPACE ... €ü“‚'Šf‹ƒØ,„?€,„?€;;;; €ý”ŠfƒØ;;„B=• €þ“‚'„B €ÿ— € ™#IF MAINMENU = 8 THEN MAINMENU = 108 € ˜ ”ŠzƒØ;;„@=•ƒ € ™ESC OR ARROWS ... € “‚'„Šf‹ƒØ,„@,„?€;;;;- € ™$ IF MAINMENU = -8 THEN MAINMENU = 88 € — € ™# CALL DEBUG(LTRIM$(STR$(MAINMENU))) € ™% CALL DEBUG(LTRIM$(STR$(LEN(KBRD$)))) € ¥ÿÿþ € ¤g 2;ƒÙ € Â…¦,#„Ap,…¤,‚> € Æ#„Ap,„A‡ƒ,„@@‡ƒ@ € ”Š{„Ap;;‚>?•m € ™ € ǃ‹ö„A;; € ǃ@‹ö„@@;; € ™ € ǃ…` € ǃ@…C € – € Ä#„Ap,„?€ € — € “ƒqƒ € “ƒwƒ@ € Å#„Ap,„?€ € Ã#„Ap € Â…¦,#„A0,…•,„@à € Æ#„A0,„@€‡ƒ,„@@‡ƒÙ € Ä#„A0,„?€ € “ƒpƒ € ”ŠÝ%ƒp;;„=• “‚<„¿€ € !Ã#„A0 € "£ÿÿð/„?€;, € #”Š{„?€;;„=•6 € $“‚]„Bp € %“‚V„CH € &“‚P„BÈ € '–' € (Ä#„?€,„?€ € )£ÿÿ÷™„?€;, € *— € +£ÿÿò „?€;, € ,¥ÿÿý¢ € .¤”d4ƒÜ;ƒÛƒÚƒàƒ݃߃Þƒá‚À € /”ƒÜ…¢=• € 0“ƒÛƒq € 1˜&”ƒÜ…®=• € 2“ƒÛƒu € 3— € 4“ƒÚƒÛ € 5“ƒà‹ƒÛ,„@€,„?€;; € 6“ƒÝ‹ƒÛ,ŠvƒÚ,…O;;„?€+,ŠvƒÚ,…>;;ŠvƒÚ,…O;;-„?€-;; € 7“ƒß‹ƒÛ,ŠvƒÚ,…>;;„?€+,„?€;; € 8“ƒÞ‹ƒÛ,ŠvƒÚ,…>;;„@@+,„?€;; € 9“ƒá‹ƒÛ,ŠvƒÚ,…>;;„@ +,„?€;; € :™************************** € ;‘„,„ € <’‹ö„@À;;ƒÜ+ € =»„A˜,…z,…Ò € >‘„,„@ € ?’…Ò € @»„@À,…€,…X € A»„@à,…,…£ € B»„A,…‚,…g € C»„A,…ƒ,…­ € D»„A¸,…~,…Ý € E‘„A@,„@ € F’…Ý € G™************************** € I“ƒÛ…^ƒà+…O+ƒÝ+…>+ƒß+…>+ƒÞ+…>+ƒá+ € J¬ € K™PRINT CURRENT.TYPE$ € L‘„,„?€ € M½…Ã;… € N‘„,„?€ € O’ƒÛ € P“‚'„ € Q¬ € R”‚'„?•° € S­ÿÿÿÜ € T“‚ÀŠk„@;;„@*„@+ € U™ € V”‚'„A˜=•j € W“ƒà‹Ž‹÷ŠÝ%ƒà;;„?€+;;;; € X”ŠÝ%ƒà;;‚À>• “ƒà…C € Y˜¡”‚'„@À=•Ö € Z”ƒÝ…E=• € [“ƒÝ…H € \˜¡”ƒÝ…H=• € ]“ƒÝ…L € ^˜x”ƒÝ…L=• € _“ƒÝ…N € `˜O”ƒÝ…N=• € a“ƒÝ…F € b˜&”ƒÝ…F=• € c“ƒÝ…E € d— € e˜º”‚'„@à=•Ö € f”ƒß…q=• € g“ƒß…š € h˜¡”ƒß…š=• € i“ƒß…‹ € j˜x”ƒß…‹=• € k“ƒß…— € l˜O”ƒß…—=• € m“ƒß…¬ € n˜&”ƒß…¬=• € o“ƒß…q € p— € q˜Ó”‚'„A=•j € r“ƒÞ‹Ž‹÷ŠÝ%ƒÞ;;„?€+;;;; € s”ŠÝ%ƒÞ;;„A>• “ƒÞ…K € t˜X”‚'„A=•J € u”ƒá…C=• € v“ƒá…G € w– € x“ƒá…C € y— € z˜ý”‚'„A¸=•ë € {™SAVE € |“ƒÛ…^ƒà+…O+ƒÝ+…>+ƒß+…>+ƒÞ+…>+ƒá+ € }”ƒÜ…¢=• € ~“ƒqƒÛ € ˜&”ƒÜ…®=• € €“ƒuƒÛ € — € ‚™ € ƒ£Ÿ; € „»„ € …„,„,„A˜,„@@ € †°c € ‡— € ˆ“ƒÛ…^ƒà+…O+ƒÝ+…>+ƒß+…>+ƒÞ+…>+ƒá+ € ‰“‚'„ € Š­ÿÿúÇ € ‹¥ÿÿ÷u € ޤò3; € Â…¦,#„Ap,…¤,‚> € Æ#„Ap,„A‡ƒ,„@@‡ƒ@ € ‘™ € ’ǃ‹ö„A;; € “™ € ”ǃƒq € •ǃ@‹ö„@@;; € –ǃ@‹Ž‹‘ƒw;;;; € —™ € ˜Å#„Ap,„?€ € ™Ã#„Ap € š¥ÿÿÿ € ¤{ ;ƒã € ž¬ € Ÿ“ƒã‹Œ…W,…/,ƒã,…¹,„,„@À;; €  ”‚ •° € ¡° € ¢­ÿÿÿ¡ € £¥ÿÿÿŽ € ¥¤T,-ƒæ;ƒäƒå‚‚à € ¦“‚/„Ap € §“ƒä‹‹„ ;;,„@€,„@;;…?+‹‹„ ;;,„?€,„@;;+…?+‹‹„ ;;,„@à,„@€;;+ € ¨“ƒå‹‹ù";;,„@ ;; € ©“‚ŠÝ%ƒw;; € ª“‚‚„?€+ € «“ƒw‹÷‚Â;; € ¬™START OF TM-295 € ­“‚Ä?€ € ®£ÿÿ݇; € ¯™+TICKET ************************************ € °’#‚/,‹ƒ„AØ;;;….;‹ƒ„B;; € ²™CALL OPENPRN() € ³™ INIT PART € ´™LF$ = CHR$(13) € µ™PRINT #PRINTER, LF$ € ¶™LOAD FORM ncsbl1 € ·’#‚/,…/ € ¸’#‚/,…/ € ¹”ƒæ…²=•– € º™4PRINT #PRINTER, "FR"+CHR$(34)+"NCSBL1E"+CHR$(34)+LF$ € »™3PRINT #PRINTER, "FR"+CHR$(34)+"MANWT1"+CHR$(34)+LF$ € ¼™PRINT #PRINTER, "US"+LF$ € ½™PRINT #PRINTER, "?"+LF$ € ¾’#‚/,…/ € ¿’#‚/,…/ € À’#‚/,ƒä;…;ƒå € Á’#‚/,…/ € Â’#‚/,…/ € Ã’#‚/,ƒa € Ä’#‚/,…/ € Ž#‚/,ƒ…1+;‚_;…" € Æ™$PRINT #PRINTER, T.TICKET.NUMBER$+LF$ € ǘ0”ƒæ…¦=• € È™4 PRINT #PRINTER, "FR"+CHR$(34)+"MANWT2"+CHR$(34)+LF$ € É™PRINT #PRINTER, "US"+LF$ € Ê™PRINT #PRINTER, "?"+LF$ € Ë’#‚/,ƒa € Ì’#‚/,…/ € Í™#PRINT #PRINTER, STR$(T.TOTAL)+" KG" € ν#‚/,ƒ…1+;‚\;…" € Ï™!IF YES$ = "NO" OR YES$ = "N" THEN € З € Ñ™CPRINT #PRINTER, USING WEIGHT.FORMAT1$+" \ \";TMP.NETWEIGHT;"KG"+LF$ € Ò™USE BY € Ó’#‚/,‹ƒ„AØ;;;….;‹ƒ„;; € Ô™ PAPER RELEASE € Õ’#‚/,‹ƒ„AØ;;;…Î; € Ö£ÿÿÑÔ„?€;, € ×£ÿÿØú; € Ø™ END OF TM 295 € Ù™CALL SETUP.WRITE() € Ú™END IF € Û¥ÿÿùµ € Þ™ANEW SEARCH BLOCK - GLOBAL.SEARCH ******************************** € ߤ0`"‚Ńêƒé;ƒè‚Æ‚Ƀç‚ăëƒì‚È‚Ç € à“ƒè…/ € ᓃ\ƒé € │ń?€=•Œ € 㓃è…“ € ä™STRING2FIND$ = 20C € å™ASTRING2FIND$ = LEFT$(LTRIM$(RTRIM$(STRING2FIND$))+SPACE$(20), 20) € æ“‚„A¨ € 瘚”‚Å„@@=•ˆ € 蓃è…’ € é™STRING2FIND$ = 20C € ê™ASTRING2FIND$ = LEFT$(LTRIM$(RTRIM$(STRING2FIND$))+SPACE$(20), 20) € ë“‚„Aè € ì— € î™*ADJUST MAX FIELD SIZE TO BE /LENFORMATFILE € ï“‚Æ‚„BÈ* € ñ›p‚ɂƜ‚Ú‚‚Õ„¿€ € ò”Šy‚É‚/;;‚É‚/-„=•¯ € óžÿÿÿÁ‚É‚Ú‚Õ € ô“‚Æ‚É € õÂ…¦,#‚Å,ƒè,‚Æ € öÆ#‚Å,‚Ƈƒç € ÷“‚Ä„ € ø“‚4„ € ù“‚„ € ú“ƒë…/ € û“ƒë‹ƒ„CI;;ƒê+ € ü›ù‚É„?€œ‚ÚŠyŠ{‚Å;;‚Æ/;;„?€+‚Õ„?€ € ýǃç‹ö‚Æ;; € þÄ#‚Å,‚É € ÿ£ÿÿͬ„=ÌÌÍ;, € ”ƒ\…w=•8 € “ƒìƒç € “‚Švƒì,ƒë;; € ˜h”ƒ\…T=•V € “ƒì‹ƒç,‚,Š{‚Å;;;; € “‚Švƒì,ƒë;; € — € ™ CALL DEBUG("---") € ™ CALL DEBUG(T.FIELD$) € ™ CALL DEBUG(STRING2FIND.S$) € ™ CALL DEBUG(STR$(INSTR.DISP)) € ™ CALL DEBUG("---") € ”‚„>•« € “‚ĂĂ+ € “‚4Šy‚Ä‚/;;„?€+ € ”ƒ\…w=• € ¯¼ € ˜A”ƒ\…T=•/ € “‚ȂȄ?€+ € “‚Ç‚È;‚4 € — € – € “‚ĂĂÆ+ € — € ™.IF BYTES.FROM.TOP > LOF(FNUMBER) THEN EXIT FOR € žÿÿýZ‚É‚Ú‚Õ € Ã#‚Å € “ƒì…/ € “ƒç…/ € ¥ÿÿùÙ € ¤G ƒí; € Â…_›‡#„AP € !’#„AP,ƒí € "Ã#„AP € #¥ÿÿÿ € %™V SAMOM KONCE PROGRAMMI € &: € '„,„,„A˜,„@@ € (‘„,„ € )’…< € *‘„,„?€ € +’…v;‹÷Šn ;;;; € ,‘„,„@ € -’…‰;‹÷Šm ;;;; € .‘„,„@@ € /’…Ó € 0»„A ,…{,…Ô € 1»„AÀ,…,…Ü € 2“‚'„ € 3¬ € 4”ŠyŠÙ#;;„@/;;ŠÙ#;;„@/-„=•# € 5‘„,„ € 6’…< € 7–+ € 8‘„,„ € 9’‹ö„A ;; € :— € ;­ÿÿÿk®‚'„? € <„,„,„A˜,„@@ € =”‚'„AÀ=• € >ä € ? € @— € A“‚'„ € B¢ ªU