mn^ÝòDATE¤BN¤DASH¤DSCR¤CL¤LF¤TTL¤PRICE¤QNT¤A¤TAX¤TEMP¤FILL¤MSG¤TOTAL¤T¤T1¤NUM¤FRM¤GTTL¤TTÌÌPRICÅNUÍTOTAÌTAØGTTÌÉÁØ$OPt$˜ ¢ ¬ ¶Å Ò Ó Ý ù$$ Kh r$–$º Ä Î @PdSALES RECEIPT PROGRAM›n##BY NICK BERRY 5/6/86-5/14/86›x›‚ ***** INITIALIZE *****›Œ~~€;@,;@(,‚;@€,ƒ;@6,„;@,…;@,†;@,‡;@,ˆ;@,‰;@,Š;@,–hh‹;@(,Œ;@6,;@u,Ž;@,;@6,;@6,‘;@,’;@,“;@,›<.6Œ.$ <(36 spaces)› gY6‚.O-------------------------------------------------------------------------------g(79 dashes)›ª!6„.>:A%,!CLEAR SCREEN›´9A A%'AAE9AA¾›È##****** FIRST SCREEN ******›Ò6”-Ü(„ð!(!( TURN ON PRINTER NOW!ýú.(.(# ENTER BUSINESS NAME(28 spaces max)ÿ+( (+( ^^^^^^^^^^^^^^^^^^^^^^^^^^^^-@@ B:,"@(A6•-P:@(&B:,,'@6‹.Œ7@<•,6‹7•%@,.""6‹7B:‹,%@,.Œ7@<•," 6.‹,'( (#(ENTER DATE(MO/DA/YR)'€- €46€.00/00/001/(+(IS ALL INFORMATION CORRECT(Y/N)/‰2‰4N)‰4nA 63@::3>:@,' **************************************J::3>:@,' **** ****T##3>:@, ****  ****^::3>:@,' **** ****h::3>:@,' **************************************r--3>:@, CUSTOMER BILL €| 3 3‚†PP3H QUANTITY / DESCRIPTION / PRICE EACH / TOTAL3‚¤›®##****** SECOND SCREEN ******›¸(„½--@@-(Enter END when doneÂ#-@@#( QUANTITY:Ì&-@@&( DESCRIPTION:Ö%-@@ %( PRICE EACH:Ý'-@@'( SUB-TOTAL $”ß Aà-@@ˆåˆ4ENDAê 6.ˆ Aô 6ˆ.-@@ƒƒ4ENDA 6.ƒ A& 6ƒ.D-@@ –I 6—-– AN 6‡.’b 6.‡ Al 6‡.€/(+(IS ALL INFORMATION CORRECT(Y/N)/‰Š‰4N)‰4nA0”6˜-A:ˆ,$–™ 6—-˜ Až 6Ž.’· 6.Ž A¸ 6Ž.¼ 6”-”%˜Æ 6—-” AÐ 6†.’Ú 3ˆƒ‡Žä A@› ""****** THIRD SCREEN ******›* B(„4<(8(,SHALL I COMPUTE AND PRINT SALES TAX (Y/N)<‰>!‰4N)‰4n6š-”! A H6™-?€$”R&&6™-P:+™%>P,$A,'AW 6—-™ AX 6Š.’\3‚f;;3Œ7@<@, SUB-TOTALŒŒ7@<@,†p553Œ7@<@,TAXŒŒ7@<@,Šz 6š-”%™Ž3‚ 6—-š A 6“.’“?3?3Œ7@<@, TOTAL BILLŒŒ7@<@,“–›—##****** FOURTH SCREEN ******›˜(„¬((ENTER MESSAGE:¶ 3 3Þ›è""****** DO IT AGAIN ? ******›ò(„ü3(/(#DO YOU WISH TO DO ANOTHER BILL(Y/N)3‰‰4N)‰4nA€ A$›. ****** END SCREEN ******›8(„B((END OF PROGRAMGK›L""*** FILL STRING W/SPACES ***›V 6. `67@,.j67B:,%@,.Œt 6.~$¯›°""***** FORMAT NUMBERS *****›º6’.$ .00Ä$$6—-P:—$A%?P,'AÎ 6‘.=:—,Ø›-@B:‘,â‘7›<›,4.6œ-›ì ›ö5œ"+6’7@&B:‘,<@,.‘5 A336’7@&œ%@<@&œ%B:‘,%@,.‘ 6œ-6‘.$›!!******* ERROR TRAP ******›( („ (2''(INVALID INPUTý,PLEASE TRY AGAIN<-@A F A@€ D2:MRBILL.BAS