ءعu0€¼D Œى<88hکh¬h¸lLTp<sہ.ع|u0plu_invoice788p_a2.BA05/30/200712:34:10PD= WEIGHT. CARD BUSY. DATA SENT! TO REGISTER [+]-DOWN. DATA NOT SENT! FOLLOWING ERROR [BCKSPC]-UP, CONDITIONS OCCURED. ONE OR MORE OF THE SCALE CARD DID NOT STOPPED BY USER ! CALIBRATION REQUIRED. ID NO ANSWER FROM PC! PASSWORD > SIB: ANALOG FAILURE. SSI: ERROR CONDITION. DEMO PERIOD EXPIRED! NET: NEW PRODUCT > NEW PRODUCT > PHONE 00441284701222 PRINT INVOICE > RESPOND TO REQUEST FOR SCROLL LIST KEYS YES -> <- ALREADY EXISTS! AMMOUNT ESC MENU NO OK PC TRANSFER > PRICE: PRODUCT: PRODUCTS ADDED REC) RECORD RECORDS RETURN SETUP STOP STOP/BAUD:1,2 > YES YES [9]-LEFT,[0]-RIGHT, kg###.##&###.##\\\ \\\ #####.##% % (0-20 chars)(4 CHR)(4-20 CHARS)(DDMMYYYY)(HHMM)******* NO DATA! *********INTERNAL PROBLEM**+00 44 (0) 1284 701222,- BELOW ZERO -- CENTER ZERO -- MOTION -- OVER CAPACITY ------------------------->..REG00.1 PRODUCT ADDED112 DIGITS CODE120014 DAYS PERIOD1920022.424002909344800777 HARDWARE!7779600:< PRODUCTS < CUSTOMERS < COM PORT: 1, 2 < DATA/BAUD: 4-8 < PC LINK SETUP < PRINTER SETUP < TARE < ZERO < BAUD: 1200-19200 < COM PORT: 2,3,4 < COM PORT:1,2,3,4 < DEFAULT DATA ADD > EDIT > LIST > DELETE >A2 21 DEC 2005 15:40ABOUTACCEPT?ACCEPTEDACK READ ADD TO INVOICE>ALL EXISTING DATA!ALPHNUMERICALREADY EXIST!ARE YOU SUREAWMBLANK-14 DAYS TRIALBRAISING STEAK BEEFBY ANOTHER DEVICE!CCARDINAL MEATCHECK SCALE BOARD!CIS-OWN.DATCLEAR ACCUMULATOR?COM 1 MUST BE LAFT UNUSEDCOMCOM1:9600,N,8,1,BCOM2:9600,N,8,1,BCOM4:9600,N,8,1,BCOMMON.KEYSCOMMON.KEYS(KBRD$)CONFIRMATION SCREENCREATE DEFAULT DATA!CREATE DEFAULT DATA.CURRENT INVOICECURRENT SOFTWARE CURRENT SOFTWARECUSTOMER NAMECUSTOMER NAME: CUSTOMERCUSTOMER: CUSTOMERSCUSTOMERS/(DDATEDEALER FIRMDEALER TEL.DELETE RECORD?DELETE/(DEMO VERSIONEEDITEEPROM VER:ENTER TAREENTERERROR: EXITFMENU1FMENU10FMENU11FMENU12FMENU13FMENU14FMENU17FMENU18FMENU19FMENU2FMENU20FMENU21FMENU22FMENU222FMENU23FMENU24FMENU3FMENU4FMENU5FMENU6FMENU7FMENU8FMENU9FROM COM 1 TO 2, 3 OR 4 BEFOREFULL VERSIONGROSS:HIEGHIF THE INDICATOR ISINPUT IDINPUT PASSWORDIS WRITTEN FOR IS WRITTEN FORKEN HODGSONLLAMB CHOPSLICENCED TO USERLINE : LLMMAX 4 CHR,'0'- NONEMENUNNAK READ NAME, MAX 25 CHRNEWNEXT>NO DATA!NO SIO CARD!NON TRNOT FOUND!NOT PRINTED!NUMERICOOF PRINT AREA, DOTSOKPASSWORDPC TRANSFERPER KILOPLEASE CHANGE PC TRANSFER PORTPLEASE CHANGE PORT!PLEASE CHANGE PRINTER PORTPLU INVOICE SYSTEMPLUOPTIONPORK CHOPPORK LOIN STEAKSPORK RIBSPORK SHOWDERPRICE PER KGPRICE PER KILO: PRICEPRINT AREA, MAX.512 DOTSPRINTPRINTERPRODUCT NAMEPRODUCT NAME: PRODUCTPRODUCTS LISTPRODUCTSPRODUCTS/(PS-SETUP.DATPriceQRRECREC)REG FIRMREG NAMEREGREG.REPRINT INVOICE>RESTART>RETURNRUMP STEAK BEEFRUNSSCALE SHOPSEARCHINGSENDER DATA TO PCSIRLOW STEAK BEEFSKINLESS CHICKEN BREASTSTANDARD.RECALLSTANDARTLISTSTART NEW INVOICE?SWSWITCH TO TRADE MODE!TARE ERROR!TARETHAT PORT ALREADY IN USETHIS WILL DELETETIMETO EXITTO INVOICETO PRINT INVOICE?TOPSIDE BEEFTOTAL:TRADE APPROVED!TRADETS-4PC.DATTS-CUST.DATTS-INVC.DATTS-OWNER.DATTS-PROD.DATTS-SETUP.DATTYPE CUSTOMER NAME OR PUSH BUTTON TO RECALL/TYPE PRODUCT NAME OR PUSH BUTTON TO RECALL/UU.R.C.UNLIMITED PERIODUNREGISTEREDWAITING PCWIDTHWM-OWNER.DATWRONG CODE!WRONG PASSWORD!YYOU WANTYOUR 14 DAYS IS OVERYOUR HARDWARE:YOUR VER:\ \\ \ #####.## \ \\ \###.##\ \\ \\ \\ \\ \&###.##\ \\ \ \ \\ \\ \\ \\ \\ \&\ \\\\ \\\\ \\ \\ \\ \\ \\ \_kgper kg{END}+ELdj‚–›³حلû/GJdl„“اةلç÷0J^deim}…ٹگ”ک¦ ®¸بحصفنêً""5#X[]ip |†Œ¤¸خدف ىِ !%&(78FJX]^aeijk o|ƒ„کھہشو ÷ /B R[mr ~ ‹ ک،¢·¼أثقيے $':M_ `mٹœµ¸ةعëِ/CRd tپگ ک ¢«¶·»ئركçَôّ #*18?FMT[ahov~…Œ’ک‍¤ھ°¶ شلçىے & 4 ? @ J Z a c d w { | ڈ ں ¢ § ¯ » ء ث × ق ك ٍ ô ü - @ Z l u ~ ژ — £ ¯ ؟ ؤ ـ ل è ô (49:;>BJRUYiqw†‰ ٹ ”‌®؟ضهٌ%)AQU \fwƒ‰ک ‌§²½ةش,à+ 7 8 > N Z d i u € ڈ گ ک ¬ ؛4 أ$ ÷*EZq4…6¹ï9ô-.06BELOWZERO.KEYBLINCKTIMEBUFFERNBUFFERZEROCHANGE.STRINGCHANGE.WT.KEYCOUNTOFDAYSCURRENTFONTDELAY.FLAGDEMO.VERSIONDSPFONTDSPLOGICDSPXDSPYEDITEDRECORDERRNOEVENT11FORWARD.KEYGROSS.UPDATE.KEYINPUT.COMPLETEISREGISTEREDLABEL.OKLEN.AP1LEN.BP1LENBUFFERLENFORMATFILEMAINMENUNEW.EDITEDRECORDOCOC.KEYOLD.GROSSWEIGHTOLD.NETWEIGHTOLD.PRODUCT.PRICEOLD.SCALE.RATEOLD.SELECTED.PRICEPACKET.SIZEPACKET.TIMERPOINT.ADJUSTPRINT.ID.NAMEPRINT.ID.TIMEPRINTERPRODUCT.NUMBERPRODUCT.PRICEREADY.TO.PRINTRECNORECORDRECORDFOUNDRECORDFOUND.KEYREDUCEBUFFERREGIDREMOTEREMOTE.BUFFER.LENGTHREMOTE.BUFFER.LENGTH2REMOTE.HANDLERREMOTEUPDATE.KEYREPRINTRETURN.KEYSELECTED.CUSTOMER.NRSELECTED.PRICESETUP.FILE.LENGTHSHOWCURVAR.KEYSHOWTRACK.KEYSTSTATUSTT.4PC.AMMOUNTT.4PC.PRODUCT.PRICET.AUTO.PRINT.DELAYT.AUTO.PRINT.INTERVALT.GROSSWTT.INV.AMMOUNTT.INV.PRODUCT.PRICET.INV.WTT.NETWTT.PRODUCT.PRICE1T.PRODUCT.PRICE10T.PRODUCT.PRICE11T.PRODUCT.PRICE12T.PRODUCT.PRICE2T.PRODUCT.PRICE3T.PRODUCT.PRICE4T.PRODUCT.PRICE5T.PRODUCT.PRICE6T.PRODUCT.PRICE7T.PRODUCT.PRICE8T.PRODUCT.PRICE9T.TAREWTTMP.GROSSWEIGHTTMP.NETWEIGHTTMP.TAREWEIGHTTMP.WEIGHTVARTOTAL.PRICEWEIGHT.FORMAT1.LENWEIGHTING.COMPLITEYZZEROSTRING_ABS_N!_ASC_S!_BLOZERO_!_CAPACITY_!_CAPACITY_N!_CARDS_!_CARDS_N!_CZERO_!_EOF_N!_ERL_!_ERR_!_EXTENTX_S!_GROSS_!_IFP1_IFP2_IFP3_IFP4_IFP5_IFP6_INP_SSNNNN!_INSTR_SS!_INTERVAL_!_INTERVAL_N!_INT_N!_LEN_S!_LOC_N!_LOF_N!_MOTION_!_NET_!_OVERCAP_!_S11_FNUMBER_S12_FNUMBER_S12_T.PRODUCT.PRICE_S13_BYTES.FROM.TOP_S13_FNUMBER_S13_INSTR.DISP_S13_MAX.FIELD_S13_XS_S14_FIELD2FIND_S14_FNUMBER_S14_RECCOUNT_S15_FNUMBER_S15_N.RECORD.NUMBER_S16_FNUMBER_S16_N.RECORD.NUMBER_S17_PAR1_S18_OLDDSPFONT_S18_SHOW.PROCESS_S19_FNUMBER_S19_RECCOUNT_S1_ADD.PRODUCT.KEY_S20_RECNUMFILE_S20_X_S21_RECCOUNT_S21_X_S22_FNUMBER_S22_N.RECORD.NUMBER_S22_N3.RECORDS_S22_N4.RECORDS_S22_X_S2_TMP.CURRENTFONT_S3_BZ_S3_CZ_S3_MO_S3_X_S3_XW_S3_YW_S45_FILENUMBER_S45_LENFORMATFILE1_S45_LENFORMATFILE12_S45_LENFORMATFILE14_S45_LENFORMATFILE2_S45_LENFORMATFILE3_S45_LENFORMATFILE4_S45_STATUSFILE1_S45_STATUSFILE12_S45_STATUSFILE14_S45_STATUSFILE2_S45_STATUSFILE3_S45_STATUSFILE4_S46_FNUMBER_S47_FILENUMBER_S48_FILENUMBER_S48_SEL1_S48_T.4PC.VAT_S49_FILENUMBER_S49_SEL2_S4_OLDDSPFONT_S50_FNUMBER_S50_SEL3_S54_CATTEMPT_S54_RECCOUNT_S54_STARTREC_S54_STTIME_S54_TIMEDELAY_S54_X_S57_DISP_S57_DISP1_S57_PALL_S57_PCURRENT_S58_RECNR_S58_RECORDS_S59_T.PRINT.HIEGH_S59_T.PRINT.WIDTH_S5_TMP.CURRENTFONT_S60_T.PRINT.HIEGH_S60_T.PRINT.WIDTH_S61_T.PRINT.HIEGH_S61_T.PRINT.WIDTH_S63_SS_S64_SCALE.STATUS_S65_H_S65_NR_S65_STARTX_S65_STEPX_S65_TMP.WEIGHTVAR_S65_YWT_S66_CA_S66_GR_S66_ZEROERROR_S69_TMP.TARE_S6_CURMESSAGE_S6_FNUMBER_S6_LENGTHFILE_S6_RECNUMFILE_S6_UPDATEREC_S70_BOXNR1_S70_BUFFERSIZE_S70_BUFFERSIZE1_S70_BUFFERSIZE2_S70_BUFFERSIZE3_S70_BUFFERVAL1_S70_BUFFERVAL2_S70_X_S70_XB0_S70_XB1_S70_YB0_S70_YB1_S71_CURRENTDAYS_S71_STOREDDAYS_S72_LENGTH_S73_CHECK.SUM_S73_MIN.URC_S73_OLDDSPFONT_S73_REGMODE_S73_TEMP1_S73_X_S75_OLD.DSPFONT_S75_OLD.DSPX_S75_OLD.DSPY_S75_TEXT.FONT_S75_TEXT.SIZE_S75_TEXT.Y_S76_X_S77_XC_S77_YC_S79_DIGIT1_S79_DIGIT2_S79_DIGIT3_S7_FNUMBER_S80_DELAY.TIME_S80_SIMDLY_S84_T.CTLMODE_S8_BROWSELINES_S8_BROWSEREC_S8_BROWSEREC2_S8_FNUMBER_S8_FNUMBER.MAIN_S8_JUMPSTEP_S8_LINECOUNT_S8_OLDDSPFONT_S8_RECNUMFILE_S8_RECORDFILE_S8_X_S8_X_SCR_S9_ARRIND_S9_FNUMBER_S9_RECCOUNT_S9_RECORD2DELETE_S9_X_SCLSTAT_N!_STEP1_TARE_!_TIMER_!_TO1_VAL_S!ACK$ARRAY.FIELD$BATCH.CODE$BLINKDASH$BLOCK.COMMAND$BUFFER$BUFFERAR$BUFFERAR2$CATEGORY$CDATE$CTIME$CUSTOMER.NAME$DELETE.STR$ETX$F.4PC.AMMOUNT$F.4PC.CUSTOMER.NAME$F.4PC.DATE$F.4PC.PRODUCT.NAME$F.4PC.PRODUCT.PRICE$F.AUTO.PRINT$F.AUTO.PRINT.DELAY$F.AUTO.PRINT.INTERVAL$F.BATCH.NO$F.COLOR$F.CUSTOMER.NAME$F.DATE$F.DEALER.FIRM$F.DEALER.NAME$F.DEALER.PHONE$F.FIELD$F.GROSSWT$F.INDICATORMODE$F.INV.AMMOUNT$F.INV.CUSTOMER.NAME$F.INV.PRODUCT.NAME$F.INV.PRODUCT.PRICE$F.INV.WT$F.MARK11$F.MARK21$F.MARK22$F.NETWT$F.OPERATOR.ID$F.PASSWORD$F.PCTRANSFER.INI$F.PRINTER.INI$F.PRODUCT.NAME$F.PRODUCT.PRICE1$F.PRODUCT.PRICE10$F.PRODUCT.PRICE11$F.PRODUCT.PRICE12$F.PRODUCT.PRICE2$F.PRODUCT.PRICE3$F.PRODUCT.PRICE4$F.PRODUCT.PRICE5$F.PRODUCT.PRICE6$F.PRODUCT.PRICE7$F.PRODUCT.PRICE8$F.PRODUCT.PRICE9$F.REGISTRATION.FIRM$F.REGISTRATION.NAME$F.REMOTE.BUFFER$F.REMOTE.CHAR$F.SEND.GROSSWEIGHT$F.STATUS$F.TAREWT$F.TIME$FIELD22FIND$GRADE$HDR.ARRAY$HEADER.ARRAY$INDICATORMODE.BUTTON$INPUTMOD$KILLDATE$KILLNO$L.BUFFER$LEN.AFTER.POINT1$LF$LINE$LINE1$LIST.ARRAY$NAK$NEEDED.EEPROM.COMPILER.VERSION$NEEDED.EEPROM.HARDWARE.VERSION$NEEDED.EEPROM.VERSION$NOTE1$NOTE2$OLD.CUSTOMER.NAME$OLD.PRODUCT.NAME$OLD.SELECTED.CUSTOMER$OLD.SELECTED.PRODUCT$OLD.TIME$OLDBUFFER$OLDGROSS.ARRAY$OLDNET.ARRAY$OLDST$PRESENT.EEPROM.COMPILER.VERSION$PRESENT.EEPROM.HARDWARE.VERSION$PRESENT.EEPROM.VERSION$PRINTER.REPLY$PRODUCT.DESC1$PRODUCT.DESC2$REMOTE.GROSSWEIGHT$REMOTE.ST$SEARCHMODE$SELECTED.CUSTOMER$SELECTED.PRODUCT$SEND.COMMAND$ST$STATUS$STX$SUPPLIER.CODE$T.4PC.CUSTOMER.NAME$T.4PC.DATE$T.4PC.PRODUCT.NAME$T.AUTO.PRINT$T.BATCH.NO$T.COLOR$T.CUSTOMER.NAME$T.DATE$T.DEALER.FIRM$T.DEALER.PHONE$T.INDICATORMODE$T.INV.CUSTOMER.NAME$T.INV.PRODUCT.NAME$T.MARK11$T.MARK21$T.MARK22$T.OPERATOR.ID$T.PASSWORD$T.PCTRANSFER.INI$T.PRINTER.INI$T.PRODUCT.NAME$T.REGISTRATION.FIRM$T.REGISTRATION.NAME$T.STATUS$T.TIME$TMP.WTVAR$TYPEMODE$WEIGHT.FORMAT1$WT.FUNCTION$WT.SPASE$_CHR$_N!_DATE$_!_FILE$_S!_IFP1$_IFP2$_IFP3$_IFP4$_IFP5$_IFP6$_INP$_SSSS!_INP$_SSSSNN!_LEFT$_SN!_LTRIM$_S!_MID$_SN!_MID$_SNN!_RIGHT$_SN!_RTRIM$_S!_S10_SUBNAME$_S13_FILE.NAME$_S13_STRING2FIND$_S13_STRING2FIND.S$_S14_FIELD.NAME$_S15_EDITMODE$_S15_LINE1$_S15_ORDER.MODE$_S16_ORDER.MODE$_S18_LINE1$_S19_LINE1$_S1_LINE1$_S1_PASSWORD$_S20_SDAY$_S20_SMONTH$_S20_SYEAR$_S21_SDAY$_S21_SMONTH$_S21_SYEAR$_S2_LINE1$_S3_CURRENTDATE$_S3_CURRENTTIME$_S3_LINE1$_S3_UT$_S45_F.TEMP1$_S45_F.TEMP10$_S45_F.TEMP11$_S45_F.TEMP12$_S45_F.TEMP2$_S45_F.TEMP3$_S45_F.TEMP4$_S45_F.TEMP5$_S45_F.TEMP6$_S45_F.TEMP7$_S45_F.TEMP8$_S45_F.TEMP9$_S4_LINE1$_S4_TMPSECURE$_S53_VALUE$_S54_EMPTY.FILD1$_S54_EMPTY.FILD2$_S54_EMPTY.FILD3$_S54_LINE1$_S57_LINE1$_S59_CI$_S59_CURRENT.INI$_S59_DEVICEMODE$_S59_LINE1$_S59_T.BAUD$_S59_T.DATA$_S59_T.PARITY$_S59_T.PORT$_S59_T.STOP$_S5_LINE1$_S60_F.PRINT.HIEGH$_S60_F.PRINT.WIDTH$_S61_F.PRINT.HIEGH$_S61_F.PRINT.WIDTH$_S62_LINE1$_S63_LEN.BEFORE.POINT1$_S64_BADCODE.FORMAT$_S64_LEN.BEFORE.POINT1$_S65_TMP.WEIGHTVAR$_S67_LINE1$_S68_NEEDED.EE.COMPILER$_S68_NEEDED.EE.HARDWARE$_S68_NEEDED.EE.VERSION$_S68_PRESENT.EE.COMPILER$_S68_PRESENT.EE.HARDWARE$_S68_PRESENT.EE.VERSION$_S6_LINE1$_S70_CURRENT.VARIABLE$_S70_LINE1$_S70_MODE$_S70_STANDART.NEW.HEADER1$_S70_STANDART.NEW.HEADER2$_S71_CURRENTDATE$_S71_F.DATE.INST$_S71_REGFILE$_S71_T.DATE.INST$_S73_CHAR1$_S73_CHAR2$_S73_CHAR3$_S73_CHAR4$_S73_CHAR5$_S73_CHAR6$_S73_CHECK.CODE$_S73_CODE1$_S73_CODE2$_S73_CODE3$_S73_CODE4$_S73_CODE5$_S73_CODE6$_S73_FINAL.CODE$_S73_INP.PROMPT$_S73_LINE1$_S73_OLD.REGISTRATION.FIRM$_S73_OLD.REGISTRATION.NAME$_S73_REGISTRATION.CODE$_S73_REGISTRATION.FIRM$_S73_REGISTRATION.NAME$_S75_TEXT.ALIGN$_S75_TEXT.TEXT$_S76_CHAR$_S76_SPLASH1$_S76_SPLASH2$_S76_SPLASH3$_S76_SPLASH4$_S76_SPLASH5$_S76_SPLASH6$_S76_SPLASH7$_S76_STRING2SHOW$_S76_WAIT.MODE$_S79_NEEDEDDATE$_S82_KBRD$_S83_STRING2PRINT$_S8_CURRENT.SUB$_S8_LINE1$_S8_RECALLMODE$_S9_FILENAME$_S9_T.FIELD$_SPACE$_N!_STR$_N!_STRING$_NN!_STRING$_NS!_TIME$_!_UNIT$_!_VERSION$_N! ‚ ‚‚ ‚ (‚ 5‚B‚M‚ X‚ b‚$n‚(u‚,}‚0پ‚4…‚8‘‚<–‚@‌‚D¨‚H¸‚Lئ‚Pز‚Tع‚Xل‚\ è‚` ٌ‚d‏‚h‚l‚p‚t‚x -‚|:‚€K‚„Y‚ˆk‚Œv‚گ‚‚” ژ‚ک ›‚œ¨‚ ¯‚¤ ½‚¨ت‚¬ط‚°ف‚´م‚¸î‚¼‎‚ہ ‚ؤ‚ب‚ج(‚ذ=‚شK‚ط[‚ـ b‚àl‚ن€‚èژ‚ىں‚ً ‚ô؛‚ّآ‚ü أ‚ذ‚م‚ُ‚ ‚ ‚ ‚3‚;‚ B‚$R‚(c‚,t‚0…‚4•‚8¥‚<µ‚@إ‚Dص‚Hه‚Lُ‚P‚T ‚X ‚\)‚` 7‚dD‚hO‚la‚ps‚tt‚x u‚|‚€†‚„ چ‚ˆ—‚Œ¢‚گ®‚” ¶‚ک؟‚œا‚ خ‚¤ش‚¨ع‚¬ه‚°ي‚ےےےôٍ‚ےےےè÷‚ےےےـü‚ےےےذ‚ےےےؤ‚ےےے¸‚´ ‚¸!‚¼,‚ہ8‚ؤ?‚بF‚جM‚ذ T‚ش]‚ط c‚ـm‚ےےےüy‚ےےےü…‚ےےےّ™‚ےےےط¬‚ےےےü¸‚ےےےشا‚ےےےàص‚ےےےــ‚ےےےّë‚ےےےü ÷‚ےےےô‚ےےےü‚ےےےش$‚ےےےً0‚ےےےى D‚ےےےüM‚ےےےّ\‚ےےےüm‚ےےےü y‚ےےےّ†‚ےےےü™‚ےےےط¨‚ےےےش ®‚ےےےط»‚ےےےشء‚ےےےüح‚ےےےّل‚ےےےôً‚ےےےًے‚ےےےى‚ےےےü‚ےےےـ‚ےےےà$‚ےےےن*‚ےےےؤ/‚ےےےج5‚ےےےب;‚ےےےüJ‚ےےےّ]‚ےےےHq‚ےےے@…‚ےےےًک‚ےےےX«‚ےےےP¾‚ےےےôخ‚ےےےDك‚ےےے<ً‚ےےے\‚ےےےT‚ےےےL ‚ےےےü,‚ےےےü;‚ےےےü J‚àS‚ےےےّa‚ےےےü p‚نy‚ےےےً‡‚ےےےü “‚è œ‚ےےے¸ ©‚ےےےط ¶‚ےےےؤأ‚ےےےہخ‚ےےے¼ـ‚ےےےب â‚ےےےô ë‚ےےےً ُ‚ےےےّ ‏‚ےےےü ‚ےےےü ‚ےےےّ !‚ےےےŒ 3‚ےےےگ E‚ےےےü X‚ےےےن j‚ےےےà |‚ےےےن ژ‚ےےےà ‚ےےےü §‚ےےےü ¸‚ےےےى ¾‚ےےےè إ‚ےےےّ ذ‚ےےےô ع‚ےےےü ى‚ےےےً ô‚ےےےّ û‚ےےےü ‚ےےےô ‚ےےےü ‚ےےےà +‚ےےےü 6‚ےےےè D‚ےےےن R‚ےےےّ _‚ےےے” j‚ےےےج y‚ےےےہ ‰‚ےےے¼ ™‚ےےے¸ ©‚ےےےب ¸‚ےےےؤ ا‚ےےے´ ح‚ےےے¤ ص‚ےےےœ ف‚ےےے ه‚ےےےک ي‚ےےےج ‎‚ےےےب‚ےےےü‚ےےے|%‚ےےےè1‚ےےےّ@‚ےےےü L‚ےےے€V‚ےےےœ\‚ےےےط l‚ےےےش y‚ےےےذ†‚ےےےى”‚ےےےè¢‚ےےےً‚ےےےگ³‚ےےےü؛‚ےےےّء‚ےےےًج‚ےےےى×‚ےےےèâ‚ےےےüي‚ےےےüü‚ےےےّ‚ےےےü‚ےےےش $‚ےےےج1‚ےےےب?‚ےےےüJ‚ےےےàZ‚ےےےؤ f‚ےےےذs‚ےےے¸پ‚ےےےـڈ‚ےےےط‌‚ےےےہ ¢‚ےےے¼ «‚ےےےنµ‚ےےےüہ‚ےےےèج‚ےےےّف‚ےےےàâ‚ىي‚ًَ‚ôْ‚ّ ‚ü ‚ ƒ ƒ ƒ (ƒ, 2ƒ8 @ƒD GƒP Pƒ` Zƒp cƒ| iƒˆ oƒ” }ƒ ˆƒ¬ Œƒ¸ ڑƒؤ ®ƒذ ¹ƒـ جƒè àƒô يƒƒƒ!ƒ$)ƒ09ƒ<@ƒHNƒT\ƒ`kƒl sƒx}ƒ„چƒگ›ƒœ¯ƒ¨آƒ´ ضƒہ كƒج èƒط ٌƒنْƒًƒüƒƒ,ƒ :ƒ,Iƒ8ZƒDlƒP~ƒ\گƒh،ƒt²ƒ€أƒŒشƒکهƒ¤ِƒ°ƒ¼ƒب,ƒش@ƒàPƒى^ƒّ qƒ zƒƒƒٹƒ(–ƒ4 œƒ@ ¦ƒP³ƒ` بƒl رƒxعƒ„ لƒگêƒœûƒ¨‏ƒ´ƒےےےô ƒہƒذƒـ7ƒèVƒôlƒrƒxƒٹƒ$›ƒ0±ƒ< ئƒH دƒTظƒ` èƒpُƒ€ ûƒŒ ƒک;ƒ¤Rƒ°`ƒ¼nƒب|ƒش ڈƒà™ƒى¤ƒّ¶ƒ اƒشƒ×ƒ(قƒ4âƒ@ًƒLƒXƒd "ƒp/ƒ|:ƒˆBƒ”Rƒ Yƒ¬gƒ¸vƒؤ†ƒذڑƒـ ƒè ¶ƒô ؟ƒبƒضƒلƒ$ٍƒ0ƒ<ƒH#ƒT 7ƒ`@ƒl Gƒx Qƒ„Zƒگiƒœ uƒ¨~ƒ´†ƒہ ژƒج—ƒےےےô‌ƒےےےè£ƒےےےـ©ƒےےےذ¯ƒےےےؤµƒےےے¸»ƒط ئƒن سƒً فƒü çƒ ًƒ ْƒ ƒ , ƒےےےôƒےےےن+ƒےےےً<ƒےےےبOƒےےےè_ƒےےےًmƒےےےطxƒےےےنˆƒےےےôکƒےےےى£ƒےےےى ®ƒےےےً ¸ƒےےےن إƒےےےôدƒےےےèغƒےےےـ وƒےےےôًƒےےےèüƒےےےـ ƒےےےًƒےےےô!ƒےےےè 1ƒےےے¸;ƒےےےذ BƒےےےنOƒےےےx]ƒےےےlkƒےےے` yƒےےےط †ƒےےےج “ƒےےےہ ƒےےے´ ƒےےے¨ ؛ƒےےےœ اƒےےےگ شƒےےے„ لƒےےےنëƒےےےôùƒےےےôƒےےےôƒےےےè&ƒےےےـ7ƒےےےجBƒےےےنMƒےےےـUƒےےےèfƒےےےôvƒےےے”پƒےےےؤچƒےےے¬™ƒےےے¸§ƒےےےذ³ƒےےے ؟ƒےےےًةƒےےےèـƒےےےôïƒےےےèƒےےےôƒےےےô ƒےےےً7ƒےےےنKƒےےےًbƒےےےـuƒےےےô€ƒےےےذکƒےےے¸°ƒےےےؤاƒےےےôàƒےےےـùƒےےےè ƒےےےىƒےےےـ1ƒےےے¨ <ƒےےےذFƒےےےô`ƒےےےèzƒےےےـ‹ƒےےےè œƒےےےô©ƒےےےذ؛ƒےےےگإƒےےے„ذƒےےےpغƒےےےdوƒےےےXٌƒےےےLüƒےےے ƒےےے@ƒےےے4"ƒےےے(-ƒےےے8ƒےےےCƒےےےNƒےے‏ّ^ƒےےےىnƒےے‏ىyƒےےے¬”ƒےےے¸¯ƒےےےؤئƒےےےذفƒےےےـôƒےےےـƒےےےô ƒےےے„ ƒےےےè *ƒےےےـ 7ƒےےےذ Dƒےےےؤ Qƒےےے¸ ^ƒےےے¬ kƒےےے xƒےےے”‰ƒےےےôکƒےےےô ¨ƒےےےô²ƒےےےôؤƒےےےن شƒےےے¬قƒےےےً يƒےےےىْƒےےےش ƒ 8ƒ Dƒ P$ƒ \0ƒ h8ƒ t@ƒ €APPLICATION.ERRORb´ALREADY.EXISTSCHECK.DEMOCHECKHARDWARE.OLDCHECKHARDWARECHECKREGISTRATIONCHECKWEIGHTFORMAT.OLDCHECKWEIGHTFORMATCLEAR.REPORT.FILECLOSEFILECLOSEPRNCLOSEREMOTE2COMMON.KEYSCONFIRMATION.SCREENCOPYRIGHTCREATE.DEFAULT.DATADATE2DAYSDEBUGDELAY.RESETDELAYDELETE.RECORDEDIT.PASSWORDEMPTYVRBLFILEENTER.DATAENTER.DEALER.DETAILSENTER.TAREFINDBYNUMBERFIXWEIGHTFORMATFLD2VRBLFILEFMENU10FMENU11FMENU12FMENU13FMENU14FMENU18FMENU19FMENU1FMENU20FMENU21FMENU222FMENU22FMENU23FMENU24FMENU2FMENU3FMENU4FMENU5FMENU6FMENU7FMENU8FMENU9GLOBAL.SEARCHHELPINSERT.RECORD.CRTKILLFILELOAD.SETUP.FILEMAINSCREENMENU.OPTIONNEW.INPUTBOX788OPENFILEOPENPRNOPENREMOTE2PRINT.LINEPRINT.PRODUCT.LISTPRINTTICKETPRODUCT.PRICE.ORDERREGISTRATIONSAVEDATASETTIMEDATESETUP.READSETUP.WRITESETUP1SETZEROSHOWPERCENTS.OLDSHOWPERCENTSSHOWSTANDARDKEYSSHOWSTANDARDSCRSPLASHSCREENSTANDARD.NEWSTANDARD.RECALLTRANSFER2UPDATE.RECALL.SCREENUPDATE.SEARCHUPDATESCREENVRBL2FLDFILEڑg 8¢Z )ن6=çGز\@mے÷ ~آ7‡ش‌ڈنü›^ق¦$ر ¹Z¬آڑ· ص\nقaم^´î]h َv¾ [J ز‏ Cّ$OJ 8ظB„‌Nï]آbi·Jp·tw·‍~·ب…·ٍŒ¸“¸Fڑµذ ¸p§¸ڑ®¸î¶¸ؤ½¹ؤ¹Bثµْر¶$×¶Nف¶xم¶¢é¶جï¶ُِ· ûپC{،lءc%ak 4>9I^X¹l`شogن rPٹ|¢vژ§پ™’ِ¬?~¸®ِہشأ ثْص‏3àèYوHيçk‎ه" UkM8(R²4‡Z@Vd O×mX+ l}؛y*ہ…إٍ¼‚m ¼ƒھ ¼ ' ¼ = ¼=‚m ¼ D ¼D‚m ¼‚m ¼ * ¼ ¼ ‚m ¼ ¼ ¼Mƒھ ¼Gƒھ ¼ + ¼04ƒھƒ«ƒ¬ƒ ¼'H4ƒھƒ«ƒ¬ƒ‚q‚r ¼'H3ƒھƒ«‚o‚p‚q‚r ¼ƒھƒ« ¼ , ¼,‚m ¼‚m ¼ƒھ‚n ¼ƒھ ¼‚m ¼‚m ¼5ƒھ ¼ƒھ‚n ¼$ƒھ‚n‚o ¼ - ¼ . ¼ / ¼ƒھ‚n ¼6ƒھ ¼F‚m ¼‚m ¼ ‚m ¼!‚m‚n ¼!‚mƒ« ¼ 0 ¼ $ ¼ % ¼ 2 ¼&ƒھ ¼7‚m `ab&c4dBeUfc§vg‰¨—h¥i¸jئkش©çlْ°±*sVt‚uڑv¨w»²خxوyùz³´2µJ{g|u}ƒ¶‘·©¼1د2â3ُ4 %53A6O]7p€™ €™ €™ €™ €™PERED VSEMI COMMON €و،bs: €™ €™ € ™ € ™ €™ €™ € ™ €™ €™ €™DEASD BODY MASTER A1 €™STUFF FOR DEAD BODY WEIGHING; €™ €™ €™ €™ €™ €™ €™ €™ €à‚(ƒf‚ €àƒ%ƒˆƒ}ƒ~ €àƒƒnƒo €™ €àƒUƒTƒ4ƒ6 €àƒںƒ‍ƒ‘ƒ’ € à‚ƒ5 €!™ €"™HEADERS €#™COMMON F.HDR1$,F.HDR2$,F.HDR3$ €$™COMMON T.HDR1$,T.HDR2$,T.HDR3$ €%à)ƒ1ƒCƒ0ƒ8ƒBƒZƒ[ƒ3 €&™file 1 €'àƒ2ƒڈ €(™file 2 €)àƒGƒ‌‚IƒH‚* €*à‚IƒH‚MƒL‚NƒM €+à‚OƒN‚PƒO‚QƒP €,à‚RƒQ‚SƒR‚TƒS €-à‚JƒI‚KƒJ‚LƒK €.™oCOMMON T.PRODUCT.PRICE1,F.PRODUCT.PRICE1$,T.PRODUCT.PRICE2,F.PRODUCT.PRICE2$,T.PRODUCT.PRICE3,F.PRODUCT.PRICE3$ €/™oCOMMON T.PRODUCT.PRICE1,F.PRODUCT.PRICE1$,T.PRODUCT.PRICE2,F.PRODUCT.PRICE2$,T.PRODUCT.PRICE3,F.PRODUCT.PRICE3$ €1™file 3 €2àƒ<ƒ•‚Fƒ= €3àƒ;ƒ”ƒ:‚E €4à‚Z‚) €5™FILE 4 €6àƒ+ƒ‹‚Aƒ, €7àƒ)ƒ‰ƒ(‚@ €8àƒ*ƒٹƒ>‚G €9à‚ €:™markers €;àƒ?ƒ@ƒAƒ–ƒ—ƒک €=à)‚.‚/‚-‚‚‚\‚7‚+ €>à)ƒژƒ™ƒچ‚D‚H‚Uƒ،ƒگ €?àƒ$ƒ#‚‚ €@™,T.CONSEC.NO,F.CONSEC.NO$ €A™ €Bàƒ‚ƒƒ‚:ƒqƒp €Cà‚ €Dà‚9ƒrƒs‚" €E™ €Fà‚ ‚ €Gàƒ¤ƒg €H™ID VARIABLES €Iàƒ"ƒ]ƒbƒc €J™(VERSIONS INFORMATION TRACIKNG & CHECKING €Kàƒyƒk €Làƒ{ƒm €Màƒzƒl €N™ BLINCK STRING €Oà‚‚&‚' €P™FOR OPEN REMOTE €Qà‚5‚2‚3‚4ƒVƒW €Ràƒƒjƒ‡ƒ'ƒd €S™,BUFFER$ €Tà‚#‚$ €Uàƒ& €V™ €Wà‚ €X™ COMMON VER €Yà‚V‚X‚W €[™"***********NEW INPUT BOX VARIABLES €\à.ƒƒu‚ƒ‚<‚‚‚]‚^ €]à$‚0ƒ£‚‚_ƒ\‚8‚ €^àƒ¥ €_™*******GLOBAL SEARCH €`àƒ7 €bà‚,ƒa €c™ NEW VARIABLES €dà‚‚>ƒxƒ €eà‚[‚?‚Yƒ¦‚! €fà$‚‚‚‚%‚ƒ¢‚ €gà)ƒt‚ƒe‚ƒپƒ“ƒ9ƒX €hàƒ`‚ƒ…ƒ€ƒ„ƒ €ià‚=‚6‚ €jàƒڑƒD €k™ SETUP PRINTER €là‚;ƒ|‚ €m™,PRINTER €nàƒFƒEƒ-ƒ/ƒ. €oàƒœƒ›ƒŒ‚C‚B €pàƒYƒ ƒ† €rںƒ ,„Bب €sàƒ „Bب €tںƒ!,„Bب €uàƒ!„Bب €vںƒ,„Dْ €wàƒ„Dْ €xںƒ_,„Ap €yàƒ_„Ap €zںƒ^,„@ €{àƒ^„@ €|ںƒi,„Bْ €}àƒi„Bْ €~ںƒv,„A €àƒv„A €€ںƒw,„A €پàƒw„A €‚à‚1 €ƒ™ REGID = 30 €„™ REGID = 70 €…“‚1„Bڑ €†™ REGID = 0 €‡™REGISTRATION ID €ˆ“‚(„Ap €‰“ƒ‹§„@ہ;; €ٹ“ƒj‹§„Ap;; €‹“ƒ‡‹§„@;; €Œ“ƒ'‹§„@@;; €چ“‚5„A €ژ“‚„؟€ €ڈ“‚&„ €گ“‚„ €‘“ƒ…! €’“‚;„BT €“™PACKET.SIZE = 66 €”™"REMOTE.BUFFER.LENGTH = PACKET.SIZE €•“ƒ_„?€;…› €–“ƒ_„@;…ّ €—ë„DE €ک“‚„@€ €™“‚„@@ €ڑگ„,„,„Cں€,„Co €›‘„,„ €œ£:; €‌£ôŒ; €‍£0); €ں™******* READ.CONSEC.NR()***** € ™CALL OPENFILE(1) €،™( T.CONSEC.NO = (LOF(1) / LENFORMATFILE) €¢™ CALL CLOSEFILE(1) €£™********************** €¤£D;…9;, €¥™-********************************************* €¦£R®; €§™******************************************* €¨£; €©ن €ھ €¤ء7;‚’ƒأƒؤ €®™CHECK THAT !!! €¯™ REGID = 00 €°“‚’„؟€ €±“‚)„ €²“‚+„ €³¬ €´“‚„ €µ™TARE €¶»„@@,…»,…i €·™ZERO €¸»„@€,…¼,…j €¹™FUNC €؛»„?€,…«,…9 €»™ID €¼»„A,…ء,… €½™MENU €¾»„@ہ,…¾,…' €؟»„@à,…؟,…x €ء”‚‚&‚7„=&•1 €آ»„A ,…¬,… €أ»„A0,…,…| €ؤ— €إ”‚\•»„A@,…®,… €ئ™BELOWZERO.KEY AND €ا“‚„@@ €ب“‚ ‚ €ة™ €تµ„,„A¸,„Cں€,„A¸ €ث™ DRAW 60,00,60,26 €جµ„,„Bè,„Cں€,„Bè €حµ„?€,„CY,„Cں,„CY €خ›t‚?ٹxƒ¤;;„?€+œ‚„?€‌‚„؟€ €د“ƒv‚?;…9 €ذ“ƒw‚?;…9 €ر‍ےےےخ‚?‚‚ €ز“ƒt‹²‹5);;,„@ ;; €س»„A,…ہ,…!‹²‹5);;,„@ ;;+…!+ €ش™ BOX AROUND €ص´„,„,„Cں€,„Co,„ €ض¬ €×”‚‚&‚’„؟€=&‚7„=&•| €ط»„A0,…,…| €ظ»„A ,…¬,… €ع´„,„,„Cں€,„Co,„ €غ“‚’„ €ـ™BELOWZERO.KEY = 0 €ف— €ق”‚+„؟€=•ھ €ك™BELOWZERO.KEY AND €à»„A@,…®,… €ل™! KEY 10, "FMENU10", " PRODUCT >" €â´„,„,„Cں€,„Co,„ €م“‚+„ €ن™REPRINT = -1 €هک£”‚+„ہ=•‘ €و™BELOWZERO.KEY AND €ç»„A@,…®,… €è™! KEY 10, "FMENU10", " PRODUCT >" €é´„,„,„Cں€,„Co,„ €ê“‚+„ €ë— €ى£#; €ي”‚„?ٹ{;;~&•° €îےے‎» €ï»„ €ًگ„,„,„Aک,„@@ €ٌ£#¥; €ٍ”‚„A0=‚&‚W„A ٹu;;*>&ٹ} ;;~&ٹ{;;~&•„ €َ“‚)‚)„?€+ €ô“‚„ €ُ“‚’„؟€ €ِ“‚+„؟€ €÷™AND BELOWZERO.KEY €ّ£™E„@@;, €ù“‚\„؟€ €ْگ„,„,„Cں€,„Co €û”‚)„?€=•† €ü™ LOCATE 0,1 €‎™PRINT " 1 PRODUCT ADDED " €ے“ƒأ…R €£:@ƒأ,„B´,‚,„?€,……;ƒأ,‚,, €–ں €™ LOCATE 4,1 €™)PRINT PRODUCT.NUMBER;" PRODUCTS ADDED " €“ƒأ‹2%‚);;…-+ €£9‍ƒأ,„B´,‚,„?€,……;ƒأ,‚,, €— €™ LOCATE 0,2 €™ PRINT " TO INVOICE " € “ƒأ… € £9ƒأ,„Bـ,‚,„?€,……;ƒأ,‚,, €£Eإ„@@;, €گ„,„,„Cں€,„Co € کا”‚„A=• €£¼ع; €ک£”‚„?€=•€ €“ƒؤ‹±…ھ,…ب‹§„AP;;+…+,…9,…ü,„?€,„@€;; €”ƒؤ…[=• €گ €ن € €— €ک”‚„A=‚W„A ٹu;;*>&ٹ} ;;~&•“ €”‚\‚&• €گ„,„,„Cں€,„Co €“ƒأ…” €£7‡ƒأ,„B ,‚,„?€,……;ƒأ,‚,, €“ƒأ…ف €£7Dƒأ,„Bب,‚,„?€,……;ƒأ,‚,, €“ƒأ… €£7ƒأ,„C,‚,„?€,……;ƒأ,‚,, €µ„,„CY,„Cں€,„CY € »„@ہ,…¾,…( €!»„A,…ء,… €"´„,„,„Cں€,„Co,„ €#™ LOCATE 0,2 €$™PRINT "____________________" €%“‚„ €&¬ €'ےےےِ®‚„? €(”‚„A=•ؤ €)™CALL SAVEDATA(3) €*“‚„ €+“‚\„ €,“‚)„ €-“‚7„ €.£‍z„@@;, €/£§5„@@;, €0£¦Q„@@;, €1گ„,„,„Cں€,„Co €2£(؛; €3™EXIT DO €4–² €5”‚7•“‚+„ہ €6™+SELECTED.CUSTOMER$ = OLD.SELECTED.CUSTOMER$ €7™)SELECTED.PRODUCT$ = OLD.SELECTED.PRODUCT$ €8™#SELECTED.PRICE = OLD.SELECTED.PRICE €9— €:™ CALL DELAY(3) €;گ„,„,„Cں€,„Co €<™CLS 0,0,19,3 €=™ LOCATE 0,1 €>™PRINT " CURRENT INVOICE " €?™ LOCATE 0,2 €@™PRINT " NOT PRINTED! " €B™ END IF €C–. €D™ DSPFONT=CURRENTFONT €E£&÷; €F— €G™ELSEIF MAINMENU = 5 THEN €H™ CALL MENU.OPTION() €IکI”‚„@@=• €J£ûr; €Kک%”‚„@€=•% €L”ٹ(;;„=•ع €Mکï”‚„@ہ=•‚ €N™0PASSWORD$ = INP$("INPUT PASSWORD","","","Q",1,4) €O™ IF PASSWORD$ = "2909" THEN €P£ô; €Q™ END IF €Rک\”‚„@à=• €S£4^…1;, €Tک2”‚„A =‚&•K €U“‚„ €V“ƒsƒƒ €W¬ €X™-CALL NEW.RECALL.BOX(2," TYPE PRODUCT NAME ") €Y£7‡„@,…‎;,, €Z”‚• €[“‚’„؟€ €\°O €]— €^“ƒƒƒ‌ €_™ SELECTED.PRICE = T.PRODUCT.PRICE €`™ SELECTED.CUSTOMER.NR €a”‚9„?€=•“‚:‚I €b”‚9„@=•“‚:‚M €c”‚9„@@=•“‚:‚N €d”‚9„@€=•“‚:‚O €e”‚9„@ =•“‚:‚P €f”‚9„@ہ=•“‚:‚Q €g”‚9„@à=•“‚:‚R €h”‚9„A=•“‚:‚S €i”‚9„A=•“‚:‚T €j”‚9„A =•“‚:‚J €k£; €l™K IF OLD.SELECTED.PRODUCT$ <>SELECTED.PRODUCT$ THEN WEIGHTING.COMPLITE = 0 €m™ CALL DEBUG(T.PRODUCT.NAME$) €n™CALL SAVEDATA(3) €o° €pےے‎= €q™CALL DEBUG(T.PRODUCT.NAME$) €r™0ELSEIF MAINMENU = 12 AND WEIGHTING.COMPLITE THEN €sکذ”‚„A@=•¾ €uگ„,„,„Cں€,„Co €v“ƒأ…€ €w£.ƒأ,„B ,‚,„?€,……;ƒأ,‚,, €x“ƒأ…2 €y£.<ƒأ,„Bب,‚,„?€,……;ƒأ,‚,, €z“ƒأ… €{£-ùƒأ,„Bً,‚,„?€,……;ƒأ,‚,, €|µ„,„CY,„Cں€,„CY €}»„@ہ,…¾,…( €~»„A,…ء,… €´„,„,„Cں€,„Co,„ €€™ LOCATE 0,2 €پ™PRINT "____________________" €‚“‚„ €ƒ¬ €„ےےےِ®‚„? €…گ„,„,„Cں€,„Co €†”‚„A=•ط €‡“‚„ €ˆ£ƒ±; €‰”‚7„=•{ €ٹ£‹„@€;, €‹“‚7„؟€ €Œ“‚\„ €چ“‚)„ €ژ™ ELSEIF REPRINT THEN €ڈ™READY.TO.PRINT = -2 €گ— €‘“‚+„ہ €’™INPUT.COMPLETE = 0 €“— €”— €•»„ €–گ„,„,„Aک,„@@ €—ےےê¼ €ک¥ےےêH €ڑ¤ç;‚œƒث €›“‚ ‚ €œگ„,„,„Cں€,„Co €‌µ„?€,„B,„Cں,„B €‍™DRAW 1,217,318,217 €ں“‚ „A € “‚œ„A €،™, OLD.SELECTED.CUSTOMER$ = SELECTED.CUSTOMER$ €¢™*OLD.SELECTED.PRODUCT$ = SELECTED.PRODUCT$ €£™$OLD.SELECTED.PRICE = SELECTED.PRICE €¤¬ €¥“ƒث…‘ €¦£*oƒث,„A ,‚,„?€,……;ƒث,‚,, €§»„ €¨™ LOCATE 10,70 €©“ƒث…ڑ‹µƒڈ,„?€,„A`;;+ €ھ£)îƒث,„BŒ,‚œ,„?€,…ذ;ƒث,‚œ,, €«™.PRINT "CUSTOMER: ";MID$(T.CUSTOMER.NAME$,1,14) €¬™ LOCATE 10,100 €“ƒث…,‹µƒ‌,„?€,„A`;;+ €®£)?ƒث,„Bب,‚œ,„?€,…ذ;ƒث,‚œ,, €¯™-PRINT " PRODUCT: ";MID$(T.PRODUCT.NAME$,1,14) €°‘„A@,„C €±½…:;…ï;‹§„C#;;;‚: €²™)+" BATCH:"+STR$(T.BATCH.NO) €³™ LOCATE 7,3 €´™PRINT "ACCEPT?" €µ“‚ ‚ €¶“ƒث…y €·£(0ƒث,„C\,‚,„?€,……;ƒث,‚,, €¸µ„,„CY,„Cں€,„CY €¹»„@ہ,…¾,…( €؛»„A,…ء,… €»´„,„,„Cں€,„Co,„ €¼™ LOCATE 0,2 €½™PRINT "____________________" €¾“‚„ €؟¬ €ہےےےِ®‚„? €ءگ„,„,„Cں€,„Co €آ”‚„A=•³ €أ™CALL SAVEDATA(3) €ؤ™REM REM INPUT.COMPLETE = -1 €إ™REM REM REPRINT = 0 €ئ™ CLS 0,0,319,239 €ا“ƒrƒ‚ €ب“ƒsƒƒ €ة“‚"‚: €ت°z €ث–h €ج“ƒ‚ƒr €ح“ƒƒƒs €خ“‚:‚" €د°; €ذ™#IF REPRINT THEN READY.TO.PRINT = -2 €ر— €زےےû^ €س™END IF €ش¥ےےْ" €ض¤KHR;ƒجƒح‚ں‚‍‚‌ƒد‚،‚¢‚ ƒخ €×™TRX = 46*2.5 €ط™ TRY = 46*3.75 €ظ“ƒج‹µ‹¨ ;;,„@€,„@;;…K+‹µ‹¨ ;;,„?€,„@;;+…K+‹µ‹¨ ;;,„@à,„@€;;+ €ع“ƒح‹²‹5);;,„@ ;; €غ™UPDATE TIME €ـ“‚ „@@ €ف”ƒt‹²‹5);;,„@ ;;?•† €ق»„A,…ہ,…!‹²‹5);;,„@ ;;+…!+ €ك“ƒt‹²‹5);;,„@ ;; €à´„,„,„Cں€,„Co,„ €ل— €م“‚Vٹl;; €ن“‚Xٹ(;; €ه“‚Wٹ|;; €و“‚ٹ} ;; €ç“‚ںٹ{;; €è“‚‍ٹg;; €é“‚‌ٹb;; €ê“ƒد‹6+;; €ë“‚،„A €ى“‚¢„Aہ €ي™YW = 40 €î“‚ ‚ €ï”ٹ|;;„A ٹu;;*[•“‚„؟€ €ً“ƒ……9 €ٌ™PRIZMA **************** €ٍ”ٹ|;;„A ٹu;;*>‚~&•£ €َ”‚ں~•û €ôگ„@@,„A ,„Aً,„A €ُ“‚ „?€ €ِ›ھ‚]„?€œ‚„Aˆ‌‚„?€ €÷µ„@ ,„@‚ +,„@ ‚]+,„@‚ + €ّµ„Aè‚]-,„@‚ +,„Aè,„@‚ + €ù“‚ ‚ „?€+ €ْ‍ےےے‡‚]‚‚ €û™BOX 5,22,29,27,1 €ü— €‎™ X = 1 €‏™ FOR Y = 1 TO 17 €ے™ CLS 20,20+X,20+Y,20+X €™ CLS 54-Y,20+X,54,20+X €™ X = X + 1 €™NEXT Y €–„ €گ„@@,„@@,„Aً,„A¨ €™ CLS €™ DSPFONT = 4 €™ LOCATE 70,20 €™ PRINT "-MO-" € ™END IF € — €™PRIZMA **************** €”‚‌‚X„=&• € “ƒ……G €— €”‚‍‚X„=&• €“ƒ……H €— €”‚ں• €“ƒ……I €— €”‚• €“ƒ……J €— €”ƒ€…J?ƒ€…G?&•“ƒ€…9 €™ OLDST$ = ST$ €”ƒxƒ…?•# €“‚>„؟€ €“ƒxƒ… €— €”ٹxƒ…;;„>•© € “‚„@@ €!“‚ ‚ €"”‚>•0 €#“‚>„ €$گ„Bx,„@,„C‍€,„A° €%— €&“ƒخƒ… €'£qƒخ,„?€,‚,„?€,……;ƒخ,‚,, €(–" €)گ„Bx,„@,„C‍€,„A° €*— €+µ„,„A¸,„Cں€,„A¸ €,”ƒ……J?•f €-™IF OVERCAP = 0 THEN €.“‚ ‚ €/”‚X„=•‰ €0“‚ „@ہ €1‘‚،,‚¢ €2’…ؤ €3‘‚،„C„€+,‚¢ €4’…A €5£ص¾‚V,„C,„A ,„Aہ,„Aً,„?€;‚V,,,,, €6–† €7“‚ „@ہ €8‘‚،,‚¢ €9’… €:‘‚،„C„€+,‚¢ €;’…A €<£ص5‚W,„C,„A ,„Aہ,„Aً,„?€;‚W,,,,, €=— €>“‚ ‚ €?–¹ €@گ‚،,‚¢,„Bü„@ *,„Aً„@p* €A“‚ ‚ €B›t‚?ٹxƒ¤;;„?€+œ‚„?€‌‚„؟€ €C“ƒv‚?;…9 €D“ƒw‚?;…9 €E‍ےےےخ‚?‚‚ €F— €G”‚„=• €H™# CALL DEBUG(STR$(INPUT.COMPLETE)) €I™( WEIGHT.MODE$ = "INPUT INFO. REQUIRED" €J“ƒخ…ا €K£Cƒخ,„Bْ,‚,„?€,……;ƒخ,‚,, €L™ LOCATE 0,1 €M™PRINT " SELECT CUSTOMER " €N™ LOCATE 0,2 €O™PRINT " AND PRODUCT " €Pک¾”‚‚~&•« €Q“ƒخƒ‚ €R£uƒخ,„Bl,‚,„?€,…ج;ƒخ,‚,, €S“ƒخƒƒ €T£2ƒخ,„Bڑ,‚,„?€,…ج;ƒخ,‚,, €U‘„B ,„Bہ €V½…:;…ï;‹§„C#;;;‚: €W™9 LINE1$ = "PRICE PER KILO: "+LTRIM$(STR$(SELECTED.PRICE)) €X™,CALL PRINT.LINE(LINE1$,95,CURRENTFONT,1,"L") €Y™ LOCATE 0,1 €Z™#PRINT MID$(SELECTED.CUSTOMER$,1,20) €[™ LOCATE 0,2 €\™PRINT SELECTED.PRODUCT$ €]— €^™@IF ST$<>"" AND T.INDICATORMODE$ = "M" AND REMOTEUPDATE.KEY THEN €_™j F.SEND.GROSSWEIGHT$ = SPACE$(ABS(5-LEN(LTRIM$(STR$(TMP.GROSSWEIGHT)))))+ LTRIM$(STR$(TMP.GROSSWEIGHT)) €`™0 COM2.FILE.STR$ = F.SEND.GROSSWEIGHT$+ST$ €a™O IF LOC(REMOTE.HANDLER)=0 THEN CALL SEND.COM2.DATA(0,"G",COM2.FILE.STR$) €b™ END IF €d¥ےےٌ¾ €g¤ ف8;ƒف‚·ƒـ €hگ„,„,„Cں€,„Co €i¬ €j”‹³‹·"ƒڑ;;;;…P?•, €k“ƒف‹°…â,…?,…9,…ü;; €l”‚•° 0 €m”ƒف…[?ƒفƒڑ?&•ئ €n“‚·‚ €o“‚ „@ €pگ„,„,„Cں€,„Co €q“ƒـ…0 €r£[ƒـ,„B´,‚,„?€,……;ƒـ,‚,, €s£#„@;, €tگ„,„,„Cں€,„Co €u“‚ ‚· €v° N €w— €x— €y“‚„ €z¬ €{µ„?€,„B,„Cں,„B €|µ„?€,„CY,„Cں,„CY €}“ƒـ…س €~£~ƒـ,„A ,‚,„?€,……;ƒـ,‚,, €€»„?€,…«,…d €پ»„@,…´,…c €‚»„@@,…»,…n €ƒ™IF CARDS(2)=1 THEN €„™"KEY 12, "FMENU12", " PRINT >" €…”ٹf„@;;„?€=ƒ …غ=ٹf„@;;„=&|•K €†»„@€,…¼,…h €‡»„@ ,…½,…g €ˆ»„A`,…°,…* €‰کp”ƒ …=ٹf„@;;„=&•G €ٹ»„@€,…¸,…9 €‹»„@ ,…¸,…9 €Œ»„A`,…¸,…9 €چ— €ژ™#KEY 14, "FMENU14", " PC TRANSFER >" €ڈ»„AP,…¯,… €گ»„@ہ,…¾,ƒ† €‘™,KEY 10, "FMENU10", " REPORT >" €’™END IF €“»„A,…ء,… €””‹¶!‹7-„@;;,„@;;…=• €•»„Ap,…ڈ,…9 €–– €—»„A€,…ڈ,…9 €ک— €™´„,„,„Cں€,„Co,„ €ڑ¬ €›ےےےِ®‚„? €œ»„ €‌™IF MAINMENU = ASC("1") THEN €‍™ CLS 0,0,319,239 €ں™ STOP € ™ END €،™ ELSE €¢”‚„?€=• €££‘„?€;, €¤کؤ”‚„@=• €¥£g„@;, €¦کڑ”‚„@@=• €§£[¼; €¨کv”‚„A`=• €©£کN; €ھکR”‚„AP=• €«£; €¬ک.”‚„@ہ=•© €™AND CARDS(2)=0 €®”‹³‹·"ƒ ;;;;…غ=•“ €¯”‹µƒœ,„@€,„?€;;…S=•‏ €°گ„,„,„Cں€,„Co €±“ƒـ…ç €²£ٹƒـ,„B ,‚,„?€,……;ƒـ,‚,, €³“ƒـ…آ €´£Gƒـ,„Bـ,‚,„?€,……;ƒـ,‚,, €µ“ƒـ… €¶£ƒـ,„C,‚,„?€,……;ƒـ,‚,, €·£®„@€;, €¸کa”‹µƒ›,„@€,„?€;;…S=ٹf„@;;„?€=&•‏ €¹گ„,„,„Cں€,„Co €؛“ƒـ…ه €»£Mƒـ,„B ,‚,„?€,……;ƒـ,‚,, €¼“ƒـ…آ €½£ ƒـ,„Bـ,‚,„?€,……;ƒـ,‚,, €¾“ƒـ… €؟£اƒـ,„C,‚,„?€,……;ƒـ,‚,, €ہ£q„@€;, €ء–$ €آ“ƒ … €أ“ƒ†… €ؤ— €إکج”‹³‹·"ƒ ;;;;…غ=ٹf„@;;„?€=&•C €ئ™T.STATUS$ = "TRADE" €ا™ STATUS$ = "TRADE" €بکK”‹³‹·"ƒ ;;;;…=•# €ة“ƒ …غ €ت“ƒ†…غ €ث— €جکt”‚„A=• €ح°ژ €خکQ”‚„@€=• €د£¥…َ;, €ذک'”‚„@ =• €ر£¤ë…م;, €ز— €س“‚„ €شگ„,„,„Cں€,„Co €صےے÷ €ض“‚„ €×گ„,„,„Cں€,„Co €ط° €ظےےُe €ع¥ےےُ, €ك¤ 8;‚بƒي €à“‚„ €ل“ƒrƒ‚ €â“ƒsƒƒ €م“‚"‚: €ن¬ €ه™-CALL NEW.RECALL.BOX(1," TYPE CUSTOMER NAME ") €و£ش„?€,…‎;,, €ç”‚•U €è”‚7•“‚+„ہ €é“ƒ‚ƒr €ê“ƒƒƒs €ë“‚:‚" €ى°k €ي— €î“ƒ‚ƒڈ €ï“‚9‚. €ً™-CALL NEW.RECALL.BOX(2," TYPE PRODUCT NAME ") €ٌ£„@,…‎;,, €ٍ”‚•z €َ™+SELECTED.CUSTOMER$ = OLD.SELECTED.CUSTOMER$ €ô”‚7•“‚+„ہ €ُ“ƒƒƒs €ِ“‚:‚" €÷°w €ّ— €ù“ƒƒƒ‌ €ْ™ SELECTED.PRICE = T.PRODUCT.PRICE €û”‚„?€=•“‚:‚I €ü”‚„@=•“‚:‚M €‎”‚„@@=•“‚:‚N €‏”‚„@€=•“‚:‚O €ے”‚„@ =•“‚:‚P €”‚„@ہ=•“‚:‚Q €”‚„@à=•“‚:‚R €”‚„A=•“‚:‚S €”‚„A=•“‚:‚T €”‚„A =•“‚:‚J €“‚ ‚ €گ„,„,„Cں€,„Co €µ„?€,„B,„Cں,„B €™DRAW 1,217,318,217 € “‚ „A € “‚ب„A €“ƒي…‘ €£„ƒي,„A ,‚,„?€,……;ƒي,‚,, € »„ €™ LOCATE 10,70 €“ƒي…ڑ‹µƒڈ,„?€,„A`;;+ €£ƒي,„BŒ,‚ب,„?€,…ذ;ƒي,‚ب,, €™.PRINT "CUSTOMER: ";MID$(T.CUSTOMER.NAME$,1,14) €™ LOCATE 10,100 €“ƒي…,‹µƒ‌,„?€,„A`;;+ €£Tƒي,„Bب,‚ب,„?€,…ذ;ƒي,‚ب,, €™-PRINT " PRODUCT: ";MID$(T.PRODUCT.NAME$,1,14) €‘„A@,„C €½…:;…ï;‹§„C#;;;‚: €™)+" BATCH:"+STR$(T.BATCH.NO) €™ LOCATE 7,3 €™PRINT "ACCEPT?" €“‚ ‚ €“ƒي…y €£Eƒي,„C\,‚,„?€,……;ƒي,‚,, €µ„,„CY,„Cں€,„CY €»„@ہ,…¾,…( € »„A,…ء,… €!´„,„,„Cں€,„Co,„ €"™ LOCATE 0,2 €#™PRINT "____________________" €$“‚„ €%¬ €&ےےےِ®‚„? €'”‚„A=•آ €(™CALL SAVEDATA(3) €)“‚„؟€ €*“‚7„ €+£mـ„@@;, €,£v—„@@;, €-£u³„@@;, €.گ„,„,„Cں€,„Co €/“ƒrƒ‚ €0“ƒsƒƒ €1“‚"‚: €2°_ €4–M €5“ƒ‚ƒr €6“ƒƒƒs €7“‚:‚" €8”‚7•“‚+„ہ €9— €:ےے÷é €;”‚•¦ €<“‚„ €=™+SELECTED.CUSTOMER$ = OLD.SELECTED.CUSTOMER$ €>™)SELECTED.PRODUCT$ = OLD.SELECTED.PRODUCT$ €?™#SELECTED.PRICE = OLD.SELECTED.PRICE €@— €A™END IF €C¥ےےِر €F¤+ K‚ع;‚فƒ‏‚غ‚ـ‚ظ €G™LIST,PRINT,ADD,EDIT,DELETE €H“‚„ €I“‚ف„?€ €Jگ„,„,„Cں€,„Co €K¬ €L”‚ف„?€=•خ €M£‡‚ع;‚ع €N“‚ ‚ €O‘„,„ €Pµ„,„A0„@p*,„Cں€,„A0„@p* €Q“ƒ‏ƒ_‚ع; €R£6ƒ‏,„A ,‚,„?€,……;ƒ‏,‚,, €T“‚ف„ €U£jص‚ع;‚ع €V“‚غٹz‚ع;; €W£sr‚ع;‚ع €X“‚ـ‚غ‚/ €Y“‚ ‚ €Z‘„B„@ *,„Aک„@p* €[’…M €\µ„B„@ *,„Ap„@p*,„B„@ *,„Aà„@p* €]”‚ـ„?€=•چ €^‘„BH„@ *,„Aک„@p* €_’‹1$ٹx‹2%‚ـ;;;;„A+;; €`‘„BH„@ *,„Aک„@p* €a’‹2%‚ـ;;…/+ €b–ٹ €c‘„BH„@ *,„Aک„@p* €d’‹1$ٹx‹2%‚ـ;;;;„A+;; €e‘„BH„@ *,„Aک„@p* €f’‹2%‚ـ;;…0+ €g— €hµ„,„CY,„Cں€,„CY €i“‚ ‚ €j— €l”‚„?€=•چ €m”‚ـ„?•Q €nگ„,„,„Cں€,„Co €o»„ €p”‚ع„@=•X €q£M„?€,…‎;,, €r”‚.„?‚„@à?&•£‚ع,…ج;‚ع, €sک2”‚ع„?€=• €t£ن‚ع,…ج;‚ع, €u— €v™JIF RECORDFOUND <>0 AND MAINMENU<>7 THEN CALL STANDARD.RECALL(FNUMBER,"L") €wگ„,„,„Cں€,„Co €x»„ €y“‚ظ„Bئ €z— €{“‚„ €|“‚ف„?€ €}ک¯”‚„@=•‌ €~گ„,„,„Cں€,„Co €»„ €پ£4د‚ع,…×;‚ع, €‚گ„,„,„Cں€,„Co €ƒ»„ €„“‚ظ„Bئ €…“‚„ €†“‚ف„?€ €‡ک”‚„@@=•+ €ˆگ„,„,„Cں€,„Co €‰»„ €ٹ”‚ع„@=•) €‹™CALL STANDARD.RECALL(1,"R") €Œ— €چ£ي‚ع,…‎;‚ع, €ژ”‚.„?‚„@à?&•/ €ڈ“‚‚. €گ£3ک‚ع,…¥;‚ع, €‘— €’“‚„ €“گ„,„,„Cں€,„Co €”»„ €•“‚ظ„Bئ €–“‚ف„?€ €—کإ”‚„@€=•³ €ک”‚ـ„?•{ €™گ„,„,„Cں€,„Co €ڑ»„ €›£ع‚ع,…‌;‚ع, €œگ„,„,„Cں€,„Co €‌»„ €‍“‚ظ„Bئ €ں— € “‚ف„?€ €،“‚„ €¢— €£ےےّأ®‚„A=‚„ءط=| €¤گ„,„,„Cں€,„Co €¥»„ €¦“‚ظ„Bئ €§“‚„ €¨¥ےے÷ق €ھ¤ٌJ‚ے; €¬»„?€,…«,…t €»„@,…´,…r €®»„@@,…»,…s €¯»„@€,…¼,…u €°»„A,…ء,… €±”‹¶!‹7-„@;;,„@;;…=• €²»„Ap,…ڈ,…9 €³– €´»„A€,…ڈ,…9 €µ— €¶¥ےےے €¹¤ RTN‚ƒ.;ƒ,‚‚‚‚‚ ‚‚‚‚ ‚‚ ƒ- €؛“ƒ,… €»“‚‚ €¼“‚.„ €½“ƒd…9 €¾™SEARCHMODE$ = "CITY-S" €؟“ƒ…! €ہ£{خ‚;‚ €ء£b(‚;‚ €آ“‚ٹz‚;;‚/ €أ“‚„?€ €ؤ“‚„A €إ“‚ „@@ €ئ“‚ „?€ €ا“‚„?€ €ب“‚„ €ةگ„?€,„?€,„Cں€,„Co €ت»„ €ث“‚„?€ €ح“‚ „?€ €خ¬ €دگ„?€,„?€,„Cں€,„Co €ذ»„@à,…؟,…ھ €ر”‚„@=•»„@ہ,…¾,…ٍ €زµ„?€,„B4,„C,„B4 €سµ„C,„B4,„C,„Cn €شµ„C ,„B4,„Cں,„B4 €صµ„C ,„B4,„C ,„Cn €ض”ƒ.…‎=• €×™EIF LOF(FNUMBER)<>0 AND FNUMBER = 1 THEN KEY 6, "FMENU6", SEARCHMODE$ €ط™IF FNUMBER<>1 THEN €ظ™ LOCATE 12,5 €ع™0 PRINT "RECALL/"+LTRIM$(STR$(RECNUMFILE))+"REC" €غ™ELSE €ـ“‚ „@ €ف‘„A@,„@ €ق”‚.„>•ة €ك“‚ „@€ €à‘„A@,„@ €ل”‚„?€=•’ƒڈ €â”‚„@=•’ƒ‌ €م™(" PRICE: ";LTRIM$(STR$(T.PRODUCT.PRICE)) €ن“‚ ‚ €ه‘„A@,„A €و’‹¶!ƒd,„A ;; €ç–. €è™IF SEARCHMODE$ = "CITY-S" THEN €é”‚„?€=•(’…&‹³‹2%‚;;;;+…‏+ €ê”‚„@=•(’…'‹³‹2%‚;;;;+…‏+ €ë™nIF SEARCHMODE$ = "PHON-S" THEN PRINT "TYPE PHONE NR OR PUSH BUTTON TO RECALL/"+LTRIM$(STR$(RECNUMFILE))+"REC" €ى“ƒd…9 €ي— €î“‚ ‚ €ï™ END IF €ً— €ٌ‘„A@,„@ €ٍ”ƒ.…‌=•(’…¢‹³‹2%‚;;;;+….+ €َ”ƒ.…ج=• €ô”‚„?€=•(’…œ‹³‹2%‚;;;;+…ے+ €ُ”‚„@=•(’…ù‹³‹2%‚;;;;+…ے+ €ِ— €÷”‚.„>‚/&•# €ّ“‚‚. €ù“‚/„ €ْ— €û“‚‚‚+ €ü“‚„?€ €‎“‚ „@ €ے›*‚ ‚œ‚‚‌‚„?€ €ؤ#‚,‚ €£dة‚;‚ €”ٹz‚;;„?•< €”‚„@=•ï €”‚„?€=•“‚*‚I €”‚„@=•“‚*‚M €”‚„@@=•“‚*‚N € ”‚„@€=•“‚*‚O € ”‚„@ =•“‚*‚P €”‚„@ہ=•“‚*‚Q €”‚„@à=•“‚*‚R € ”‚„A=•“‚*‚S €”‚„A=•“‚*‚T €”‚„A =•“‚*‚J €”‚„@ہ<• €“‚ „@€ €‘„A`,„Aˆ„B‚*+ €’‹µ‹³‹·"ƒ‌;;;;,„?€,„AP;; €“‚ „@ €‘„A`,„B„B‚*+ €™& PRINT LTRIM$(RTRIM$(T.PRODUCT.PRICE)) €™ PRINT T.PRODUCT.PRICE €”ƒ.…ج=•#½…:;…ï;‹§„C#;;;‚* €کa”‚„@ >•O €“‚ „@€ €‘„C%,„Aˆ„B‚„@ -*+ €™"PRINT LTRIM$(RTRIM$(T.CITY.NAME$)) €’‹µ‹³‹·"ƒ‌;;;;,„?€,„AP;; €“‚ „@ €‘„C%,„B„B‚„@ -*+ € ™& PRINT LTRIM$(RTRIM$(T.PRODUCT.PRICE)) €!™ PRINT T.PRODUCT.PRICE €"”ƒ.…ج=•#½…:;…ï;‹§„C#;;;‚* €#— €$“‚‚„?€+ €%ک0”‚„?€=• €&“‚ „@€ €'”‚„@ہ<•q €(‘„Ap,„A°„B‚*+ €)’‹µ‹³‹·"ƒڈ;;;;,„?€,„AP;; €*“‚‚„?€+ €+ک…”‚„@ >•s €,‘„C%,„A°„B‚„@ -*+ €-’‹µ‹³‹·"ƒڈ;;;;,„?€,„AP;; €.“‚‚„?€+ €/— €0— €1–L €2‘„?€,„C> €3’…C €4»„A,…9,…9 €5»„A,…9,…9 €6— €8”ٹh ‚;;„؟€=•¯ €9‍ےےْ‚ ‚‚ €:“‚ „@ €;”ٹh ‚;;„؟€=•ƒ €<”‚„@ہ<•# €=‘„A@,„CR €>’…L €?ک1”‚„@ >• €@‘„C%,„CR €A’…L €B— €C»„A,…9,…9 €D— €E“‚ „@@ €F™9IF BROWSEREC > BROWSELINES THEN KEY 8, "FMENU8", "•»„A,…ہ,…q €H”‚‚]•»„A,…9,…9 €I”‚‚<•»„A,…ء,…ط €J”‚„?€=•»„A,…9,…9 €K™. IF FNUMBER = 2 THEN KEY 6,"FMENU6", "PRINT" €L“‚„ €Mµ„?€,„CY,„Cں,„CY €N”ƒ.…ج?•Q €O”‚‚>• €P»„?€,…9,…9 €Q– €R»„?€,…«,…v €S— €T”‚„?€+‚>• €U»„@,…9,…9 €V– €W»„@,…´,…v €X— €Y”‚„@+‚>• €Z»„@@,…9,…9 €[– €\»„@@,…»,…v €]— €^”‚„@@+‚>• €_»„@€,…9,…9 €`– €a»„@€,…¼,…v €b— €c”‚„@€+‚>• €d»„@ ,…9,…9 €e– €f»„@ ,…½,…v €g— €h”‚„@ +‚>• €i»„A`,…9,…9 €j– €k»„A`,…°,…v €l— €m”‚„@ہ+‚>• €n»„AP,…9,…9 €o– €p»„AP,…¯,…v €q— €r”‚„@à+‚>• €s»„A@,…9,…9 €t– €u»„A@,…®,…v €v— €w”‚„A+‚>• €x»„A0,…9,…9 €y– €z»„A0,…,…v €{— €|”‚„A+‚>• €}»„A ,…9,…9 €~– €»„A ,…¬,…v €€— €پ— €ƒ´„,„,„Cں€,„Co,„ €„¬ €…™0 THEN €†”ƒ.…‎=ٹz‚;;„?&•{ €‡”‹¶!‹7-„@;;,„@;;…=• €ˆ»„Ap,…ڈ,…9 €‰– €ٹ»„A€,…ڈ,…9 €‹— €Œ”ƒ…!=ٹ*;;‚>&•3 €چ“‚ٹ*;;„>™™ڑ+ €ژ“ƒ…@ €ڈکS”ƒ…@=ٹ*;;‚>&•/ €گ“‚ٹ*;;„>™™ڑ+ €‘“ƒ…! €’— €“”‚„A [•J €”“‚ٹxƒd;; €•‘„A@ٹk ƒd;;+,„A €–’ƒ €—— €ک— €ڑےے‏ ®‚„? €›”‚„@ہ=•> €œ“‚„ €‌£Vَ„@;, €‍£7"; €ں£N„@;, € — €،”‚„@à=• €¢“‚„؟€ €£°{ €¤— €¥”‚„A=•[ €¦“‚‚‚-‚- €§“‚.„ €¨™# IF BROWSEREC < 20 THEN BROWSEREC=1 €©— €«”‚„A=•/ €¬“‚‚‚+‚+ €“‚.„ €®— €¯”‚„?€<•“‚„?€ €°”‚‚>•“‚‚ €±™ €²”‚„?€=• €³“‚.‚ €´°L €µ— €¶”‚„@=•# €·“‚.‚„?€+ €¸° €¹— €؛”‚„@@=•# €»“‚.‚„@+ €¼°ـ €½— €¾”‚„@€=•# €؟“‚.‚„@@+ €ہ°¤ €ء— €آ”‚„@ =•# €أ“‚.‚„@€+ €ؤ°l €إ— €ئ”‚„A`=•# €ا“‚.‚„@ + €ب°4 €ة— €ت”‚„AP=•# €ث“‚.‚„@ہ+ €ج°ü €ح— €خ”‚„A@=•# €د“‚.‚„@à+ €ذ°ؤ €ر— €ز”‚„A0=•# €س“‚.‚„A+ €ش°Œ €ص— €ض”‚„A =•# €×“‚.‚„A+ €ط°T €ظ— €ع”‚„D¢€=• €غ”‚.„?•° €ـ— €ف”‚„B<>‚„B¸<&‚„CE=|‚„CF=|‚„CX=|•e €ق“ƒdƒd‹§‚;;+ €ك”ٹxƒd;;„Aب>•“ƒd‹²ƒd,„Aب;; €àکط”‚„Aà=•_ €ل”ٹxƒd;;„>•6 €â“ƒd‹²ƒd,ٹxƒd;;„?€-;; €م— €نکh”‚„B=•V €ه“ƒdƒd…!+ €و”ٹxƒd;;„Aب>•“ƒd‹²ƒd,„Aب;; €ç— €è”‚„A`>ٹz‚;;„?&•U €é£Qٹ‚;‚ €ê£ù‚;‚ €ë£H—‚;‚ €ى£B‚;‚ €ي— €î“‚„ €ïےےç €ً”‚„?€=•“‚‚. €ٌ£P‎‚;‚ €ٍ»„ €َ”‚„@ہ=•" €ô“‚„ €ُ£0ْ; €ِک÷”‚„@à=• €÷”‚„?€=•2 €ّ“ƒڈ…9 €ù™T.PHONE.NR$ = "" €ْک¼”‚„@=•ھ €û“ƒ‌…9 €ü“‚I„ €‎“‚M„ €‏“‚N„ €ے“‚O„ €“‚P„ €“‚Q„ €“‚R„ €“‚S„ €“‚T„ €“‚J„ €— €کغ”‚„@à?‚„@ہ?&•½ €”ƒ.…‎=•ں € “‚„ € £F€‚;‚ €ؤ#‚,‚. €£OQ‚;‚ € £O‚;‚ €™ITEM SELECTED BY BUTTON €”‚„?€=• €— €ک”ƒ.…‌=•َ €™ €£Eض‚;‚ €ؤ#‚,‚. €£N§‚;‚ €£Nh‚;‚ €™ €»„ €گ„,„,„Cں€,„Co €“‚ ‚ €“‚ „@ €“ƒ-…، €£ـKƒ-,„B ,‚,„?€,……;ƒ-,‚,, €“‚„ €»„@ہ,…¾,…( € »„A,…ء,…6 €!´„,„,„Cں€,„Co,„ €"µ„,„CY,„Cں,„CY €#¬ €$”‚„?•° €%ےےےـ €&“‚ ‚ €'»„ €(”‚„A=•* €)£|‚,‚.;‚‚. €*”‚„?€=•U €+”‹³‹·"ƒڈ;;;;‹³‹·"ƒ‚;;;;=•“‚„ €,کc”‚„@=•Q €-”‹³‹·"ƒ‌;;;;‹³‹·"ƒƒ;;;;=•“‚„ €.— €/“‚.„ €0“‚„ €1گ„,„,„Cں€,„Co €3— €4“‚„ €5— €6— €7»„ €8گ„?€,„?€,„Cں,„Cn €9“ƒ,…9 €:¥ےےك· €>¤T,‚‚;ƒ/‚‚‚ƒ0 €?”‚„?€=•' €@“‚„Aذ €A“ƒ/…! €Bک5”‚„@=•# €C“‚„B® €D“ƒ/…$ €E— €F™IF FNUMBER = 1 THEN €Gآ…‎,#„Ap,ƒ/,‚ €Hئ#„Ap,‚‡ƒ7 €I“‚ٹz„Ap;;‚/ €J™ELSEIF FNUMBER = 2 THEN €K™ OPEN "R", #15, "TS-PROD.DAT",28 €L™FIELD #15, 28 AS F.FIELD$ €M™RECCOUNT = LOF(15)/28 €N™ELSE €O™RECCOUNT = 0 €P™END IF €Q”‚„>•d €R“‚„?€ €S›‌‚„?€œ‚‚‌‚„?€ €Tؤ#„Ap,‚ €U“ƒ0ƒ7 €V”‚‚?•/ €W“ƒ‚;ƒ0 €X“‚‚„?€+ €Y— €Z‍ےےے”‚‚‚ €[أ#„Ap €\™ €]™IF FNUMBER = 1 THEN €^ثƒ/ €_آ…‎,#„Ap,ƒ/,‚ €`ئ#„Ap,‚‡ƒ7 €a™ELSEIF FNUMBER = 2 THEN €b™ KILL "TS-PROD.DAT" €c™OPEN "R", #15, "TS-PROD.DAT",28 €d™FIELD #15, 28 AS F.FIELD$ €e™END IF €f›ں‚„?€œ‚‚„?€-‌‚„?€ €g“ƒ0ƒ‚; €h”‚„?€=•اƒ7‹1$‚;; €iاƒ7ƒ0 €jإ#„Ap,‚ €k‍ےےےک‚‚‚ €m— €nأ#„Ap €p¥ےےûµ €r¤ک3ƒ¸; €s»„ €tگ €u»„@ہ,…¾,…9 €v»„@à,…؟,…9 €w»„A,…ہ,…9 €x»„A,…ء,…9 €y»„Aˆ,…±,…9 €z»„Aگ,…²,…9 €{»„Aک,…³,…9 €|»„A ,…µ,…9 €}»„A¨,…¶,…9 €~»„A°,…·,…9 €»„A¸,…¹,…9 €€»„Aہ,…؛,…9 €پ»„A€,…گ,…9 €ƒ”ƒ¸…=•q €„‘„,„ €…’… €†‘„,„?€ €‡’…7 €ˆ‘„,„@ €‰’… €ٹ‘„,„@@ €‹’… €Œکˆ”ƒ¸…é=•q €چ‘„,„ €ژ’… €ڈ‘„,„?€ €گ’…7 €‘‘„,„@ €’’… €“‘„,„@@ €”’… €•– €–— €—“‚„ €ک¬ €™”‚„?•° €ڑےےےـ €›»„ €œگ €‌¥ےے‎q €،¤iQ‚~; €¢™ €£“‚ ‚ €¤‘„A@,„A €¥’‹1$„Aہ;; €¦‘„A@,„A €§’‹¶!ƒd,„A ;; €¨™ €©”ٹxƒd;;„>•( €ھ£ـ‚~,ƒd;‚~ƒd €«– €¬“‚.„ €— €®”‚.„>•V €¯£:´‚~;‚~ €°ؤ#‚~,‚. €±£C…‚~;‚~ €²£CF‚~;‚~ €³– €´£Sً‚~;‚~ €µ— €¶¥ےے‏ €¹¤ئP‚;‚€ €؛“‚ „@€ €»™IF FNUMBER = 1 THEN €¼”‚.„>•¢ €½‘„A@,„@ €¾’‹1$„B4;; €؟‘„A@,„@ €ہ”‚„?€=•’…ک;ƒڈ €ء”‚„@=•.’…ُ;ƒ‌;…+;‹³‹2%‚€;;;; €أک¹”‚.„=ƒd…9?&•› €ؤ™ NOT FOUND! €إ‘„A@,„@ €ئ’‹1$„B–;; €ا‘„A@,„@ €ب’…ـ €ة£ـب„@;, €ت“ƒd‹²ƒd,ٹxƒd;;„?€-;; €ج— €ح“‚ ‚ €خ¥ےے‏C €ش™ANEW SEARCH BLOCK - GLOBAL.SEARCH ******************************** €ص¤R82‚‚ƒ؛;ƒ¹‚„‚…‚پ‚ƒƒ» €ض“ƒ¹…9 €×”‚‚„?€=•' €ط“ƒ¹…! €ظ“‚„Aذ €عک5”‚‚„@=•# €غ“ƒ¹…$ €ـ“‚„B® €ف— €ق™*ADJUST MAX FIELD SIZE TO BE /LENFORMATFILE €ك“‚„„Fê$„@/ €à›p‚…‚„œ‚‚‌‚„؟€ €ل”ٹw‚…‚/;;‚…‚/-„=•¯ €â‍ےےےء‚…‚‚ €م“‚„‚… €نآ…‎,#‚‚,ƒ¹,‚„ €هئ#‚‚,‚„‡ƒ7 €و“‚پ„ €ç“‚.„ €è“‚ƒ„ €é“ƒ»…9 €ê“ƒ»‹§„CI;;ƒ؛+ €ë›‚…„?€œ‚ٹwٹz‚‚;;‚„/;;„?€+‌‚„?€ €ىؤ#‚‚,‚… €ي“‚ƒٹtƒ7,ƒ»;; €î”‚ƒ„>•\ €ï“‚پ‚پ‚ƒ+ €ً“‚.ٹw‚پ‚/;;„?€+ €ٌ“‚/„؟€ €ٍ¯< €َ– €ô“‚پ‚پ‚„+ €ُ— €ِ‍ےےے<‚…‚‚ €÷أ#‚‚ €ّ“ƒ7…9 €ù¥ےےü· €û¤µ‚‡‚†;‚ˆƒ¼ €ü™'RECORDFOUND = 0, OR FOUND RECORD NUMBER €‎™*N.RECORD.NUMBER, RECORD TO BE INSERTED ... €‏‘„,„ €ے’… €“‚.„ €£4‚‡;‚‡ €“‚ˆٹz‚‡;;‚/ €”‚ˆ„?‚†‚ˆ[&•t €“ƒ¼…9 €™FOR RECORD = 1 TO RECCOUNT €ؤ#‚‡,‚† €™0IF FNUMBER = 7 THEN FIELD.NAME$ = F.PLACE.CODE$ €™.IF FNUMBER = 8 THEN FIELD.NAME$ = F.ING.CODE$ € ™.IF FNUMBER = 9 THEN FIELD.NAME$ = F.INS.CODE$ € ™%IF FIELD2FIND = VAL(FIELD.NAME$) THEN €£;،‚‡;‚‡ €“‚.‚† € ™EXIT FOR €™END IF €™NEXT RECORD €— €£;‚‡;‚‡ €‘„,„ €’‹1$„A;; €¥ےے‎T €¤”,M‚‰ƒ½;ƒ؟ƒ¾‚ٹ €“‚.„ €“ƒ؟ƒ½ €™KT.MAXCODE.PLU, T.MAXCODE.PROD, T.MAXCODE.INS, T.MAXCODE.ING, T.MAXCODE.ORIG €”ƒ½…×=•£Jٌ‚‰;‚‰ €گ„,„,„Aک,„@@ €“‚„ €¬ €¬ € ”‚‰„?€=•Q €!“ƒpƒڈ €"£‘ن…™,…ض,‹³‹·"ƒڈ;;;;,…~,„Aب,„,„;,,,,,,, €#”‚„؟€=•° ث €$£ےےّ_‚‰,ƒ;‚‰ƒ €%”‚.„?‚.‚?&•4 €&گ„,„,„Cں€,„Co €'“ƒ¾…— €(£ا;ƒ¾,„B´,‚,„?€,……;ƒ¾,‚,, €)“ƒ¾… €*£ئّƒ¾,„Bـ,‚,„?€,……;ƒ¾,‚,, €+™ LOCATE 0,1 €,™ PRINT " CUSTOMER NAME " €-™ LOCATE 0,2 €.™ PRINT " ALREADY EXIST! " €/£س.„@@;, €0°\ €1— €2“ƒڈƒ €3”‹³‹·"ƒp;;;;‹³‹·"ƒ‚;;;;=•“ƒ‚ƒڈ €4کى”‚‰„@=•ع €5“ƒqƒ‌ €6£ڈ‚…ِ,…ض,‹³‹·"ƒ‌;;;;,…~,„Aب,„,„;,,,,,,, €7”‚„؟€=•°i €8£ےےُ‎‚‰,ƒ;‚‰ƒ €9”‚.„?‚.‚?&•] €:گ„,„,„Cں€,„Co €;“ƒ¾…ِ €<£ؤظƒ¾,„B´,‚,„?€,……;ƒ¾,‚,, €=“ƒ¾… €>£ؤ–ƒ¾,„Bـ,‚,„?€,……;ƒ¾,‚,, €?™ LOCATE 0,1 €@™ PRINT " PRODUCT " €A™ LOCATE 0,2 €B™ PRINT " ALREADY EXIST! " €C£ذج„@@;, €D™ CALL ALREADY.EXISTS(T.CUST.CODE) €E°ر €F— €G“ƒ‌ƒ €H™s IF LTRIM$(RTRIM$(OLD.PRODUCT.NAME$)) = LTRIM$(RTRIM$(SELECTED.PRODUCT$)) THEN SELECTED.PRODUCT$ = T.PRODUCT.NAME$ €I™ CALL DEBUG(SELECTED.PRODUCT$) €J™ IF EDITMODE$="NEW" THEN €K™ CALL STANDARD.RECALL(1,"R") €L™ END IF €M™& CALL PRODUCT.PRICE.ORDER(ORDER.MODE$) €N™dCALL NEW.INPUTBOX788("PRICE","PER KILO", LTRIM$(RTRIM$(STR$(T.PRODUCT.PRICE))), "NUMERIC", 6,0,1000) €O™IF ERRNO = -1 THEN EXIT DO €P™T.PRODUCT.PRICE = VAL(BUFFER$) €Q”‹³‹·"ƒq;;;;‹³‹·"ƒƒ;;;;=•€ €R“ƒƒƒ‌ €S™# SELECTED.PRICE = T.PRODUCT.PRICE1 €T”‚„?€=•“‚:‚I €U”‚„@=•“‚:‚M €V”‚„@@=•“‚:‚N €W”‚„@€=•“‚:‚O €X”‚„@ =•“‚:‚P €Y”‚„@ہ=•“‚:‚Q €Z”‚„@à=•“‚:‚R €[”‚„A=•“‚:‚S €\”‚„A=•“‚:‚T €]”‚„A =•“‚:‚J €^— €_— €`£(إ‚‰;‚‰ €a”ƒ½…×=•S €b“‚ٹٹz‚‰;;‚/„?€+ €c™CALL EMPTYVRBLFILE(FNUMBER) €d– €e“‚ٹ‚ €f— €g£4»‚‰;‚‰ €h™ CALL DEBUG(STR$(T.PRODUC.PRICE)) €i™!CALL DEBUG(STR$(N.RECORD.NUMBER)) €j™IF N.RECORD.NUMBER > 0 THEN €kإ#‚‰,‚ٹ €l£0c‚‰;‚‰ €m™IF EDITMODE$="NEW" THEN €n”‚‰„@=•} €p™IF EDITMODE$="NEW" THEN €q£ےےؤ$„?€,…‎;,, €r™END IF €s”‚.„?‚„@à?&•£sƒ؟;ƒ؟ €u— €v° €wےےُ§ €x™IF ERRNO = -1 THEN EXIT DO €y° €zےےُm €{“‚„ €|¥ےےôu €~¤i@ƒہ;‚‹‚Œ €“‚‹„@ €€“‚ „ €پ¬ €ƒ”‚„؟€=•° €„”ƒہ…¥=•t €…™ PRODUCT.PRICE = 1 €†”‚„?€=•“‚*‚I €‡”‚„@=•“‚*‚M €ˆ”‚„@@=•“‚*‚N €‰”‚„@€=•“‚*‚O €ٹ”‚„@ =•“‚*‚P €‹”‚„@ہ=•“‚*‚Q €Œ”‚„@à=•“‚*‚R €چ”‚„A=•“‚*‚S €ژ”‚„A=•“‚*‚T €ڈ”‚„A =•“‚*‚J €گ“‚ ‚* €‘– €’“‚*„ €“— €”£…h…ً,…ن,‹³‹·"‹2%‚*;;;;;;,…ق,„@ہ,„,„Dz;,,,,,,, €•”‚„؟€=•°ù €–”‚„?€=•“‚Iٹ,ƒ;; €—”‚„@=•“‚Mٹ,ƒ;; €ک”‚„@@=•“‚Nٹ,ƒ;; €™”‚„@€=•“‚Oٹ,ƒ;; €ڑ”‚„@ =•“‚Pٹ,ƒ;; €›”‚„@ہ=•“‚Qٹ,ƒ;; €œ”‚„@à=•“‚Rٹ,ƒ;; €‌”‚„A=•“‚Sٹ,ƒ;; €‍”‚„A=•“‚Tٹ,ƒ;; €ں”‚„A =•“‚Jٹ,ƒ;; € ™CALL DEBUG(STR$(PRODUCT.PRICE)) €،™ CALL DEBUG(STR$(SELECTED.PRICE)) €¢”‚*‚:=•œ €£™$ SELECTED.PRODUCT$ = T.PRODUCT.NAME$ €¤™! SELECTED.PRICE = T.PRODUCT.PRICE €¥”‚9„?€=•“‚:‚I €¦”‚9„@=•“‚:‚M €§”‚9„@@=•“‚:‚N €¨”‚9„@€=•“‚:‚O €©”‚9„@ =•“‚:‚P €ھ”‚9„@ہ=•“‚:‚Q €«”‚9„@à=•“‚:‚R €¬”‚9„A=•“‚:‚S €”‚9„A=•“‚:‚T €®”‚9„A =•“‚:‚J €¯— €°£ Q‚‹;‚‹ €±”ƒہ…¥=• €²“‚Œ‚ €³ک7”ƒہ…×=•% €´“‚Œٹz‚‹;;‚/ €µ— €¶£,`‚‹;‚‹ €·™ CALL DEBUG(STR$(T.PRODUC.PRICE)) €¸™!CALL DEBUG(STR$(N.RECORD.NUMBER)) €¹™IF N.RECORD.NUMBER > 0 THEN €؛إ#‚‹,‚Œ €»£(‚‹;‚‹ €¼£ےے¼!„?€,…‎;,, €½ےےّغ €¾¥ےےّ €ء¤H‚چ; €آ‘„,„?€ €أ’‚چ;…$ €ؤ£آإ„@;, €إ¥ےےےء €ب¤;‚ڈ‚ژƒء €ة“‚ڈ„؟€ €ت“‚ژ‚ €ث“‚ „@ €جگ„,„,„Cں€,„Co €ح¬ €خ“ƒء…“ €د£µPƒء,„Bp,‚,„?€,……;ƒء,‚,, €ذ“ƒء… €ر£µ ƒء,„Bـ,‚,„?€,……;ƒء,‚,, €ز“ƒء…} €س£´تƒء,„C ,‚,„?€,……;ƒء,‚,, €ش“‚„ €ص»„@ہ,…¾,…( €ض»„A,…ء,…5 €×´„,„,„Cں€,„Co,„ €طµ„,„CY,„Cں€,„CY €ظ¬ €ع”‚„?•° €غےےےـ €ـ»„ €فگ €ق”‚„@ہ=•°n €ك™ €ل£¥„?€;, €â£%`„?€;, €م£$|„?€;, €ن™ €ه£l„@;, €و£%'„@;, €ç£$C„@;, €é“ƒڈ…ث €ê£-„?€;, €ë“ƒڈ…† €ى£„?€;, €ي“ƒڈ… €î£ï„?€;, €ً“‚O„ €ٌ“‚P„ €ٍ“‚Q„ €َ“‚R„ €ô“‚S„ €ُ“‚T„ €ِ“‚J„ €ّ™FILE 2 €ùگ„?€,„?€,„Cں,„Cn €ْ“ƒ‌…ê €û“‚I„@S× €ü“‚M„@S× €‎“‚N„@S× €‏£„@;, €ے“ƒ‌… €“‚I„@î¸R €“‚M„@î¸R €“‚N„@î¸R €£أ„@;, €“ƒ‌… €“‚I„A/× €“‚M„A/× €“‚N„A/× €£w„@;, € “ƒ‌…ƒ € “‚I„@¸ُأ €“‚M„@¸ُأ €“‚N„@¸ُأ € £+„@;, €“ƒ‌…ي €“‚I„@2ڈ\ €“‚M„@2ڈ\ €“‚N„@2ڈ\ €£ك„@;, €“ƒ‌… €“‚I„@بُأ €“‚M„@بُأ €“‚N„@بُأ €£“„@;, €“ƒ‌…ح €“‚I„A× €“‚M„A× €“‚N„A× €£G„@;, €“ƒ‌… €“‚I„A.لH €“‚M„A.لH € “‚N„A.لH €!£û„@;, €"“ƒ‌…ى €#“‚I„@^¸R €$“‚M„@^¸R €%“‚N„@^¸R €&£¯„@;, €'“ƒ‌…ë €(“‚I„@؟® €)“‚M„@؟® €*“‚N„@؟® €+£c„@;, €-° €.ےےùے €/“‚ڈ„ €0“‚ ‚ژ €2“‚„ €3£¼„?€;, €4¥ےےù\ €6¤4‚گ;‚‘ƒآ €7£ع‚گ;‚گ €8“‚‘ٹz‚گ;;‚/ €9“‚‘‚‘„?€+ €;£$‚گ;‚گ €=إ#‚گ,‚‘ €>£ 7‚گ;‚گ €?“ƒآ…’ €@£®gƒآ,„Bب,‚,„?€,……;ƒآ,‚,, €A£Bث‚‘,„A ;‚‘, €C¥ےےے €E¤,>;ƒإƒئƒا‚“‚” €G™PRINT #PRINTER, ""+LF$ €H“ƒإ‹µ‹¨ ;;,„@€,„@;; €I“ƒئ‹µ‹¨ ;;,„?€,„@;; €J“ƒا‹µ‹¨ ;;,„@à,„@€;; €K“ƒ#ƒإ…K+ƒئ+…K+ƒا+ €L“ƒ$‹µ‹5);;,„?€,„@ ;; €M£ذ„@;, €N“‚“ٹz„@;;‚/ €O”ٹz„@;;„?•پ €P£0ƒ; €Q™$PRINT #PRINTER, CHR$(27);"!";CHR$(0) €R’#‚(,‹§„Aط;;;‹§„B€;; €S™$PRINT #PRINTER, CHR$(27);"!";CHR$(0) €T’#‚(,‹§„@à;; €U™ PRINT #PRINTER, "" €V’#‚(,…÷ €W’#‚(,…9 €X’#‚(,…9 €Y½#‚(,…8;…ô;…;…î €Z’#‚(,…9 €\›à‚”„?€œ‚‚“‌‚„?€ €^ؤ#„@,‚” €_£„@;, €b™ IF LOF(FNUMBER) <> 0 THEN €d”‚„?€=•“‚*‚I €e”‚„@=•“‚*‚M €f”‚„@@=•“‚*‚N €g”‚„@€=•“‚*‚O €h”‚„@ =•“‚*‚P €i”‚„@ہ=•“‚*‚Q €j”‚„@à=•“‚*‚R €k”‚„A=•“‚*‚S €l”‚„A=•“‚*‚T €m”‚„A =•“‚*‚J €n½#‚(,…7;ƒ‌;…;‚* €p‍ےے‏Q‚”‚‚ €r’#‚(,‹§„Aط;;;‹§„B`;; €s’#‚(,‹§„Aط;;;‹§„A@;; €t£-?; €u— €v£ت„@;, €w¥ےےû €y¤m,?;ƒبƒةƒت‚•‚– €z™ CALL CONSEC() €{£,¨; €|™PRINT #PRINTER, ""+LF$ €}“ƒب‹µ‹¨ ;;,„@€,„@;; €~“ƒة‹µ‹¨ ;;,„?€,„@;; €“ƒت‹µ‹¨ ;;,„@à,„@€;; €€“ƒ#ƒب…K+ƒة+…K+ƒت+ €پ“ƒ$‹µ‹5);;,„?€,„@ ;; €ƒ™$PRINT #PRINTER, CHR$(27);"!";CHR$(0) €„’#‚(,‹§„Aط;;;‹§„B€;; €…™$PRINT #PRINTER, CHR$(27);"!";CHR$(0) €†’#‚(,‹§„@à;; €‡™ PRINT #PRINTER, "" €ˆ’#‚(,…9 €‰’#‚(,…9 €ٹ’#‚(,…9 €‹™ add 2 str €Œ’#‚(,…9 €چ’#‚(,…9 €ژ™ PRINT #PRINTER, "" €ڈ™PRINT #PRINTER, "" €گ£H„@@;, €‘ؤ#„@@,„?€ €’£„@@;, €“½#‚(,…?;…;…9;…;ƒ# €”’#‚(,…9 €•½#‚(,…<;…;ƒ”;…;…9 €–™ add 4 str €—½#‚(,…>;…û €ک™PRINT #PRINTER, "" €™½#‚(,…=;…B;…!;…8;…;…ô;…;…% €ڑ™ PRINT #PRINTER, "" €›™! PRINT #PRINTER, USING " \\";"KG" €œ’#‚(,…9 €‌™CALL OPENFILE(3) €‍“‚•ٹz„@@;;‚/ €ں”‚•„?• €،›÷‚-„?€œ‚‚•‌‚„?€ €¢ؤ#„@@,‚- €££L„@@;, €¤½#‚(,…;;‚F;…!;‚G;…;ƒ•;…;‚E €¥™add 1str €¦’#‚(,…9 €§™";" ";T.INV.VAT IF REPRINT = 0 THEN €¨“‚Z‚Z‚E+ €©‍ےےے:‚-‚‚ €ھ— €«£W„@@;, €¬›V‚–„?€œ‚„Aè‚•„@*-‌‚„?€ €’#‚(,…9 €®‍ےےےç‚–‚‚ €¯½#‚(,…6;…;…;‚Z €±™ PRINT #PRINTER, "" €²™ PRINT #PRINTER, "" €³™ PRINT #PRINTER, "" €´™ PRINT #PRINTER, "" €µ™ PRINT #PRINTER, "" €¶™PRINT #PRINTER,CHR$(12) €·™PRINT #PRINTER, "" €¸™!PRINT #PRINTER, CHR$(27);CHR$(56) €¹™!PRINT #PRINTER, CHR$(27);CHR$(13) €؛’#‚(,‹§„Aط;;;‹§„B`;; €»’#‚(,‹§„A@;; €¼£%ؤ; €½“‚Z„ €¾¥ےےّœ €آ¤زB‚—;‚ک‚™‚ڑ‚› €أ”‚—„@@=•ح €ؤ“ƒ”ƒ‚ €إ“ƒ•ƒƒ €ئ“‚F‚: €ا“‚E‚:ٹ|;;* €ب“‚Gٹ|;; €ة£ ش„@@;, €ت“‚کٹz‚—;;‚/„?€+ €ث£$„@@;, €جإ#„@@,‚ک €ح£H„@@;, €خکإ”‚—„@€=•³ €د£ S„@@;, €ذ“‚™ٹz„@@;;‚/ €ر£ #‚—;‚— €ز“‚ڑٹz„@€;;‚/ €سؤ#„@@,„?€ €ش£ش„@@;, €ص™FIRST RECORD €ض“ƒ‰ƒ” €×™ T.4PC.PRODUCT.NAME$ = SPACE$(20) €ط“ƒ‹…9 €ظ™T.4PC.AMMOUNT$ = SPACE$(6) €ع“‚@„ €غ“‚A„ €ـ“ƒٹƒ# €ف£¨„@€;, €قإ#„@€,‚ڑ„?€+ €ك›ؤ‚›„?€œ‚‚™‌‚„?€ €àؤ#„@@,‚› €ل£·„@@;, €â™IF X < N3.RECORDS THEN €م™!T.4PC.CUSTOMER.NAME$ = SPACE$(25) €ن“ƒ‰…9 €ه“ƒ‹ƒ• €و“‚A‚F €ç™ T.4PC.DATE$ = SPACE$(10) €è“ƒٹ…9 €é™ T.TOTAL.PRICE = 0 €ê“‚@‚E €ë™'TOTAL.PRICE = TOTAL.PRICE+T.INV.AMMOUNT €ي™ELSE €î™ IF X < N3.RECORDS THEN €ï™END IF €ً£ْ„@€;, €ٌإ#„@€,‚ڑ„?€+‚›+ €ٍ‍ےے‏m‚›‚‚ €َ™LAST RECORD €ô™ T.4PC.PRODUCT.NAME$ = SPACE$(20) €ُ“ƒ‰…9 €ِ“ƒ‹…9 €÷™T.4PC.AMMOUNT$ = SPACE$(6) €ّ™ T.4PC.AMMOUNT$ = "" €ù“‚A„ €ْ™T.4PC.DATE$ = SPACE$(10) €û“ƒٹ…9 €ü“‚@‚Z €‎“‚Z„ €‏™ T.TOTAL.PRICE = TOTAL.PRICE €ے£ک„@€;, €إ#„@€,‚ڑ„?€+‚›+ €™EMPTY STRING €“ƒ‰…9 €“ƒ‹…9 €™T.4PC.AMMOUNT$ = "" €“‚A„ €™T.4PC.DATE$ = SPACE$(10) €“ƒٹ…9 €“‚@„ € ™TOTAL.PRICE = 0 € ™ T.TOTAL.PRICE = TOTAL.PRICE €£‘„@€;, €إ#„@€,‚ڑ„@+‚›+ € £©„@@;, €™CALL KILLFILE(3) €£€„@€;, €— €¥ےےù7 €¤"#; €“‚„?€ €¥ےےےç €¤"*; €“‚„@ €¥ےےےç €¤"+; €“‚„@@ €¥ےےےç €"¤",; €#“‚„@€ €$¥ےےےç €'¤"-; €(“‚„@ €)¥ےےےç €,¤".; €-“‚„@ہ €.¥ےےےç €1¤"/; €2“‚„@à €3¥ےےےç €6¤"0; €7“‚„A €8¥ےےےç €;¤"1; €<“‚„A €=¥ےےےç €@¤"; €A“‚„A €B¥ےےےç €D¤"; €E“‚„A0 €F¥ےےےç €H¤"; €I“‚„A@ €J¥ےےےç €L¤"; €M“‚„AP €N¥ےےےç €P¤" ; €Q“‚„A` €R¥ےےےç €T¤"!; €U“‚„Aگ €V¥ےےےç €W¤""; €X“‚„Aک €Y¥ےےےç €[¤"$; €\“‚„A €]¥ےےےç €_¤"%; €`“‚„A¨ €a¥ےےےç €c¤"'; €d“‚„A° €e¥ےےےç €g¤"&; €h“‚„ €i¥ےےےç €k¤"(; €l“‚„A¸ €m¥ےےےç €n¤"); €o“‚„Aہ €p¥ےےےç €r¤ïؤ:‚£;‚¤‚ھ‚§ƒذƒشƒصƒضƒ×ƒطƒظƒعƒغƒرƒزƒس‚‚¨‚®‚©‚¯‚¥‚«‚¦‚¬ €s”‚£„?€=•v €t“‚¤„Aذ €u“‚‚¤ €vآ…‎,#„?€,…!,‚¤ €wئ#„?€,„?€‡ƒ?,„Aب‡ƒ2 €x“‚ھ„?€ €yکص”‚£„@=•N €z“‚§„B® €{“‚‚§ €|آ…‎,#„@,…$,‚§ €}™7FIELD #2, 4 25 AS F.PRODUCT.NAME$,6 AS F.PRODUCT.PRICE$ €~ئ#„@,„?€‡ƒ@ €ئ#„@,„?€‡ƒذ,„Aب‡ƒG €€ئ#„@,„Aذ‡ƒش,„?€‡ƒA €پئ#„@,„Aط‡ƒص,„@ہ‡ƒH €‚ئ#„@,„B‡ƒض,„@ہ‡ƒL €ƒئ#„@,„B‡ƒ×,„@ہ‡ƒM €„ئ#„@,„B4‡ƒط,„@ہ‡ƒN €…ئ#„@,„BL‡ƒظ,„@ہ‡ƒO €†ئ#„@,„Bd‡ƒع,„@ہ‡ƒP €‡ئ#„@,„B|‡ƒغ,„@ہ‡ƒQ €ˆئ#„@,„Bٹ‡ƒر,„@ہ‡ƒR €‰ئ#„@,„B–‡ƒز,„@ہ‡ƒS €ٹئ#„@,„B¢‡ƒس,„@ہ‡ƒI €‹“‚„?€ €Œکv”‚£„@@=•‡ €چ“‚¨„BŒ €ژ“‚‚¨ €ڈآ…‎,#„@@,…",‚¨ €گ™7FIELD #2, 4 25 AS F.PRODUCT.NAME$,6 AS F.PRODUCT.PRICE$ €‘™ FIELD #3,1 AS F.MARK31$ €’ئ#„@@,„Aب‡ƒ; €“ئ#„@@,„Aب‡ƒذ,„Aب‡ƒ< €”™&FIELD #3,45 AS F.TEMP2$,1 AS F.MARK32$ €•ئ#„@@,„BH‡ƒش,„@ہ‡ƒ= €–ئ#„@@,„B`‡ƒص,„A‡ƒ: €—ئ#„@@,„B€‡ƒض,„@ہ‡ƒ> €ک“‚®„?€ €™کق”‚£„@€=•‡ €ڑ“‚©„B” €›“‚‚© €œآ…‎,#„@€,… ,‚© €‌™7FIELD #2, 4 25 AS F.PRODUCT.NAME$,6 AS F.PRODUCT.PRICE$ €‍™ FIELD #3,1 AS F.MARK31$ €ںئ#„@€,„Aب‡ƒ) € ئ#„@€,„Aب‡ƒذ,„Aب‡ƒ+ €،™&FIELD #3,45 AS F.TEMP2$,1 AS F.MARK32$ €¢ئ#„@€,„BH‡ƒش,„@ہ‡ƒ, €£ئ#„@€,„B`‡ƒص,„A‡ƒ( €¤ئ#„@€,„B€‡ƒض,„A ‡ƒ* €¥“‚¯„?€ €¦کF”‚£„A@=•™ €§“‚¥„@€ €¨“‚‚¥ €©آ…‎,#„A@,…%,‚¥ €ھئ#„A@,„@€‡ƒD €«™& 3 AS F.CTLMODE$,1 AS F.INDICATORMODE$ €¬“‚«„؟€ €کœ”‚£„A`=•ٹ €®“‚¦„B €¯“‚‚¦ €°آ…‎,#„A`,…#,‚¦ €±ئ#„A`,„A ‡ƒU,„A ‡ƒT,„A ‡ƒ4,„A ‡ƒ6 €²“‚¬„?€ €³— €´¥ےےّ €·¤ج5‚°; €¸”‚°„?€=• €¹ث…! €؛کچ”‚°„@=• €»ث…$ €¼کi”‚°„@@=• €½ث…" €¾کE”‚°„@€=• €؟ث… €ہک!”‚°„A`=• €ءث…. €آ— €أ¥ےےے= €ئ¤#‚±; €اأ#‚± €ب¥ےےےو €ث¤ˆ‚²;‚´ €ج¾‚³‚² €ح؟O„?€ €خ“ƒڈƒ2 €د؟*ھ„@ €ذ“ƒ‌ƒG €ر“‚Iٹ,ƒH;; €ز“‚Mٹ,ƒL;; €س“‚Nٹ,ƒM;; €ش“‚Oٹ,ƒN;; €ص“‚Pٹ,ƒO;; €ض“‚Qٹ,ƒP;; €×“‚Rٹ,ƒQ;; €ط“‚Sٹ,ƒR;; €ظ“‚Tٹ,ƒS;; €ع“‚Jٹ,ƒI;; €غ™* T.PRODUCT.PRICE3 = VAL(F.PRODUCT.PRICE3$) €ـ™* T.PRODUCT.PRICE4 = VAL(F.PRODUCT.PRICE4$) €ق™ T.AVGWT = VAL(F.AVGWT$) €ك؟wy„@@ €à“ƒ”ƒ; €ل“ƒ•ƒ< €â“‚Fٹ,ƒ=;; €م“‚Eٹ,ƒ:;; €ن“‚Gٹ,ƒ>;; €ه؟ُy„@€ €و“ƒ‰ƒ) €ç“ƒ‹ƒ+ €è“‚Aٹ,ƒ,;; €é“‚@ٹ,ƒ(;; €ê“‚´ٹ,ƒ*;; €ë؟s„A@ €ى“ƒڑƒD €ي؟NI„A` €î“ƒںƒU €ï“ƒ‍ƒT €ً“ƒ‘ƒ4 €ٌ“ƒ’ƒ6 €ٍء €َ¥ےےüپ €ِ¤ S‚µ; €÷¾‚¶‚µ €ّ؟ذ[„?€ €ùاƒ?‹§„CI;; €ْاƒ2‹1$„Aب;; €ûاƒ2‹³ƒڈ;; €ü؟lّ„@ €‎اƒ@‹§„CI;; €‏اƒG‹1$„Aب;; €ےاƒG‹³ƒ‌;; € اƒA‹§„CJ;; € اƒH‹1$„@ہ;; € اƒH‹³‹2%ٹw‚I„Bب*„?+;;„Bب/;;;; € اƒL‹1$„@ہ;; € اƒL‹³‹2%ٹw‚M„Bب*„?+;;„Bب/;;;; € اƒM‹1$„@ہ;; € اƒM‹³‹2%ٹw‚N„Bب*„?+;;„Bب/;;;; € اƒN‹1$„@ہ;; € اƒN‹³‹2%ٹw‚O„Bب*„?+;;„Bب/;;;; € اƒO‹1$„@ہ;; € اƒO‹³‹2%ٹw‚P„Bب*„?+;;„Bب/;;;; € اƒP‹1$„@ہ;; € اƒP‹³‹2%ٹw‚Q„Bب*„?+;;„Bب/;;;; € اƒQ‹1$„@ہ;; € اƒQ‹³‹2%ٹw‚R„Bب*„?+;;„Bب/;;;; € اƒR‹1$„@ہ;; € اƒR‹³‹2%ٹw‚S„Bب*„?+;;„Bب/;;;; € اƒS‹1$„@ہ;; € اƒS‹³‹2%ٹw‚T„Bب*„?+;;„Bب/;;;; € اƒI‹1$„@ہ;; € اƒI‹³‹2%ٹw‚J„Bب*„?+;;„Bب/;;;; € ™.IF T.PRODUCT.PRICE = INT(T.PRODUCT.PRICE) THEN € ™? LSET F.PRODUCT.PRICE$ = LTRIM$(STR$(T.PRODUCT.PRICE)+".00") € ™9 ELSEIF T.PRODUCT.PRICE*10 = INT(T.PRODUCT.PRICE*10) THEN € ™= LSET F.PRODUCT.PRICE$ = LTRIM$(STR$(T.PRODUCT.PRICE)+"0") € ™3 ELSEIF T.PRODUCT.PRICE = INT(T.PRODUCT.PRICE) THEN € ™? LSET F.PRODUCT.PRICE$ = LTRIM$(STR$(T.PRODUCT.PRICE)+".00") € ™ ELSE € ™7 LSET F.PRODUCT.PRICE$ = LTRIM$(STR$(T.PRODUCT.PRICE)) € ™ END IF € ؟kh„@@ € اƒ;‹1$„Aب;; € !اƒ;‹³ƒ”;; € "اƒ<‹1$„Aب;; € #اƒ<‹³ƒ•;; € $اƒ=‹1$„@ہ;; € %اƒ=‹³‹2%ٹw‚F„Bب*„?+;;„Bب/;;;; € &™=LSET F.INV.PRODUCT.PRICE$ = LTRIM$(STR$(T.INV.PRODUCT.PRICE)) € '™LSET F.INV.MARK22$ = CHR$(202) € (اƒ:‹1$„A;; € )اƒ:‹³‹2%ٹw‚E„Bب*„?+;;„Bب/;;;; € *™4 LSET F.INV.PRODUCT.PRICE$ = SPACE$(6)T.INV.AMMOUNT € +اƒ>‹1$„@ہ;; € ,اƒ>‹³‹2%‚G;;;; € -™#T.INV.AMMOUNT = VAL(F.INV.AMMOUNT$) € .™ T.INV.VAT = VAL(F.INV.VAT$) € /؟ْ0„@€ € 0اƒ)‹1$„Aب;; € 1اƒ)‹³ƒ‰;; € 2اƒ+‹1$„Aب;; € 3اƒ+‹³ƒ‹;; € 4اƒ,‹1$„@ہ;; € 5™OLSET F.4PC.PRODUCT.PRICE$ = LTRIM$(STR$(INT(T.4PC.PRODUCT.PRICE*100 +0.5)/100)) € 6”‚A„A *ٹw‚A„A *;;=•Q € 7اƒ,‹³‹2%ٹw‚A„Bب*„?+;;„Bب/;;…P+;; € 8–H € 9اƒ,‹³‹2%ٹw‚A„Bب*„?+;;„Bب/;;;; € :— € ;™LSET F.INV.MARK22$ = CHR$(202) € <اƒ(‹1$„A;; € =™CLSET F.4PC.AMMOUNT$ = LTRIM$(STR$(INT(T.4PC.AMMOUNT*100 +0.5)/100)) € >”‚@„A *ٹw‚@„A *;;=•Q € ?اƒ(‹³‹2%ٹw‚@„Bب*„?+;;„Bب/;;…P+;; € @–H € Aاƒ(‹³‹2%ٹw‚@„Bب*„?+;;„Bب/;;;; € B— € Cاƒ*‹1$„A ;; € Dاƒ*‹³ƒٹ;; € E؟ء6„A@ € FاƒD‹1$„@€;; € GاƒDƒڑ € H؟‚}„A` € IاƒU‹1$„A ;; € JاƒUƒں € KاƒT‹1$„A ;; € LاƒTƒ‍ € Mاƒ4ƒ‘ € Nاƒ6ƒ’ € Oء € P¥ےےَ € R¤i‚¸; € S™$GENERATION DATE: 28/04/2002 18:54:43 € T¾‚¹‚¸ € U؟'„?€ € V“ƒڈ‹1$„Aب;; € W؟ط½„@ € X“ƒ‌‹1$„Aب;; € Y“‚I„ € Z“‚M„ € [“‚N„ € \“‚O„ € ]“‚P„ € ^“‚Q„ € _“‚R„ € `“‚S„ € a“‚T„ € b“‚J„ € d؟ „@@ € fء € g¥ےے‏ € i¤&;; € jآƒœ›‡#‚( € k¥ےےےم € n¤ ; € oأ#‚( € p¥ےےےë € s¤¢C;ƒق € t“‚„ € u¬ € v“ƒق‹²‹5);;,„@;;‹µ‹5);;,„@€,„@;;+ € w“ƒق‹±…,…B,ƒق,…ش,„@€,„@€;; € xےےےu®ٹ,ƒق;;„Ep[ € y”‚„=•4ض‹²ƒق,„@;;…b+‹¶!ƒق,„@;;+ € z¬ € {“ƒق‹µ‹¨ ;;,„@€,„@;;‹µ‹¨ ;;,„?€,„@;;+‹µ‹¨ ;;,„@à,„@€;;+ € |“ƒق‹±…‍,…A,ƒق,…ش,„A,„A;; € }ےےےL®ٹ,‹µƒق,„?€,„@;;;;„B<ٹ,‹µƒق,„@@,„@;;;;„AP<& € ~”‚„=•c×‹µƒق,„@@,„@;;…K+‹µƒق,„?€,„@;;+…K+‹µƒق,„@ ,„@€;;+ € ¥ےے‎g € ƒ¤ 8HO;ƒكƒàƒل‚»ƒâ‚؟‚¼‚½‚¾‚؛ € „™ TRANSMODE € …™0***************** TRANSFER ********************* € †“‚„ € ‡“ƒك… € ˆ“ƒà… € ‰“ƒل… € ٹگ„,„,„Cں€,„Co € ‹»„ € چ£ےےل „@€;, € ژ“‚»ٹz„@€;;‚/ € گ£ےےé¤„@€;, € ’”‚»„?• € “™LINEF$ = CHR$(13)+CHR$(10) € ”™ LOCATE 0,0 € •™PRINT " SENDING DATA TO PC " € –“ƒâ… € —£wgƒâ,„Bب,‚,„?€,……;ƒâ,‚,, € ک»„A,…ء,…3 € ™“‚„ € ڑ“‚؟„?€ € ›£ےےكل„@€;, € œ“‚»ٹz„@€;;‚/ € ‌£g‚؟,‚»;‚؟‚» € ‍™IF TRANSMODE = 1 THEN € ں™STARTREC = RECCOUNT € ™ELSEIF TRANSMODE = 2 THEN € ،“‚¼„?€ € ¢™END IF € £™ € ¤›&‚؟‚¼œ‚‚»‌‚„?€ € ¦ؤ#„@€,‚؟ € §”‹³‹·"ƒ);;;;…9?•< € ¨“ƒƒ‡ƒ)+…F+ƒà+…F+ƒ*+ƒ'+ € ©– € ھ”‹³‹·"ƒ+;;;;…9?•< € «“ƒƒ‡ƒ++…F+ƒ,+…F+ƒ(+ƒ'+ € ¬–° € ”ٹ,‹³‹·"ƒ(;;;;;;„?•< € ®“ƒƒ‡ƒك+…F+ƒà+…F+ƒ(+ƒ'+ € ¯–9 € °“ƒƒ‡ƒك+…F+ƒà+…F+ƒل+ƒ'+ € ±— € ²— € ³— € ´“‚3ٹxƒ;; € µ£z; € ¶اƒW‹1$‚3;; € ·اƒWƒ € ¸إ#‚2 € ¹™CALL DELAY(0.1) € ؛£s; € »™CALL SHOWPERCENTS(X,RECCOUNT) € ¼‘„,„ € ½“‚ „@ € ¾’…, € ؟™ DSPFONT = 2 € ہ™ PRINT "VENT P"+ CHR$(197) +" PC" € ء“‚3„?€ € آ£~; € أ™CALL DELAY(0.5) € ؤ“‚½ٹ*;; € إ“‚¾„@ € ئ™GET ACK OR NAK OR NOTHING € ا™ERRNO = 0 - TRANSFER OK! € ب™ERRNO = -1 - NO ANSWER! € ة™ERRNO = -2 - TRANSFER FAULT! € ت“‚„ € ث¬ € ج”‚„?• € ح“‚„ہ€ € خ°ن € د— € ذ™SSS = TIMER - STTIME € ر”ٹ*;;‚¾-‚½>•@ € ز“‚„ہ@ € س™LSET F.REMOTE.CHAR$ = ACK$ € ش°f € ص— € ض”ٹy‚2;;„>•ظ € ×ؤ#‚2 € ط™ LOCATE 0,3 € ظ™ PRINT ASC(F.REMOTE.CHAR$) € ع™ CALL DELAY(0.5) € غ”ƒWƒ=•! € ـ“‚„ € ف°¹ € قک/”ƒWƒj=• € ك“‚„ہ € à°‡ € ل— € â“‚½ٹ*;; € م— € ن”‚¾ٹ*;;‚½--„>•7 € ه‘„BŒ,„ € و½…:;‚¾ٹ*;;‚½-- € ç— € èےے‎ï € é£ش; € ê£ً‚؟,‚»;‚؟‚» € ë”‚„=•2 € ى‘„,„ € ي’…{ € î“‚؛„?€ € ïکـ”‚„ہ@=• € ً¯ع € ٌک¹”‚„ہ=•ˆ € ٍ‘„,„ € َ’…ص € ô™ANALYZE RESULT OF ANSWER € ُ“‚؛‚؛„?€+ € ِ”‚؛„@@>•¯V € ÷“‚؟‚؟„?€- € ّک ”‚„ہ€=• € ù¯ € ْ— € û‍ےےù‚؟‚‚ € ‎£ےےà¬„@€;, € ‏گ„,„,„Cں€,„Co € ے»„ € £a‚؟,‚»;‚؟‚» € £{ˆ„?€;, € ™CALL SHOWPERCENTS(X,RECCOUNT) € “‚ „?€ € ™ LOCATE 0,0 € گ„?€,„Bب,„C‍€,„Bو € ”‚„=•“ƒg… € ”‚„ہ@=•“ƒg… € ”‚„ہ=•“ƒg… € ”‚„ہ€=•“ƒg… € “ƒâƒg € £m§ƒâ,„Bب,‚,„?€,……;ƒâ,‚,, € ™ LOCATE 0,1 € ™ PRINT LINE$ € £z&„@@;, € گ„,„,„Cں€,„Co € ”‚„=•£x; € گ„,„,„Cں€,„Co € »„ € –ٍ € گ„,„,„Cں€,„Co € »„ € ™LOCATE 0,1 € ™ PRINT " NO DATA! " € “ƒâ…ظ € £lPƒâ,„Bب,‚,„?€,……;ƒâ,‚,, € £xْ„@@;, € گ„,„,„Cں€,„Co € »„ € — € ¥ےےٍر € "¤G<; € #آ…‎,#‚2,ƒ›,‚3 € $ئ#‚2,‚3‡ƒW € %¥ےےےآ € '¤ ; € (أ#‚2 € )¥ےےےë € +¤AI‚أ‚آ;‚ہ‚ءƒم € ,”‚آ„?•5 € -“‚ہ‚أ‚آ/ € .“‚ء‚أ„?€-‚آ/ € /— € 0”‚ہ„?€>•“‚ہ„?€ € 1”‚ہ„<•“‚ہ„ € 2”‚ء„?€>•“‚ء„?€ € 3”‚ء„<•“‚ء„ € 4™LOCATE 16,0 € 5™$PRINT USING "###&";INT(DISP*100);"%" € 6“ƒم‹2%ٹw‚ہ„Bب*;;;;…<+ € 7£iüƒم,„CH,‚,„?€,……;ƒم,‚,, € 8´„@€,„C%,„C‌€,„C9,„ € 9´„@ہ,„C',„Cœ€‚ہ*,„C7,„?€ € :™ DSPLOGIC = 1 € ;™&BOX 4+315*DISP1-3,166,315*DISP1,184,1 € <™DSPLOGIC = 3 € =¥ےے‎ب € ?¤وH‚ؤ‚إ; € @”‚ؤ‚إ[•K € A‘„,„?€ € B’‹3&ٹw‚ؤ‚إ/„A *;;,„C;; € Cک3”‚ؤ‚إ>•! € Dگ„,„?€,„Aک,„?€ € E— € F‘„A,„@@ € G’ٹw‚ؤ‚إ/;;„Bب*;…= € H¥ےےے# € J¤ںtFƒو;ƒهƒنƒëƒèƒêƒéƒىƒç‚ا‚ئ € K”ƒو…َ=• € L“ƒهƒœ € Mک&”ƒو…م=• € N“ƒهƒ› € O— € P“ƒنƒه € Q“ƒë‹µƒه,„@€,„?€;; € R“ƒè‹µƒه,ٹtƒن,…b;;„?€+,ٹtƒن,…F;;ٹtƒن,…b;;-„?€-;; € S“ƒê‹µƒه,ٹtƒن,…F;;„?€+,„?€;; € T“ƒé‹µƒه,ٹtƒن,…F;;„@@+,„?€;; € U“ƒى‹µƒه,ٹtƒن,…F;;„@ +,„?€;; € V™************************** € W™LOCATE 10,10 € X™PRINT SPACE$(6)+DEVICEMODE$ € Y“ƒçƒو…2+ € Z£eةƒç,„A ,‚,„?€,……;ƒç,‚,, € [™IF CARDS(2)=1 THEN € \™&KEY 2, "FMENU2", "< COM PORT:1,2,3,4 " € ]™ELSE € ^™7IF TRADE THEN KEY 2, "FMENU2", "< COM PORT: 1, 2 " € _™END IF € a»„@@,…»,…k € b»„@€,…¼,…p € c»„@ ,…½,…f € d»„AP,…¯,…4 € e™&KEY 12,"FMENU12"," PRINT AREA >" € f»„A,…ء,… € h™************************** € i“ƒه…‹ƒë+…b+ƒè+…F+ƒê+…F+ƒé+…F+ƒى+ € jµ„?€,„B,„Cں,„B € kµ„?€,„BŒ,„Cں,„BŒ € lµ„?€,„CY,„Cں,„CY € m´„,„,„Cں€,„Co,„ € n¬ € o´„,„,„Cں€,„Co,„ € p™5KEY 12, "FMENU12", " "+LTRIM$(RTRIM$(T.STATUS$))+" >" € q”ٹf„@;;„?€=‹³‹·"ƒ ;;;;…غ=&• € r»„@,…´,…m € sکô”ٹf„@;;„?€=‹³‹·"ƒ ;;;;…=&•~ € t»„@,…´,…l € u™VIF LTRIM$(RTRIM$(T.STATUS$)) = "NON TR" THEN KEY 2, "FMENU2", "< COM PORT: 1, 2 " € vک8”ٹf„@;;„=• € w»„@,…´,…e € x— € y™PRINT CURRENT.TYPE$ € z“‚ „@ € {‘„BH,„B € |½…9;…! € }‘„BH,„B € ~’ƒه…+ € “‚ ‚ € €“‚„ € پ¬ € ‚”‚„?•° € ƒےےےـ € „™MAX.PORT = CARDS(2)*2 + 2 € …™ € †”‚„@=• € ‡™(T.PORT$ = LTRIM$(STR$(VAL(T.PORT$) + 1)) € ˆ™?IF VAL(T.PORT$) > MAX.PORT THEN T.PORT$ = "3" OR T.PORT$ = "3" € ‰”ƒë…S=• € ٹ“ƒë…X € ‹کk”ƒë…X=•U € Œ”ٹf„@;;„?€=• € چ“ƒë…\ € ژ– € ڈ“ƒë…S € گ— € ‘ک”ƒë…\=•_ € ’”ٹf„@;;„?€=•“ƒë…] € “”ٹf„@;;„=•“ƒë…S € ”ک•”ƒë…]=•ƒ € •”‹³‹·"ƒ ;;;;…غ=• € –“ƒë…S € —ک<”‹³‹·"ƒ ;;;;…=• € ک“ƒë…X € ™— € ڑ— € ›کا”‚„@@=•ض € œ”ƒè…U=• € ‌“ƒè…Z € ‍ک،”ƒè…Z=• € ں“ƒè…^ € کx”ƒè…^=• € ،“ƒè…a € ¢کO”ƒè…a=• € £“ƒè…W € ¤ک&”ƒè…W=• € ¥“ƒè…U € ¦— € §کà”‚„@€=•ض € ¨”ƒê…¤=• € ©“ƒê…ك € ھک،”ƒê…ك=• € «“ƒê…ر € ¬کx”ƒê…ر=• € “ƒê…ش € ®کO”ƒê…ش=• € ¯“ƒê… € °ک&”ƒê… =• € ±“ƒê…¤ € ²— € ³کù”‚„@ =•j € ´“ƒé‹³‹2%ٹ,ƒé;;„?€+;;;; € µ”ٹ,ƒé;;„A>•“ƒé…] € ¶ک~”‚„A@=• € ¸£&+…-,…ٌ,‹³‹2%‚ا;;;;,…ق,„@€,„,„F<;,,,,,,, € ¹”‚•°f € ؛“‚اٹ,ƒ;; € »£%…إ,…à,‹³‹2%‚ئ;;;;,…ق,„@€,„,„F<;,,,,,,, € ¼”‚•°è € ½“‚ئٹ,ƒ;; € ؟کh”‚„AP=•J € ہ”ƒى…S=• € ء“ƒى…X € آ– € أ“ƒى…S € ؤ— € إک ”‚„A@=•‡ € ئ”‹³‹·"ƒ ;;;;…غ=• € ا“ƒ … € بک<”‹³‹·"ƒ ;;;;…=• € ة“ƒ …غ € ت— € ثکu”‚„A=•c € ج™SAVE € ح“ƒه…‹ƒë+…b+ƒè+…F+ƒê+…F+ƒé+…F+ƒى+ € خ”ƒو…َ=• € د“ƒœƒه € ذک&”ƒو…م=• € ر“ƒ›ƒه € ز— € س”‹µƒ›,„@€,„?€;;‹µƒœ,„@€,„?€;;=• € شگ„,„,„Cں€,„Co € ص“ƒç… € ض£Y9ƒç,„B ,‚,„?€,……;ƒç,‚,, € ×“ƒç…„ € ط£Xِƒç,„Bـ,‚,„?€,……;ƒç,‚,, € ظ“ƒç…و € ع£X³ƒç,„C,‚,„?€,……;ƒç,‚,, € غ£e]„@€;, € ـ°ظ € فکR”‹µƒ›,„@€,„?€;;…S=‹µƒœ,„@€,„?€;;…S=|ƒ …=&•ْ € قگ„,„,„Cں€,„Co € ك“ƒç…ٹ € à£Wغƒç,„B ,‚,„?€,……;ƒç,‚,, € ل“ƒç…ئ € â£Wکƒç,„Bـ,‚,„?€,……;ƒç,‚,, € م“ƒç… € ن£WUƒç,„C,‚,„?€,……;ƒç,‚,, € ه£cے„@€;, € و— € ç™ € è£¬; € é°c € ê— € ë“ƒه…‹ƒë+…b+ƒè+…F+ƒê+…F+ƒé+…F+ƒى+ € ى“‚„ € يےےَ € î¥ےےîj € ً¤+ D;ƒïƒî‚ة‚ت € ٌآ…‎,#„Ap,…ْ,‚; € ٍئ#„Ap,„Aگ‡ƒF,„Aگ‡ƒE,„@€‡ƒï,„@€‡ƒî,„@ہ‡ƒY € َ”ٹz„Ap;;‚;?•_ € ô™ € ُاƒF‹1$„Aگ;; € ِاƒE‹1$„Aگ;; € ÷”ٹf„@;;„=•' € ّاƒF…چ € ùاƒE…Œ € ْ–$ € ûاƒF…چ € üاƒE…ژ € ‎— € ‏“‚ة„D € ے“‚ت„D €اƒî‹1$„@€;; €اƒî‹2%‚ة;; €اƒï‹1$„@€;; €اƒï‹2%‚ت;; €اƒY‹1$„A;; €اƒY… €– €ؤ#„Ap,„?€ €— € “ƒ ƒY € ™a IF CARDS(2)=0 AND VAL(MID$(F.PRINTER.INI$,4,1))>2 THEN LSET F.PRINTER.INI$ = "COM2:9600,N,8,1,B" €”ٹf„@;;„=‹³‹·"ƒ ;;;;…=&ٹ,‹µƒF,„@€,„?€;;;;„@?&• €“ƒœ…چ € –_ €™AIF CARDS(2)=0 AND T.STATUS$ = "TRADE" THEN T.PCTRANSFER.INI$ = "" €“ƒœƒF €— €“ƒ›ƒE €™T.PRINTER.INI$ = F.PRINTER.INI$ €“‚ةٹ,ƒî;; €“‚تٹ,ƒï;; €“ƒ†‹³‹·"ƒ ;;;; €إ#„Ap,„?€ €أ#„Ap €¥ےےûق €¤¼ E;ƒٌƒً‚ث‚ج €آ…‎,#„Ap,…ْ,‚; €ئ#„Ap,„Aگ‡ƒF,„Aگ‡ƒE,„@€‡ƒٌ,„@€‡ƒً,„@ہ‡ƒY €™ F.PCTRANSFER.INI$ €اƒF‹1$„Aگ;; €اƒFƒœ € اƒE‹1$„Aگ;; €!اƒEƒ› €"اƒً‹1$„@€;; €#اƒً‹2%‚ث;; €$اƒٌ‹1$„@€;; €%اƒٌ‹2%‚ج;; €&اƒY‹1$„A;; €'اƒYƒ €(™ €)إ#„Ap,„?€ €*أ#„Ap €+¥ےے‏M €-¤A;ƒٍ €.گ„,„,„Aک,„@@ €/»„ €0™ LOCATE 0,1 €1™PRINT " CLEAR ACCUMULATOR?" €2“ƒٍ…‰ €3£P ƒٍ,„Bب,‚,„?€,……;ƒٍ,‚,, €4µ„,„CY,„Cں€,„CY €5»„@ہ,…¾,…6 €6»„A,…ء,…( €7´„,„,„Cں€,„Co,„ €8™ LOCATE 0,2 €9™PRINT "____________________" €:“‚„ €;¬ €<ےےےِ®‚„? €=”‚„@ہ=•‚ €>£ےے؟خ„@€;, €?“ƒ™…9 €@“ƒچ…9 €A“‚H„ €B“ƒ،…9 €C“ƒگ…9 €D“ƒژ…9 €E“ƒ‌…9 €Fک&”‚„A=• €G“‚„؟€ €H— €I¥ےے‎ب €K¤ٹ;‚حƒَ €L™SUPPORTING 788P CARD €M“‚حٹ#„?€;; €N”‚ح„@„^?‚ح„@„?€^?&‚ح„@„@^?&‚ح„@„@@^?&‚ح„@„@€^?&•س €O“ƒَ‹4'ٹx‹³‹2%ٹd„?€;;;;;;;;,…:;; €P”ٹt‹³‹2%ٹv„?€;;;;;;,…N;;„>•چ €Q“ƒe‹4'ٹx‹³‹2%ٹv„?€;;;;;;;;ٹt‹³‹2%ٹv„?€;;;;;;,…N;;-,…:;; €R– €S“ƒe…9 €T— €U”ٹt‹2%ٹv„?€;;;;,…N;;„?•“ƒ¤ƒَ…N+ƒe+ €V”ٹt‹2%ٹv„?€;;;;,…N;;„=•“ƒ¤ƒَ €W— €X¥ےے‎ €Z¤;‚خƒُƒô €[“‚خٹ#„?€;; €\”‚خ„=• €]™,******************************************** €^“ƒُ‹4'ٹx‹³‹2%ٹd„?€;;;;;;;;,…:;; €_“ƒe‹4'ٹx‹2%ٹv„?€;;;;;;ٹt‹2%ٹv„?€;;;;,…N;;-,…:;; €`™.********************************************** €a”ٹt‹2%ٹv„?€;;;;,…N;;„?•“ƒ¤ƒُ…N+ƒe+ €b”ٹt‹2%ٹv„?€;;;;,…N;;„=•“ƒ¤ƒُ €c™.********************************************** €d“ƒôƒُƒe+ €eک°”‚خ„?€=•` €f‘„,„B €g’… €h‘„,„Bp €i’… €j‘„,„B €k’… €lن €m €nک?”‚خ„@=•` €o‘„,„B €p’… €q‘„,„Bp €r’… €s‘„,„B €t’… €uن €v €wکخ”‚خ„@€=•, €x‘„,„Bp €y’… €zن €{ €|ک‘”‚خ„A=•F €}‘„,„Bp €~’… €‘„,„B €€’… €پن €‚ €ƒک:”‚خ„A€=•( €„‘„,„Bp €…’… €†ن €‡ €ˆ— €‰¥ےےûô €‹¤ Q$‚س‚ر‚ز‚ش‚د‚ذ;ƒِ €Œ“‚ٹx‹·"‹³ƒe;;;;;; €چ™ CALL DEBUG(STR$(LEN.AP1)) €ژ”‚„>•¥ €ڈ“ƒِ‹³‹2%ٹwٹ`‚س;;„A ‚^*„?+„A *;;„A ‚„?€+^/;;;; €گ“ƒِ‹µƒِ,„?€,ٹxƒِ;;„?€-;; €‘–6 €’“ƒِ‹³‹2%ٹ`‚س;;;;;; €“— €”™ LOCATE 10,70 €•™^ PRINT GROSS;" ";TMP.WEIGHTVAR$ IF (LEN(TMP.WEIGHTVAR$)-INSTR(TMP.WEIGHTVAR$,"."))=0 THEN €–”ٹw‚س;;‚س=‚„>&ٹtƒِ,…N;;„=&•5 €—“ƒ¢ƒِ…N+‹4'‚,…P;;+ €ککز”‚„>‚ٹxƒِ;;ٹtƒِ,…N;;--„>&•W €™“ƒ¢ƒِ‹4'‚ٹxƒِ;;ٹtƒِ,…N;;--,…P;;+ €ڑ–6 €›“ƒ¢ƒِ €œ™ CALL DEBUG(TMP.WTVAR$) €‌— €‍™CALL DEBUG(TMP.WTVAR$) €ں”ٹ`‚س;;„?€<ٹ`‚س;;„>&• € “ƒ¢…Pƒ¢+ €،کr”‚س„=‚„>&•/ €¢“ƒ¢…Q‹4'‚,…P;;+ €£ک&”‚س„=• €¤“ƒ¢…P €¥— €¦”‚س„<• €§“ƒ¢…Kƒ¢+ €¨– €©“ƒ¢…!ƒ¢+ €ھ— €«”ٹxƒ¤;;„?€+ٹxƒ¢;;-„>•>“ƒ¢‹1$ٹxƒ¤;;„?€+ٹxƒ¢;;-;;ƒ¢+ €¬‘‚ر‚ز„>ججح*+‚زٹtƒ¢,…N;;ٹxƒ¤;;+ٹxƒ¢;;-*+,‚ش €™ CALL DEBUG("1"+TMP.WTVAR$) €®”ٹtƒ¢,…N;;„?•.’‹µƒ¢,ٹtƒ¢,…N;;,„?€;; €¯™ CALL DEBUG(TMP.WTVAR$) €°›‚?ٹxƒ¤;;„?€+œ‚„?€‌‚„؟€ €±”‚?ٹtƒ¢,…N;;„?€-=•“‚%‚ز„>ججح* €²‘‚ر‚%+‚ز‚?ٹxƒ¤;;+ٹxƒ¢;;-*+,‚ش €³”‚~•’ €´”ƒv‚?;‹µƒ¢,‚?,„?€;;?‚ذ„?€=&•ـ €µگ‚ر‚%+‚ز‚?ٹxƒ¤;;+ٹxƒ¢;;-*+,‚ش,‚ر‚%+‚ز‚?„?€+ٹxƒ¤;;+ٹxƒ¢;;-*+,‚ش‚د+ €¶”‚?ٹtƒ¢,…N;;?•’‹µƒ¢,‚?,„?€;; €·کp”ƒw‚?;‹µƒ¢,‚?,„?€;;?‚ذ„@@=&•ـ €¸گ‚ر‚%+‚ز‚?ٹxƒ¤;;+ٹxƒ¢;;-*+,‚ش,‚ر‚%+‚ز‚?„?€+ٹxƒ¤;;+ٹxƒ¢;;-*+,‚ش‚د+ €¹”‚?ٹtƒ¢,…N;;?•’‹µƒ¢,‚?,„?€;; €؛کZ”‚ذ„@=•H €»”‚?ٹtƒ¢,…N;;?•’‹µƒ¢,‚?,„?€;; €¼— €½–' €¾’‹µƒ¢,‚?,„?€;; €؟— €ہ”‚ذ„?€=•5 €ء“ƒv‚?;‹µƒ¢,‚?,„?€;; €آکC”‚ذ„@@=•1 €أ“ƒw‚?;‹µƒ¢,‚?,„?€;; €ؤ— €إ‍ےےü#‚?‚‚ €ئ”‚‚ذ„@@=ٹ(;;„=|&•“‚„ €ا“‚%„ €ب¥ےےُ¸ €ت¤”G;‚ض‚ص‚× €ث“‚ضٹl;; €ج“‚صٹc;; €ح”ٹ`‚ض;;‚ص„=#× *<• €خع €د– €ذ“‚×„؟€ €ر— €ز¥ےےےu €ص¤n;ƒ÷ €ض™END IF €×“‚ ‚ €ط”ٹf„?€;;„?€<ٹf„A`;;„?€<&•m €ظگ„,„,„Cں€,„Co €ع“ƒ÷…‡ €غ£< ƒ÷,„B´,‚,„?€,……;ƒ÷,‚,, €ـن €ف €ق— €à”ٹf„@;;„?€<•t €لگ„,„,„Cں€,„Co €â“ƒ÷…ع €م£;}ƒ÷,„B´,‚,„?€,……;ƒ÷,‚,, €ن£H'„@ ;, €ه— €ç¥ےے‏› €é¤wH;ƒûƒ‎ƒüƒّƒْƒù €ê“ƒû‹7-„?€;; €ë“ƒ‎‹7-„@;; €ى“ƒü‹7-„@@;; €ي“ƒّ‹7-„?€;; €î“ƒْ…Y €ï“ƒù…` €ٍ”ƒüƒù?ٹtƒ‎,…;;„=&• €َ»„ €ôگ„,„,„Aک,„@@ €ُ‘„,„ €ِ’…– €÷‘„,„?€ €ّ’…ت €ù‘„,„@ €ْ’…_ €û‘„,„@@ €ü’…4;ƒü €‎»„A,…ء,…) €‏¬ €ے”‚„?•° €ےےےـ €گ„,„,„Aک,„@@ €»„ €ن € €ک…”ٹ,ƒ‎;;ٹ,ƒْ;;<ٹtƒ‎,…;;„=&•@ €»„ €گ €‘„,„ € ’…• € ‘„,„?€ €’…ة €‘„,„@ € ½…;;…¦;ƒْ;…C €‘„,„@@ €’…5ƒ‎+ €»„A,…ء,… €»„A¸,…¹,…9 €“‚„ €¬ €”‚„?•° €ےےےـ €گ„,„,„Aک,„@@ €»„ €”‚„A¸=• €ن € €— €— €¥ےےü’ € ¤};‚ط €!“‚„ €"“‚طٹs…,…§,ٹl;;,„<#× ,„,ٹc;;;; €#™&IF ERRNO = -1 THEN TMP.GROSSWEIGHT = 0 €$”‚„=•؟ €%“‚X‚ط €&”‚X„]‚Xٹc;;<&• €'ظ„?€,‚X €(–l €)گ €*»„ €+“‚ „@ €,‘„@ ,„?€ €-’… €.“‚ „?€ €/£CF„@@;, €0گ €1»„ €2— €3— €4»„ €5گ €6¥ےے‏Œ €8¤<l9ƒƒƒےƒ‚ك‚م‚ن;‚à‚ل‚â‚هƒ‚و‚è‚ç‚é‚ق €9“‚„ €:“ƒ…9 €;“‚„ €<“‚„ €=“ƒ…! €>“‚<„ €?“ƒ£‹§„C;; €@“‚„؟€ €A“‚„ €B“‚_„ €C“‚„ €D“‚0„ €E“‚à‚ك„@- €F“‚ل‚ك„?€- €G“‚â‚ك €H“‚]„ €I“‚^„ €Jگ„,„,„Cں€,„Co €K»„?€,…«,…9 €L´„,„@,„A@,„A¨,„?€ €M»„@@,…»,…9 €N»„A`,…°,…9 €O»„A ,…¬,…9 €Q»„@à,…؟,…# €R»„A,…ہ,…" €S»„@ہ,…¾,…& €T»„A,…ء,…¨ €U”‹¶!‹7-„@;;,„@;;…=• €V»„Ap,…ڈ,…9 €W– €X»„A€,…ڈ,…9 €Y— €Z™#*****CURRENT VARIABLE SHOW********* €[”ƒ…ق=ٹ,ƒے;;„?€<&ٹ,ƒے;;„>&•“ƒے…Pƒے+ €\“‚ٹxƒے;; €]”‚‚ك=•“‚„?€ €^™IF LENBUFFER>0 THEN €`›e‚ه„?€œ‚‚‌‚„?€ €a“ƒ ‚ه;‹µƒے,‚ه,„?€;; €b‍ےےےج‚ه‚‚ €c›T‚ه„?€œ‚‚‌‚„?€ €d“ƒƒƒ ‚ه;+ €e‍ےےےف‚ه‚‚ €f™"*****HEADERS SMART SHOW ********* €gگ„A ,„?€,„Cں,„BŒ €h“ƒƒ €i£1[ƒ,„A ,„@à,„?€,……;ƒ,,,, €j“ƒƒ €k£1ƒ,„BŒ,„@€,„?€,……;ƒ,,,, €l¬ €m™********INPUT MODE******** €n”ƒ…ق=•ْ €o”‚„B>‚„B8<&‚„B<=|‚„Bd>|•“‚„ €p”ٹtƒ,…N;;„@=• €q“‚ك‚à €rکt”ٹtƒ,…N;;„@@=• €s“‚ك‚ل €t–: €u™IF INSTR(BUFFER$,".")=4 THEN €v“‚ك‚â €w— €x— €y™********KEYBOARD*********** €z”‚„B]• €{“ƒ…! €|™*******STRING FORMATION PART €}”‚„=•- €~“‚‚„?€+ €“‚„ €€–J €پ“‚0„؟€ €‚“‚‚„?€- €ƒ”‚„=•“‚„؟€ €„— €…”ƒ£…@=‚‚ك<&• €†”‚„>‚„?€-‚>&• €‡›ٹ‚ه„?€œ‚‚„?€-‚-‌‚„?€ €ˆ“‚]‚]„?€+ €‰“‚^‚^„?€+ €ٹ“ƒ ‚];ƒ ‚ه; €‹‍ےےے³‚ه‚‚ €Œ“‚]‚]„?€+ €چ“‚^‚^„?€+ €ژ›o‚ه‚‚-œ‚‚‌‚„?€ €ڈ“‚]‚]„?€+ €گ“ƒ!‚];ƒ ‚ه; €‘‍ےےےب‚ه‚‚ €’›{‚ه‚„?€+‚-œ‚‚„?€+‌‚„?€ €““‚^‚^„?€+ €”“ƒ ‚^;ƒ!‚ه; €•‍ےےےب‚ه‚‚ €–“ƒ ‚‚-;‹§‚;; €—“‚‚„?€+ €ک“‚]„ €™“‚^„ €ڑکط”‚„?€-‚=‚„>&•ü €››Z‚ه„?€œ‚‚‌‚„?€ €œ“ƒ!‚ه„?€+;ƒ ‚ه; €‌‍ےےے×‚ه‚‚ €‍“ƒ!„?€;‹§‚;; €ں“‚‚„?€+ € ›T‚ه„?€œ‚‚‌‚„?€ €،“ƒ ‚ه;ƒ!‚ه; €¢‍ےےےف‚ه‚‚ €£ک¹”‚„=‚„=&•) €¤“ƒ ‚;‹§‚;; €¥کs”‚„=‚&•[ €¦“ƒ ‚„?€+;ƒ ‚; €§“ƒ ‚;‹§‚;; €¨“‚‚„?€+ €©— €ھکي”ƒ£…@=‚‚ك=&•P €«™ END OF STRING €¬”‚„=•“ƒ ‚;‹§‚;; €ک€”ƒ£‹§„C;;=‚‚ك[&•W €®“ƒ ‚‚-;‹§‚;; €¯”‚„>‚|•“‚‚„?€- €°— €±“ƒ…9 €²›T‚ه„?€œ‚‚‌‚„?€ €³“ƒƒƒ ‚ه;+ €´‍ےےےف‚ه‚‚ €µ”‚0•) €¶“‚‚„?€+ €·“‚0„ €¸— €¹™BLINCDASH IN THE END OF STRNG €؛”‚‚ك=‚„=&•“‚„?€ €»™#*******END OF STRING FORMATION PART €¼— €½”‚„@à=•S €¾”‚„>‚‚<&• €؟“‚‚„?€+ €ہ— €ء“ƒ…! €آک&”‚„A=•± €أ”‚„>‚‚ك[&‚„>&• €ؤ“‚‚„?€- €إ— €ئ™BLINCDASH IN THE END OF STRNG €ا”‚‚ك=‚„=&•“‚„?€ €ب“ƒ…! €ةکd”‚„Aà=•ْ €ت”‚„>‚‚[&•ذ €ث”‚‚=•* €ج“ƒ ‚„?€+‚-;…9 €حک2”‚‚<• €خ“ƒ ‚‚-;…9 €د— €ذ›‰‚ه„?€œ‚‚‌‚„?€ €ر”ƒ ‚ه;…9?•5 €ز“‚]‚]„?€+ €س“ƒ ‚];ƒ ‚ه; €ش— €ص‍ےےے¨‚ه‚‚ €ض“‚]„ €×”‚‚=‚„>&• €ط“‚‚„?€- €ظ— €ع“ƒ…9 €غ“‚‚„?€- €ـ›T‚ه„?€œ‚‚‌‚„?€ €ف“ƒƒƒ ‚ه;+ €ق‍ےےےف‚ه‚‚ €ك— €àکY”‚„?€=•ش €ل”ƒ£‹§„C;;=•N €â“ƒ£…@ €مگ„,„,„A@,„Aب €ن‘„,„ €ه’ƒ£ €و–^ €ç“ƒ£‹§„C;; €èگ„,„,„A@,„Aب €é´„,„@,„A@,„A¨,„?€ €ê— €ëکt”‚„@@=•غ €ى”‚_„=•› €ي“‚_„؟€ €î›N‚ه„?€œ‚‚‌‚„?€ €ï“ƒ ‚ه;…9 €ً‍ےےےم‚ه‚‚ €ٌ“ƒ…9 €ٍ“‚„ €َ“‚„ €ôک#”‚_• €ُ“‚_„ €ِ“‚ٹxƒے;; €÷”‚‚ك=•“‚„?€ €ّ›e‚ه„?€œ‚‚‌‚„?€ €ù“ƒ ‚ه;‹µƒے,‚ه,„?€;; €ْ‍ےےےج‚ه‚‚ €û›T‚ه„?€œ‚‚‌‚„?€ €ü“ƒƒƒ ‚ه;+ €‎‍ےےےف‚ه‚‚ €‏— €ےکˆ”‚„A`=•e € ”‚„Aذ+‚[• € “‚‚„Aذ+ € – € “‚‚ € — € “ƒ…! € ک”‚„A =• € ”‚‚ك<•b € ”‚„Aذ-„]‚‚ك<&• € “‚‚„Aذ- € – € “‚„ € — € کv”‚‚ك=•P € ”‚„Aذ<• € “‚„ € – € “‚‚„Aذ- € — € – € “‚„ € — € “ƒ…! € — € ”ٹxƒ;;‚ك>•“ƒ‹²ƒ,‚ك;; € ™******INPT STRING************ € “‚ „A € ”‚„Aذ[•? € گ„?€,„Bî,„Cں€,„CX € ‘„@€,„Bً € ’ƒ € !کŒ”‚„BP[‚„Aذ>&•£ € "گ„?€,„Bî,„Cں€,„CX € #‘„@€,„Bً € $’‹µƒ,„?€,„Aذ;; € %™ PRINT MID$(BUFFER$,1,20) € &‘„@€,„C € '’‹´ƒ,„Aط;; € (کج”‚„Bœ[‚„BP>&•² € )گ„?€,„Bî,„Cں€,„CX € *‘„@€,„Bً € +’‹µƒ,„?€,„Aذ;; € ,‘„@€,„C € -’‹µƒ,„Aط,„Aذ;; € .‘„@€,„C" € /’‹´ƒ,„BT;; € 0ک‎”‚„Bذ[‚„Bœ>&•ك € 1گ„?€,„Bî,„Cں€,„CX € 2‘„@€,„Bً € 3’‹µƒ,„?€,„Aذ;; € 4‘„@€,„C € 5’‹µƒ,„Aط,„Aذ;; € 6‘„@€,„C" € 7’‹µƒ,„BT,„Aذ;; € 8‘„@€,„C7 € 9’‹´ƒ,„B‍;; € :— € ;“‚„ € <“‚_„ € =¬ € >£*D„>Lجح;, € ?”ƒƒ£?• € @“ƒƒ£ € Aک{”ƒƒ£=•i € B”‚„=• € C“ƒ…! € Dک8”‚„?•& € E“ƒƒ ‚„?€+‚-; € F— € G— € H”„@ٹw‚ك„Aذ+„Bذ/;;-ٹw‚‚-„Aذ/;;+„@@ٹw‚ك„Bœ+„Bذ/;;+[•q € I“‚و‚„Aذٹwٹ`‚‚-;;„Aذ/;;*-‚-„A@*„@€+ € J“‚è„Bب„?€ٹwٹ`‚‚-;;„Aذ/;;+„A¨*+ € K“‚ç‚و„A@+ € L“‚é‚è„A + € M”ƒ‹§„C;;=•k € Nگ‚و,‚è„?€-,‚ç„?€-,‚é„?€+ € O´‚و,‚è„?€-,‚ç„?€-,‚é„@@-,„?€ € P–& € Q‘‚و,‚è„?€- € R’ƒ € S— € T— € Uےے‎b®‚„? € V”‚„D¢€=‚„A=|•* € W“‚„ € X”ƒ…ق=•” € Y”ٹ,ƒ;;‚ن[ٹ,ƒ;;‚م]&ƒ…N=|•H € Z“ƒےƒ € [“‚„؟€ € \گ„,„,„Cں€,„Co € ]°ّ € ^— € _–I € `“‚„؟€ € a“ƒےƒ € bگ„,„,„Cں€,„Co € c°§ € d— € e™ELSEIF MAINMENU = 7 THEN € fکo”‚„Aہ=ƒ…9?&•L € g“‚„ € h“‚„؟€ € iگ„,„,„Cں€,„Co € j° € kک”‚„A =‚ق„?&•t € l“‚„ € m“‚8„؟€ € n™ ERRNO = -1 € o™BUFFER$ = "" € pگ„,„,„Cں€,„Co € q°‡ € rکu”‚„ءط=‚„@ہ=|•W € s“‚„ € t“‚„؟€ € u“ƒ…9 € vگ„,„,„Cں€,„Co € w° € x— € yےےç € z“‚„ € {¥ےےلح € ~¤=8;ƒƒƒƒ‚ê‚ë € ”‹³‹·"ƒں;;;;…+=‹³‹·"ƒ‍;;;;…+=&•« € €“‚ „؟€ € پ™&RESTORE DATE OF INSTALLATION FROM FILE € ‚“ƒ…پ‹³‹2%‚1;;;;+…O+ € ƒآ…‎,#„Ap,ƒ,„A € „ئ#„Ap,„A ‡ƒ € …”ٹz„Ap;;„=•â € †™ FIRST RUN € ‡“ƒ‹µ‹¨ ;;,„@€,„@;;…K+‹µ‹¨ ;;,„?€,„@;;+…K+‹µ‹¨ ;;,„@à,„@€;;+ € ˆاƒ‹1$„A ;; € ‰اƒƒ € ٹ“ƒƒ € ‹إ#„Ap,„?€ € Œ–: € چ™USUAL CHECK € ژؤ#„Ap,„?€ € ڈ“ƒƒ € گ— € ‘أ#„Ap € ’™CHECK IF PERIOD EXPIRED OR NOT € ““ƒ‹µ‹¨ ;;,„@€,„@;;…K+‹µ‹¨ ;;,„?€,„@;;+…K+‹µ‹¨ ;;,„@à,„@€;;+ € ”£ ¼ƒ;ƒ € •“‚ê‚ € –£ ™ƒ;ƒ € —“‚ë‚ € ک”ٹ`‚ê‚ë-;;„A`>‹¶!‹7-„@;;,„@;;…?&•€ € ™گ„,„,„Cں€,„Co € ڑ»„ € ›‘„@@,„Aً € œ’… € ‌‘„@@,„BH € ‍’… € ں‘„@@,„BŒ € ’… € ،“‚„ € ¢»„@ہ,…¾,… € £»„@à,…؟,…9 € ¤»„A,…ہ,…9 € ¥»„A,…ء,…ھ € ¦¬ € §”‚„?•° € ¨ےےےـ € ©”‚„A=•. € ھگ„,„,„Cں€,„Co € «ن € ¬ € ک6”‚„@ہ=•$ € ®£ل„@€;, € ¯“‚„ € °— € ±— € ²– € ³“‚ „ € ´— € µ¥ےےْج € ·¤ڈ;‚ى € ¸£ےے{i„A`;, € ¹“‚ىٹz„A`;; € ؛”‚ى„B =•* € »ؤ#„A`,„?€ € ¼£ےے„„A`;, € ½–n € ¾“ƒں‹1$„A ;; € ؟“ƒ‍‹1$„A ;; € ہ“ƒ‘‹1$„A ;; € ء“ƒ’‹1$„A ;; € آ— € أ£ےےƒ^„A`;, € ؤ”‹³‹·"ƒں;;;;…9=‹³‹·"ƒ‍;;;;…9=|‚ى„=|•8 € إ£<„;, € ئ”‚„=• € ان € ب € ة— € ت— € ث¥ےے‏z € خ¤ؤA‚ً;‚ïƒ‚îƒƒƒƒƒƒ‚ٍƒƒ ‚ٌ‚يƒ ƒƒƒ ƒƒƒƒƒƒƒƒ € د“‚ï‚ € ذ“‚ „@ € رگ„,„,„Cں,„Co € ز»„ € س™,BLOCK REG. VERSION FOR DEMO VERSION FLAG ... € ش”‚ً„=•8 € ص“ƒ‹§„AP;;…‚+ € ض“‚î„ € ×کF”‚ً„>•4 € ط“ƒ‹§„AP;;…3+ € ظ“‚î„A@ € ع— € غ¬ € ـ“‚„ € ف“‚„ € ق“ƒ‹±…,…@ƒ+,…9,…(,‚ً,„A ;; € ك£à„?€;, € à”‚„؟€=•° = € ل“ƒ‹±…,…@ƒ+,…9,…(,‚ً,„A ;; € â£x„?€;, € م”‚„؟€=•°ص € ن“ƒ‹±…),…Tƒ+,…9,…ü,‚î,„A@;; € ه£„?€;, € و”‚„؟€=•°m € ç”‹³‹·"ƒ;;;;…9=‹³‹·"ƒ;;;;…9=&•) € è“ƒ‹4'„A@,…P;; € é–D € ê“ƒ‹³‹·"ƒ;;;; € ë“ƒ‹³‹·"ƒ;;;; € ى“ƒƒ € ي“ƒƒ € î“ƒƒƒ+ € ï“ƒƒƒ+ € ً“ƒ…9 € ٌ›9‚ٍ„?€œ‚ٹxƒ;;‌‚„?€ € ٍ“ƒ‹³‹2%ٹa‹µƒ,‚ٍ,„?€;;;;;;;; € َ“ƒ ‹³‹2%ٹa‹µƒ,‚ٍ,„?€;;;;;;;; € ô“‚ٌٹ,ƒ;;ٹ,ƒ ;;‚ٍ+* € ُ“ƒƒ‹³‹2%ٹ`‚ٌ;;;;;;+ € ِ‍ےےے‚ٍ‚‚ € ÷“‚ي„ € ّ›{‚ٍ„?€œ‚ٹxƒ;;‌‚„?€ € ù“‚ي‚يٹ,‹µƒ,‚ٍ,„?€;;;;+ € ْ‍ےےےء‚ٍ‚‚ € ûگ„,„,„Cں,„Co € ü“ƒ‹µ‹³‹·"ƒ;;;;,„?€,„?€;; € ‎“ƒ ‹µ‹³‹·"ƒ;;;;,„@@,„?€;; € ‏“ƒ ‹µ‹³‹·"ƒ;;;;,„@€,„?€;; € ے“ƒ‹µ‹³‹·"ƒ;;;;,„@,„?€;; €“ƒ‹µ‹³‹·"ƒ;;;;,„@@,„?€;; €“ƒ ‹µ‹³‹·"ƒ;;;;,„@€,„?€;; €“ƒ‹³‹2%‚يٹ`‚1„A@+ٹaƒ;;-;;*;;;; €“ƒ‹³‹2%‚يٹ`‚1„Aہ+ٹaƒ ;;-;;*;;;; €“ƒ‹³‹2%‚يٹ`‚1„A0+ٹaƒ ;;-;;*;;;; €“ƒ‹³‹2%‚يٹ`‚1„A+ٹaƒ;;-;;*;;;; €“ƒ‹³‹2%‚يٹ`‚1„A¨+ٹaƒ;;-;;*;;;; €“ƒ‹³‹2%‚يٹ`‚1„A¨+ٹaƒ ;;-;;*;;;; €“ƒƒƒ+ƒ+ƒ+ƒ+ƒ+ € ”ٹxƒ;;„A@>•+ € “ƒ‹µƒ,„?€,„A@;; €— €— € ™CALL DEBUG(REGISTRATION.CODE$) €™CALL DEBUG(FINAL.CODE$) €”ƒƒ=•¨ €“‚„؟€ €“‚ „@@ €گ„,„,„Cں,„Co €“ƒ…أ €£ھƒ,„A ,‚,„?€,……;ƒ,‚,, €“ƒ…* €£gƒ,„B ,‚,„?€,……;ƒ,‚,, €“ƒ…z €£$ƒ,„Bp,‚,„?€,……;ƒ,‚,, €£ےےnز„A`;, €“ƒںƒ €“ƒ‍ƒ €اƒU‹1$„A ;; €اƒT‹1$„A ;; €اƒUƒں € اƒTƒ‍ €!إ#„A`,„?€ €"أ#„A` €#کز”ƒ‹4'„A@,…P;;=•¨ €$“‚„؟€ €%“‚ „@@ €&گ„,„,„Cں,„Co €(“ƒ…£ €)£àƒ,„A ,‚,„?€,……;ƒ,‚,, €*“ƒ…V €+£‌ƒ,„B ,‚,„?€,……;ƒ,‚,, €,“ƒ…z €-£Zƒ,„Bp,‚,„?€,……;ƒ,‚,, €.£ےےm„A`;, €/“ƒں…+ €0“ƒ‍…+ €1اƒU‹1$„A ;; €2اƒT‹1$„A ;; €3اƒUƒں €4اƒTƒ‍ €5إ#„A`,„?€ €6أ#„A` €7– €8گ„,„,„Cں€,„Co €9™ LOCATE 7, 100 €:™PRINT " WRONG CODE! " €;“ƒ…/ €<£ƒ,„Bب,‚,„?€,……;ƒ,‚,, €=™PRINT REGISTRATION.CODE$ €>™PRINT FINAL.CODE$ €?”‹©…ˆ;;…9?•ث…ˆ €@ن €A €B— €C“‚„ €D»„A,…ء,…ل €E´„,„,„Cں€,„Co,„ €Fµ„,„CY,„Cں,„CY €G¬ €H”‚„?•° €Iےےےـ €Jگ„,„,„Cں,„Co €K»„ €L”ƒƒ=•£x; €M° €Nےےٍ= €O”‚„؟€=•4 €Pگ„,„,„Cں,„Co €Q»„ €Rن €S €T— €U“‚ ‚ï €V¥ےےًE €Y¤8; €Z“‚„ €[¬ €\“ƒ‘‹±…ں,…>,…9,…(,„,„A ;; €]”‚„؟€=•°K €^“ƒ’‹±… ,…>,…9,…(,„,„A ;; €_° €`ےےےc €a”‚„=•` €b£ےےiF„A`;, €cؤ#„A`,„?€ €dاƒ4ƒ‘ €eاƒ6ƒ’ €fإ#„A`,„?€ €gأ#„A` €h— €i¥ےے‏ر €l¤ 0=ƒ‚ّ‚ِ‚÷ƒ;‚َ‚ô‚ُ €m™SAVE OLD SETTINGS €n“‚َ‚ €o™OLD.T = TEXTSIZE €p“‚ô‚ €q“‚ُ‚ €r“‚ ‚ِ €sى‚÷ €t”ƒ……=•(“‚„C ٹk ƒ;;‚÷*„@/- €u”ƒ…ج=•“‚„B €v”ƒ…ذ=•“‚„@à €w”ƒ…‎=•"“‚„C ٹk ƒ;;‚÷*- €x”‚„<•“‚„ €y“‚ ‚ّ €z‘‚,‚ €{’ƒ €|™RESTORE ALL €}“‚ ‚َ €~™!TEXTSIZE = OLD.T €“‚‚ô €€“‚ ‚ُ €پ¥ےے‎é €…¤ٍ|Lƒ(;ƒ ƒ!ƒ"ƒ#ƒ$ƒ%ƒ&ƒ'‚ùƒ €†™PROGRAMM INFORMATION SCREEN" €‡گ„,„,„Cں€,„Co €ˆ“ƒ …è €‰“ƒ!…9 €ٹ“ƒ"…خ €‹“ƒ#‹³‹·"ƒں;;;; €Œ“ƒ$‹³‹·"ƒ‍;;;; €چ“ƒ%…w €ژ”‹³‹·"ƒ’;;;;…9=• €ڈ“ƒ&…E €گ– €‘“ƒ&ƒ’ €’— €“™DSPFONT=CURRENTFONT €”“‚ „A €•‘„Cںٹxƒ!;;„A@*-„@/,„A@ €–’ƒ! €—™ DSPFONT=1 €ک‘„Cںٹxƒ";;„A@*-„@/,„BH €™’ƒ" €ڑ™ DSPFONT=2 €›‘„Cںٹxƒ#;;„A@*-„@/,„B´ €œ’ƒ# €‌™ DSPFONT=2 €‍‘„Cںٹxƒ$;;„A@*-„@/,„Bً €ں’ƒ$ € µ„,„B@„@p*,„B‏„@ *,„B@„@p* €،™ DSPFONT=1 €¢‘„Cںٹxƒ%;;„A@*-„@/,„C €£’ƒ% €¤‘„Cںٹxƒ&;;„A@*-„@/,„CC €¥’ƒ& €¦´„,„,„Cں€,„Co,„ €§™SHOW PLU MASTER FROM €¨£c„C‡,„A°;,, €©“ƒ'…9 €ھ›‌‚ù„Aذœ‚„?€‌‚„؟€ €«“ƒ‹µƒ ,‚ù,„?€;; €¬“ƒ'ƒƒ'+ €“‚ „A €®‘„B$,„AP €¯’ƒ' €°‍ےےے”‚ù‚‚ €±“‚ ‚ €²”ƒ(…1=•ü €³“‚„ €´”‹³‹·"ƒں;;;;…+=‹³‹·"ƒں;;;;…+=&•»„@ہ,…¾,… €µ»„A,…ء,…1 €¶¬ €·”‚„?•° €¸ےےےـ €¹گ„,„,„Cں€,„Co €؛»„ €»”‚„@ہ=•£ےےçc„;, €¼– €½£4„@ ;, €¾— €؟™!IF RUN.MODE$ = "778" THEN DLY = 1 €ہ™"IF RUN.MODE$ = "SIM" THEN DLY = 20 €ء”‚„@?•ت €آ›‚ù„œ‚„C‌‚„@€ €أ´„‚ù+,„‚ù+,„Cں€‚ù-,„Co‚ù-,„ €ؤ´„‚ù+,„‚ù+,„Cں€‚ù-,„Co‚ù-,„ €إ‍ےےے„‚ù‚‚ €ئ›ƒ‚ù„œ‚„C‌‚„@ €اگ‚ù,„,‚ù„?€+,„Co €بگ„Cں‚ù-,„,„Cں€‚ù-,„Co €ة‍ےےے®‚ù‚‚ €ت›}‚ù„œ‚„Bî‌‚„?€ €ثگ„C,‚ù,„C,‚ù €جگ„C,„Cn‚ù-,„C,„Co‚ù- €ح‍ےےے´‚ù‚‚ €خ— €دگ„,„,„Cں€,„Co €ذ“‚„ €ر¥ےےّ €س¤– ‚ْ‚û; €ش“‚ „@€ €ص‘‚ْ„@ہ-,‚û„AP- €ض’…ك €×“‚ „?€ €ط‘‚ْ„@-,‚û„@ہ- €ظ’…… €ع“‚ ‚ €غ¥ےےےs €ف¤; €ق¬ €ك“ƒڑ‹±…â,…ز,ƒڑ,…(,„?€,„@€;; €à”‚•°T €ل£ےے]؛„A@;, €â£ےےj0„A@;, €مإ#„A@,„?€ €ن£ےےfT„A@;, €ه° €وےےے` €ç”‚•V €è™RESTORE €é£ےے]H„A@;, €êؤ#„A@,„?€ €ë£ےےf„A@;, €ى£ےےeâ„A@;, €ي— €î¥ےے‏ي €ً¤ٍƒ);‚ü‚‎‚‏ €ٌ“‚üٹ,‹µƒ),„?€,„@;;;; €ٍ“‚‎ٹ,‹µƒ),„@€,„@;;;;„?€-„Aô* €َ“‚‏ٹ,‹µƒ),„@à,„@€;;;;„C¶‍ْ* €ô“‚ٹw‚ü‚‎+‚‏+;; €ُ¥ےےے €ّ¤D‚;‚ €ù™BLOCK VERSION 1.1 €ْ“‚„ €û”ٹe;;„?•Z €ü™777 €‎ف„?€,T‚£خ; €‏¬ €ے”‚•° €ےےےâ €ف„?€,O €کٹ”ٹe;;„=•r €™ SIMULATOR €›S‚„?€œ‚„C¥‚*‌‚„?€ €”‚•¯ €‍ےےےن‚‚‚ €— €¥ےے‏إ €¤"; €“‚„؟€ € ¥ےےےç €¤6ƒ*; €™& IF KBRD$ = "a" THEN KBRD$ = CHR$(197) €™& IF KBRD$ = "e" THEN KBRD$ = CHR$(198) €™& IF KBRD$ = "o" THEN KBRD$ = CHR$(216) €”ٹxƒ*;;„?€=•ے €™ USUAL KEYBOARD, ENTER, SPACE ... €“‚ٹa‹µƒ*,„?€,„?€;;;; €”ٹaƒ*;;„B=• €“‚„B €کe”ٹaƒ*;;„AP=• €“‚„D¢€ €ک1”ٹaƒ*;;„A=• €“‚„Aà €— €کs”ٹxƒ*;;„@=•V €™ESC OR ARROWS ... €“‚„ٹa‹µƒ*,„@,„?€;;;;- € — €!¥ےے‎س €$¤Gƒ+; €%آ…Œ›‡#„AP €&’#„AP,ƒ+ €'أ#„AP €(¥ےےےآ €*¤!6;‚ €+£ےےWه„A@;, €,£ےےd[„A@;, €-”ٹz„A@;;„@€?•F €.“ƒڑ…[ €/“‚„Ch €0“ƒ“…ر €1£ےےc‏„A@;, €2–' €3ؤ#„A@,„?€ €4£ےے`D„A@;, €5— €6إ#„A@,„?€ €7£ےے_َ„A@;, €8™ PRINTER SETUP READING €:£ےے—Œ; €<™ CLOSE #15 €=¥ےے‏è €?™V SAMOM KONCE PROGRAMMI €@پ: €Aگ„,„,„Cں€,„Co €B“ƒh…D €C£ےےيœƒh,„BŒ,‚,„?€,……;ƒh,‚,, €D“ƒh…©‹2%ٹj;;;;+ €E£ےےيBƒh,„B´,‚,„?€,……;ƒh,‚,, €F“ƒh…د‹2%ٹi;;;;+ €G£ےےىèƒh,„Bـ,‚,„?€,……;ƒh,‚,, €I»„@ ,…½,…o €J»„A ,…¬,… €K“‚„ €L¬ €M”ٹwٹ*;;„@/;;ٹ*;;„@/-„=•L €N“ƒh…D €O£ےےى'ƒh,„Bp,‚,„?€,……;ƒh,‚,, €P–" €Qگ„@,„Bp,„C‍€,„Bھ €R— €SےےےK®‚„? €Tگ„,„,„Aک,„@@ €U”‚„A =• €Vن €W €X— €Y“‚„ €Z»„@ ,…9,…9 €[»„A ,…9,…9 €\¢ ھU