?@(è"ÿ"SCÒOPÔT¤T2¤SEÃÂÐÍJOÙØÊÅÉX¤ÓB²E²ÒÁERÒERÌIOERÒFNERÒMODÅÎBL¤ÃLSCÒÌ€€ € € ANTIC PROMPTER›BY HEIDI BRUMBAUGH›%%(c) 1987, ANTIC PUBLISHING INC.›(%%(DO NOT RENUMBER THIS PROGRAM!)›2/ +/6€-F:@ˆ,%AV$F:@‰,d1 +@AAH1AAnV-@@((@ANTICD(@ PROMPTERVAR@x88(0By Heidi Brumbaughýÿÿÿÿÿÿÿÿÿ‚ B B þ( }Main menu:( 1 - Screen editor##( 2 - Save text to disk%%( 3 - Load file from disk&( 4 - Prompt speech0( 5 - ExitX A@((Option b9/ApA0A AB'g9 A€;(1(&Please enter a number between 1 and 5.; A¼ BÁYB:‚,!(}+-@@=AR@O( One moment...Y ASÆB:ƒ,! A$ÐT-(%}Please enter text (or the name of anT("ASCII file) before using prompter.Ú6„-@ B@$ç%%MAIN SCROLL ROUTINE STARTS HERE›è BDISABLE TRAP›üE6…-@6†-@P'6‡-36ˆ-@EAdAUU +@A@„1AA"CA @„UAA"! A!DRAW FIRST SCREEN›BF:AD,"$6‡-86‰-@#@B A$%ˆ"@6‡-@ % A.&ˆ"@6‡-6@ & A8'ˆ"@6†-†%@' AB#ˆ@ A# AD)6†-†&@† )6†-F AL‡"AV A@° STOPPED›µ* F:Ad,AUA*GET OUT›º&6ˆ-F:A2,&ˆ"@AÄ A`IAdAU)Š-@A- Š0$IEXIT TELEPROMPTER HERE›Û..SCROLL UNTIL JOYSTICK OR TRIGGER PRESSED›ÜWA‡")+‹B:ƒ,&@*‡"@ ,)+…"@*‡"6@ ,M6‡-W A@æ% 6…-…%‡6‹-…%A%6ˆ-@ðŒ-@@ ú5567Œ<Œ,.>:@:ƒ7…%Œ&@<…%Œ&@,,%A(, Œ‡"@ Ap{6Ž-@6-…%@9#6-‹/6‘-@A-_(@7@<@ ,mŠ-@†q Š{ A€"06Ž-6@6-‹$6-…%@ 06‘-@,Œ-@ $Ž6)-‘)(@ƒ7Œ&@<Œ,J'Š-@† Š'6‘-‘%+@$Ž,Qˆ"@6ˆ-F:A2,R$F:AD,"$6‡-T Œ^3-3(@7@<@ ,h:F:Ad,AU$6‡-06ˆ-@: Arˆ"@6ˆ-F:A2,|$F:AD,"$6‡-†!!ˆ"@*‡A¤$Ð, B((}What is the filename,ÚA A!@5@@A6Œ-@ä1 (}-@@1(Reading file...î2)@’’"AU(6’-@22 A 5ðD-’ @2)+’A#*’AY,A 0DIGNORE CONTROL CHARS›ó'6‚7Œ,.>:’,6Œ-Œ%@' A 0ø( completed.ý 6„-@ B@ 6ƒ.$4?6“-F:A•,46”-F:A‡,$AV%F:A†,?@>“"A6A @EOF›CI“"@*”"A 5((?(File too long...truncating.I A EHG“"Ap(.(Error-- file not found.:6„-@D B@G$R%6•-A P6–-A % B0¸ ( B(OUTPUT TEXT TO DISK FILE›» B:‚,!A0½ M-(%}Error-- you haven't entered text, orM(have already used prompter.¿ 6„-@ B@$ " A5"SEE IF FILE EXISTS›Ì ( }File nameÖ @@à @ê (}File already exists. (ô ( 1 - Overwrite fileþ $$( 2 - Append text to file ( 3 - Cancel 3(%(What would you like to do/ A13 A2A3A4& ?("(Please enter 1, 2 or 3., A0?INVALID RESPONSE›€ 6—-@ A6ä 6—-@  A6H A9™¬ KF:A•,"Ap#@/6—-@9 A6KCREATE NEW FILE›¶ %6•-A9™6–-A0% BWRITE TEXT TO FILE›<6•-A9™6–-A0% B<@—$(@‚.@Ÿ$³PARSE STRING›´ AV6…-@È6‹-@!Ò‚7‹<‹,4 AS@ÔD‹!@6‹-‹&@' AS0DFIND END OF 20 COLUMN LINE›×6‹-@!Ü[+6ƒ7…<…%‹&@,.‚7@<‹&@,;6…-…%‹&@[PUT LINE INTO NEW TEXT STRING›æS6˜-@!&‹˜!56ƒ7…<…%˜,.™7@<˜,=6…-…%˜SFILL TO END OF LINE›ð@‚7‹<‹,4 6‹-‹%@( AS`@BEGINNING OF NEW LINE›ú-6‚.‚7‹ B/6”-F:A‡,$AV%F:A†,>6“-F:A•,ê--”"AS0*+“"@ )“"@,ATô--”"AS`*+“"@ )“"@,AUþ&#(ERROR “ AT LINE ” .&XSCREEN EDITOR›bF B-@@K:?@‚F(}l6‘-6š-v)@‰€7!‰"AU)‰"AWAp07DISABLE INSERT MODE›Š'‰"@'Au'EXIT WITH ESC›”@‰"AU*‘"@# (@THROW OFF CR AT END OF SCREEN›ž!‰"@0*š"!(>:‰,¨b (>:‰,6‘-F:@„,<6š-F:@…,%AV$F:@†,bPRINT CHARACTER AND ADJUST POSITION›²_‘"@#*š!@8%-@8‘16š-@8?(>:AS,_CAN'T TYPE PAST END OF SCREEN›¼Yš"@96š-)6‘-‘%@7(>:AU,YLEAVE ONE SPACE AS RIGHT MARGIN›Æ Ap0L''ESCAPE PRESSED; READ SCREEN VALUE›V'@ AR@'(j 6Œ-€%›t6F:Œ,"Œ@,6Œ-Œ&@6 Au@~6œ-Œ&€%@6š-@ˆŒ-@œ$$P:Œ'@@,"Œ'@@Av@’6‰-F:Œ%€&@,œ'‰@c6‰-‰%@2' Av0¦'‰@•6‰-‰&@d' Av0°‰A'Av0º'‰A‘6‰-‰%@2' Av0Ä'‰A#6‰-‰&@d' Av0Ή"AU6‰-@2Ó56‚7š<š,.>:‰,'Œ%€&@@56š-š%@Ø ŒâAR6ƒ.$'CALC. SCREEN›'!!6›-+@$$@@,&@t'96œ-A 9‚;œ,ƒ;œ%A,;AU,™;@ ,~') 6™. 6™7@ ,.™)6™7@,.™÷*$à. B0ô. ASPARSE STRING›þ.6ƒ7B:ƒ,&@™,.™/,,6ƒ7B:ƒ,%@,. (C) 1987 /,,6ƒ7B:ƒ,%@,. ÂÙ /,,6ƒ7B:ƒ,%@,. ÁÎÔÉà ÐÕÂÌÉÓÈÉÎÇ &/6ƒ7B:ƒ,%@,.™0/,,6ƒ7B:ƒ,%@,. ÐÒÅÓÓ ÁÎÙ ËÅÙ :/,,6ƒ7B:ƒ,%@,. ÔÏ ÃÏÎÔÉÎÕÅ D/1 +@A@„1AA"N/Y6†-@P6‡-'6…-@36ˆ-@= BOAdAUY AX/6‡-@  A@b/ 6ƒ. $È2pp6‚7@<@…,.UANTIC CORDIALLY WELCOMES YOU TO THE ANTIC PROMPTER! THIS JOYSTICK-DRIVEN TELEPROMPTERÒ2pp6‚7@†<Ap,.U IS EASY TO USE; SIMPLY TYPE IN YOUR TEXT (OR THE NAME OF AN ASCII FILE ON DISK) AND Ü2pp6‚7Aq<AU,.UYOU'RE READY TO GO! PUSH THE JOYSTICK UP TO MOVE FORWARD; IF YOU WANT TO GO BACKWARD æ2pp6‚7AV<A@,.USIMPLY PULL THE JOYSTICK BACK. PRESSING THE TRIGGER TEMPORARILY STOPS MOVEMENT. TO SCð2pp6‚7AA<A%,.UROLL FASTER MOVE THE JOYSTICK LEFT; MOVE IT RIGHT TO SLOW THINGS DOWN. TO RETURN TO Tú2DD6‚7A&<Af,.)HE MAIN MENU JUST PRESS ANY CONSOLE KEY. 3$°6 PAUSE›º6'@'@ Ä6F:@, „B@ 7$ N BDISABLE TRAP›*N@CLOSE CHANNEL›4N46“-F:A•,46”-F:A‡,$AV%F:A†,>N77+“A8*“A@,)“"AB)“"AdBHN++“"Ab)“"Ai)“"ADBRN++“"A0)“"A`)“"AeB\N##(Error--“ at line ”.fNUNPREDICTED ERROR›èN)()( I/O error # “ has occurredòN$$(while trying to access disk.üN(Check the disk andO( try again.(O6„-@ B@ •LO)()( I/O error # “ has occurredVO##(while trying to write file.`O))(!The disk or directory is full, orjO$$(the disk is write protected.tO-*("Please replace disk and try again.-(~O6„-@ B@ •°O((Illegal file name.ºO)&(Filenames must be in the form:)(ÄO( D:FILENAME.EXT(ÎO--(%Where D: is the device name, filenameØO**("is the name, which must begin withâO))(!a capital letter and contain onlyìO,,($letters and numbers, and .ext is theöO( extension.P((Please try again.( P6„-@ B@ –€D1:PROMPTER.BAS