IMD 1.18: 11/10/2014 14:34:32 mdos 6809 prom.sa prom.lo (bohm programmer)  MASTER 301072980MOTOROLA UFO \l|„Œ”œÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿüÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿLIST CMÁ&榎’½Þ–Š0· Ö–ަ½Þ¾¦„'X\')¾§€¿¾0¿ á}&Ü|¦„J"ÒŽ æ†~90¿¦„Žm„'¼¡„'Æ: ó|&|殿1½0 Ÿ¾†§„Ž x­Žÿ’½ð$½ð!þ9¾¿ ¾0¿ ÆŽ ?¾ †.§€¿ ÆŽ ?¾愾 †:§€ç€¿¾ ¿9¾¿ ¾˜M»·$|¶ Á&ö ½Þ9½ç9¾¦„ · ˜MG»·$| ÁA®0¿~4˜M54 §€5§€9DDDD„‹09#‹90 O13¶8Ò "#$ %&'()*+,-.5VvINVALID MESSAGE \3 AT \8UNIF. I/O ERROR-STATUS=\3 AT \8PROM I/O ERROR-STATUS=\3 AT XXXX ON DRIVE X-PSN XXXX0MDOSOV SY‹ ÿÿÿÿÿÿÿÿÿÿÿÿÿÿxšúý4¨ŽÒöí "4¨Žäöï 4¨Žéöñ 4¨Žëöó4¿6A¦€§$j¦Ž4 à_…\€$û¦…HŽÄì†ý¶¶4Ž«Æ@?%5·æh®j5Š59†V—½èS½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô­ ‘~“½½½½½ ½ ½ † 4«à®f~þ½Pÿ Ž œ†ª0æ„§„÷ ¡„¨ç„Š'ë0¿ ¾ÿú¿Ž"¿ÿúŽ¿ÿøŽ¿ÿöŽ¿ÿôŽ ¿ÿòþ †/ŽÄ·²|²¿ ’Ž«Æ?$~oì ¾ ’íŒÒ&â_Ž ”?9½èSŽ ™Æ?Ž ”?:½èSþ ¯9‹Ä±ååå € p xx~®~‘½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ô½ôæ„÷×®ˆ'0¿ØŽ؆?¾Ø0 Ž ¿ؾ¿Ý®f® 'B½²®ƒ¿ßZ†94 à¾Ø0¿ãŽã‰M†?˜M_¾ã0½£$~…¾ß½u?'¿å¿í Ž¿å0¿íŽ¿Ûö׎Ú?¾å'~¿ç½&/%-¾å¿ëŽ¿á½J%½& % ¾á0¿á ê½Z ½Z~´½J$Ç~´¿éçè½%'®fÆå &Ž¿å~@¾ç0¿ç¼Ø'½J$Ö Û¾ç&~öضÙ?&½£$ ®f®ˆ&é¾ç¿Ø®f® 'Æ®få ' ¾í¼é'~¾é¿å¾Ø¿á½ê„焾å0¿å¾á0¿á&çö׎Ú?®f® &¾ÝÆ€O?Z¾Ý焾é?1?1¿Û ¿Ûö׎Ú?¾Ým„+0 ø¿ã¾é¼í'I¾Ø¿á_† ½£$÷á·â¶â?,¿ؾé¿ß?)¿éöâ¾ß½‰¾ãç„§0¿㮃¿í¾Ø&º~¾ã0¿㮄½u÷ᆠ4 à& ¾ã0¿ã •·ç_¾Ø?&½£$¶Ù·ç¶ç¾Ø?,¿ؾé?(¿éöáûç¾ß½‰¾ãç„§~”Žÿÿ¿ë¾Ý¿ß®„öí¶î½£&F¾í½uXXZ¾ë:¿å½AÊ€¾ãç„§ö׎Ú?®f® & üÛ®fí _9®füííüëíüåí ë½uXX¾ë:¿ë¾ß0~Æ9Æ ùÆ õÆ ñÆ íÆ éæ„÷×¾¿Ý®f® &~x½²ÆtŽó¿ñ¾Ý¿ïŽï?®f®Œÿÿ'~c®fæˆ÷ãÄøTTTÁ-Á#~‰Û÷Üö׎Ú?öãÄXXXX¾ݦ…ÿ'~®fo o Žóm„*~O¿ãŽ¿Ûö׎Ú?¾㮄* ö׎Ú?~O½u÷Ø¿å½%Sä„焾å0¿åöØZ÷Ø&å¾ã0¿ã À0?0?00¿á¾Ý¿㮟ã*~}½uØ÷Ù¿å¾Øöá¶â½£%M?.÷á·â¾ã0¿ã¾á&Ƚ›®f슀¾ãí„0¿ã¾ÝƆt?)¼ã' ¾ão„o äö׎Ú?¾ß~ ½›öÙðâ¶â¾å?(½‰¾ßç„§¾åö⽉¾ã瀧€¿ã~¯ö嶿޽£$9 ¾Ý?(þå„9ÄTFVFVD4YYYOFZ,ü‰M59¾å0¿åƆÿ½£9¾áöç¶è½£$ ¾á¿ç¾ë¿é9½AÄ|WW\4½AÄ?%59ZXX4½AÄ?%5O?*9¾ãöݶÞ?-½AŽó?)¿ß9¿Ûö׎Ú?¾ÝÆm„+ 0\Á:/õ2b~xÁ'÷9 ååå € € xx½ô½ô~¸~À~~ä~~ ~9~É~ò~Ž~&~@~]~]~ ®h¦”9êfçf9½7odƽ1]'Á'[*&ÆâÛ.&GÆ‚½1]' *&ÆÌÅ:&† ®f0?ÆÁ½1~Jf0?ªæd9®k¦”;' ' ®kl&l„¦”9Æ{ Å#'Æ€½³ ˜˜M„?4½Å€& 'õÅ@'?$ @?%Ä?®i®]' §„Z®il&l ?%âŠ0 âÄ?''4áb'®k®?¦a®k0?5*& ½?$ù?$õ†*2a9®h04˜M?59ƽ³®f0†?ƈ½1~4Á'-¾ ¶ ö¿?-?&A *?&¾?)ö ¶ ?/%ö¶?/$¶ ‹öÉ¿Aç§_ŒÆŒÆ5W9¦ …@&-„ $*¦?%$‰M¦ ?%¾¿ß®„'?/'¾ß0 î~«~®~±¾ß®'ð¿ᮟߌDK&~·¦ŸáJ®fæ Ä4¡à%<¾á0]'† ?(Z ÷¿á®'ºüá®fí¦ Š@§ ¦„?ЧþƦc®fç„9ÆŒÆŒÆ í®fæ ľᦄ·ã0¦ 4¡à$ à † ?(zã&í Õ~„4¦ …@'¦…'¦ „¿§ oo Æ ÆŒÆ5ç„9ÆŒÆÿŒÆ¿‘÷“¦…'~c… '~f„&~f–|–¦ˆ„·”'''~i¦ˆ…&–ìí®™¦…'|™¾‘ì ƒÿÿ&o o ® …'s™®¿­„‘$~l¾‘¦„?Š@§}“&~º¶”'~º˜}“*~=•¾‘¦æ®½£%}愾‘l&l¶”&Á'ÜÁ &}™/'}–&"|•†±•&ĽP 5}–&}•' 4½P5%$¶”&¶“' Á &½ž ¶—4«à·—½#$~]~¿˜Æ½#$6~]¶”&%}“' ¾‘®æ„Á '!}™,¾‘Œ&æ Å '  $~]½ž%ø~r}“&|˜ ¶”&ôö—P½#9˜Æ ½#%}™. Æ ½#%ƽ#9ÆE}“+ ÆH}“'ÆD˜½#$~]—O}“+¾‘榮0?.]'~oÿ$ùL‰M»—·—˜}“&|˜ ¶”'ô½#%E}“*~v~´}˜'4ÄðTTTT¾½ˆ5% ľ½ˆ9Ê0Á:%Ë9ö••Ê€˜ ƾ‘愌ÆŒÆ ŒÆ ŒÆŒÆŒÆÁ' 4¾­‘5¾‘ç„]'9z &}ÿ* †V· N†7L $>®ô®„† §„ 6Žÿ0'¶üôG$ööüõÄþ99†W· }ÿ*†7 ¶üý„_·üô† þ®ä2bn†~ù϶üý„?·üô†½ð}ÿ&«© ÛW˜M½ð ÐÁ & }ÿ*Ž0&ü9 »|ÿg}ÿ*¹†0·†³† ¯†«ÿg}ÿ*™Ÿ†9½ðÆO—Z&û ˆËÆ2O‹Z&û† ½ð‰M¤ Íååå€Pšš~­~©½½½Æ _÷ؿ֮¿Ô®fÆå'~¸†¤&~¼† ¥&÷½ò$~ÇÙß®fìí}Ø&†¤ˆ'''~Ã~ Û¾Ô†Ú¥'|Ú®fæˆÁ - ÁZ.½ü$~ǽ˜%_ Æ÷ܽ$~Ç}Ú'VÁ&½'ÝM&ZJ®fç§Ù?%愽ü$Æ~ÇÁ&½€~ÝÁ&%½€%ê®f®¿Ý®f榾Ý?/'œæ€¿ݽü%Ì çŽâá€'‰¶é¡„&õÁ &6®f®ç„}Ú'}Ü&½‡ ½€$~Ç}ß'~Ï}Ù'~ؽä®fo„_9½Ì'Á&|ß]*Ä'÷ÝÆ ½¯zÝ' ô½¯~,½$~Ç}Ø'ÁH' ½Ì' ÁE&|ß ÁD'½t Öà}Ø&n®f†¤ˆ&c†·Û½\%¾½i÷á&~à}ß'Á&ô}Ø'Á&ëzá' ½\%—½i½¯ î½\%нi}à&̽%äÁ &÷®fì£'m&jj~ˆÿ ›®fç„]9Æ ôÆ ½ä íÆ ÷®fæ„Á &ï}Ø&Æ æÆ âÆ ÞÆ Ú4¾Ô®­Ö59¾Ô®­„Ö9¾Ö†@ª„§¾Ô®­ Ö9¾Ö†€ª„¿  é½%$½t!$2d~àXXXX÷F½% ½t %èûFþ9À0%Ëé% Ë*Ë%Ë þ9}Û+½9½9¶à4«à·à94Á &½ò59Æ ½ü%Æ ½ü9®h榮?/9¾Ö榮}Û&M&ZJ½£94½˜%5瀽A®hç§9†·Ù59¾Ô†¥9 ÿ!€šš½½~©~~}¿ö†¥'~êìýø†¤&¾ø®­ ö®f†ª§o„_9¾ø†¥'↥' ®f† ¥'~f®f†¤ˆ''&¾?8'º~Ü®f†@¥'Sì ƒÿÿ'Kìˆ'F£ˆ'@®ˆÆ€:?$®f®ˆ?/?&%ð0?$®fçˆ#§ˆ$®ˆ?/%o€ ø®f† ª§?†ß¤§]'~Ü®foˆoˆ†¥&~® Œÿÿ&Q®f†À¥ˆ'~·úæ ®ˆ¿þ„øDDD-#~òü·ýŽû?öúÄXXXX¾þ:†ÿÆ?®fæ Žû?®fÆ ?'?"%~®f†ª§ç„]9Æ îÆ êÆ æ®Æå&®fo„_9®f?&[æˆÄøTTTÁ-PÁ"Ly÷zæ ¾¿{Žx?®fæˆÄXXXX¾{?'æ„Áÿ''¿y®fÆ ?'¿{Žy4Æ ?5®f?9®fç„9Æ õÆ ñÄ&~\÷š®„¿›¦„·¥®f®¿Ä' „æ„Ä4¡à&Ù¾›Æ?$~a½z¿£öšÄ':¾›ì „ÄÿýŸ¾ì ý¡„Äÿ³Ÿ'~iöšÄ&¾£ü¡í ö¥Ž¦?_9ƾ?%~e¾›öšÄ'ü¡í Æ :¿«¾:¿­Ž«Æ?ö¥Ž¦?¾£Æ½m¾Æ@?%"ö¥Ž¦?¾£†ÿ¡„&ƽm~ùÆ9Æ ùÆ õÆ ñ†ÿ?ö¥Ž¦?9¦ˆ‰M®ˆ¿©„HHHH?(ÄøVVV§÷¨9#€(úú~½ ¿ùÆå&~–†@¥ &~š®¿û®f†¥'¦ˆ„'~¾¾û†€¥&-~ž½ßo„_9¾û†¥'®f†?¤§†¤'&~‚~t| á¾û† ¥&~¢½è¾û†¥&~$®f½ÎÆ :Æ?$Á'Æ ? ?®f†¤&~‘~¦®f†¤' †€¥ˆ'~º†÷¤§oˆoˆÌÿÿí íoˆoˆìˆ!íˆ#®ˆ¿þ®fæ ®ˆ¿Žý?¾ì„*~ª®fí ¾Æ:m„+ 00Z&õ~ªì„„®fíˆ~=}'~=½ß?6'~km 'Æ :¿þ®f®¿Æ Žþ?&®f®¿þ®fÆ :¿ÆŽþ?~=®f®¦ ®f§ˆ?'üÁ 'øÁ '¬ ±¾û†@¥&~¢½è®f¦ˆ„§ˆ„&!¾û†¥&† †®fæˆÄø44«à§ˆ5'& ¾ûÆå&~¾¾ûÆå&~®f½ÎÆ :Æ?$Á&~®Á&~²Á&~¶Æ ? ?®f†ª§~É' ''~¾}'~=®f®¿®f®¿®fÆ :?$®fç§?%Æ:?$®fç§½ß?7üíüím„&~@†ª§~޾û†¥&~ž†`¤`&½è~‡®fç„]9Æ ôÆ ðÆ ìÆ èÆ äÆ àÆ ÜÆ ØÆ ÔÆ ÐÆ ÌÆ ÈÆ ÄÆ Àìˆ!£ˆÃX&92b ë®h†ï¤§9¾û®­ù$2b~Â9%€8úú½ ~~ƒS.}>@ÿÿÿÿ8°°Î~ýý COPY ROLLOUT9.LO:1,ROLLOUT.CM:0;WB N 6800 BLE-SIDED DISKETTE =RLOAD9:1 úEND CHAIN¶HHHHC„ð´'Æ1~â? $Æ0 õ¾&¾0¿Ž æÊ ç?'Æ Ø¿&½U? %Ô¦„@'5\&0æd®f¦ §€ ']'Z ò¶„·¦d4 à‰M¦c®f9Æ)~â¦*'..'*½ÈJ'wC'iL'b¿½ÍS&~>¿½ÍT''Æ2 É4ö'Ž.? 5.&5Ž? ? $~.½ð $¨4P¶·ü´ô³  ½R5Š~S¶„· ó¿|½R¾.Œ@L&õŽ.½ȼ&ê Òü´ôºúý ¾O †4Ž æÄßç?&'5M' ¶&Ž.? ¾0¿¾¿ÿŽþ_?Ž.9Á &4¶'Æ3~â¶+Æ4 ô¶ Š· Žÿÿ¿Ž ?& ?&Ž ? ~ä~KÆ:1!0¤4½ù5&¾9Æ ? ¾¿’Ž ???Ʀ„€0+* # €+".‹ 04ÆxyZ&÷»·5Z&Ð9 '€pýý~ Ž!dÆ?Ž­o„Ÿþ_Ž!_?¾!b®¿!5¼&%¾!b® ¿!8¼&ŽÄ¿!dŽ!‘¿!fÆŽ!d?'!†RŒ†I—½èS ùÆ? ¶ÿ'~ †U~ Hަ …@'ŽA¦ …@' ¾w'3Žf? ,Ž?%È?%ÄÆêçŽA?%·?%³Žf?%¬?%¨Ž!-? †=·/Ž®ÆO? ? _÷/÷¶„·Ž­Ÿþ¿!;Ž!?¿!=†0§„§ŽCM¿!HŽ!;?]&,¾!;ŸþÆŽ!??Á'†Á'†Á'†Á'† ‰M? ~ Ž!X? Æ€?#¶Š€·~  MDOS09 . !k!êWHAT?!k!hý½ååå )€ 0B01COMMANDSYNTAXERROR 0502NAMEREQUIRED 0603\0DOESNOTEXIST 1B04FILENAMENOTFOUND 0805\0DUPLICATEFILENAME 1A06DUPLICATEFILENAME 0D07OPTIONCONFLICT 3008CHAINABORTEDBYBREAKKEY 3109CHAINABORTEDBYSYSTEMERRORSTATUSWORD 1C10FILEISDELETEPROTECTED 2411DEVICENOTREADY 0E12INVALIDTYPEOFOBJECTFILE 0F13INVALIDLOADADDRESS 1314INVALIDFILETYPE 1F15\0HASINVALIDFILETYPE 1E16CONFLICTINGFILETYPES 2717INVALIDDATATRANSFERTYPE 2218DEVICEALREADYRESERVED 2319DEVICENOTRESERVED 2520INVALIDOPEN/CLOSEDFLAG 2621ENDOFFILE 2922BUFFEROVERFLOW 2A23CHECKSUMERROR 1524LOGICALSECTORNUMBEROUTOFRANGE 0725INVALIDFILENAME 2B26FILEISWRITEPROTECTED 2027\0ISWRITEPROTECTED 0928DEVICENAMENOTFOUND 0429INVALIDLOGICALUNITNUMBER 1230INVALIDEXECUTIONADDRESS 0A31INVALIDDEVICE 1132INVALIDRIB 1D33TOOMANYSOURCEFILES 1634INVALIDSTART/ENDSPECIFICATIONS 1735INVALIDPAGEFORMAT 1436FILEEXHAUSTEDBEFORELINEFOUND 2837ENDOFMEDIA 1838INVALIDLINENUMBERORRANGE 1939LINENUMBERENTEREDBEFORESOURCEFILE 0240DIRECTORYSPACEFULL 0341INSUFFICIENTDISKSPACE 1042SEGMENTDESCRIPTORSPACEFULL 2C43INVALIDDIRECTORYENTRYNO.AT\8 2D44CANNOTDEALLOCATEALLSPACE,DIRECTORYENTRYEXISTSAT\8 2E45RECORDLENGTHTOOLARGE 0C46INTERNALSYSTEMERRORAT\8 2147INVALIDSCALL 2F48CHAINOVERLAYDOESNOTEXIST 3249CHAINABORTEDBYILLEGALOPERATOR 3350CHAINABORTEDBYUNDEFINEDLABEL 3451CHAINABORTEDBYPREMATUREENDOFFILE 3552SECTORBUFFERSIZEERROR 3653INSUFFICIENTMEMORY åå$-€$@% $0300  _"õ##g##)1#]  "Æ_"Ý"ß#8 SYNTAX ERRORSYSTEM SECTOR COPY ERRORDIRECTORY READ/WRITE ERRORSOURCE FILE COPY ERROROBJECT FILE CREATION COPY ERRORCANNOT DELETE DUPLICATE NAMEBACKUP FROM DRIVE X TO Y? APPEND FROM DRIVE X TO Y? DISK NAME: DATE(MMDDYY): USER NAME: NO FILES TO COPYDELETE FILE NOS.: NEW NAME: STARTING TO COPY FILESINVALID TO COPY/VERIFY FROM DOUBLE TO SINGLE SIDEDENTER FILE COPY SELECTION COMMANDS: SAVE (S), DELETE (D), PRINT (P), QUIT (Q), NO MORE (CR)S, D, P, Q, (CR):. NOT FOUND .SECTOR  OFFSET  DRX- DRY-COPYING . - DUPLICATION: IS IT TO BE COPIED? NOT COPIEDCOPYINGMDOS SY OV0OV1OV2OV3OV4OV5OV6ER Î °Ž OÆ?žþŸw½.i×)½.i×1–)Á & & Æ1×1†0—) —1 ö &×1 îÖ1Á0&~$è–)4¡à'õ·!”·!¯·#÷!™÷!´÷# „—)—Ä×1ׂžw¦„0 'ø '*;&f¦„0ŸYŽ%E¡„' 000Œ%o&ñ L®­„žY Þ2a2a–!+Ž!‚&Ž!½0ŸŽ Æ? ¦„Y'?–)—½èu– —–1—½èu– —€–!.~%o~'¼Æ ? ~1ËÆ? ~1Ë–!&îJ—!9–!&æL ö–!&߆  — 9†€ ÷ %9 #†—(9 &9 "9 $9–'&¹ 'ÆŽ#U¿ Ꭰá~.™–'&¥ 'Æ Ž#J ê $ö $A$þC%D% I%L%N%R$÷S%U%!V$ïY%$Z%8–+–€*~1¤¾0–$&Ž€½/‹Ÿ9Ÿ7Ÿ/ŸQ¾0ŸMÆ??$„€HYI—O×PžO !*DV—O×P„DVF›NÙM×S—T_†?/"n–!+½/– ŽŸ*ŽŸ,½&ÂŽŸ*ŽŸ,½&Â%FžMŸQ -Æ4½&Â5%5Z&ô–$'4ŽŸ*žOŸ,Žº–+ŽŒÖ,–-?-$?)Ÿ,ŽŸY½&žY&è~1¼~1²~1žÖO–PTFTF—[—\ŽŸYŸ*ŽŸ,ž9¦„ÆHZ&ü—;Æ×< <&ž90Ÿ9¦„—;†—<žY0000ŸY;$ž,0000Ÿ, \& ž,' ½&ÂŽŸ,–[—\žYŸ*žY *ŒÐ&­ž,'½&Â~1¼Œ¤ ï? $~1¼ž*Ÿ2Ÿ_ž,Ÿ4ŸežQŸ/Ÿ7Ÿa–—)½0­OI—i–!+&–˜€*–&–&žQ½.QžQ†€?(½.Q½0Ù%i9–‚—)ž_Ÿ*žSŸ/Ÿc½0­OIšigÆ€Ža?&ž_0Ÿ_že0Ÿe&çþ94–˜€*–_&–`'&ÁC%N–g&Ƈ?# gŽ ±½/Ž"ë½0e–"&454†€4 à—hŽ ½½.üža00¿ µŽ µ½.üžc0¿ ¹Ž ¹½.üŽ"÷½0ežc0Ÿc5Z'~'+~'2½(D–!D$½/–½(z½(é½)©Æ?]&j?$„€HYI—O×PÚO'[–!D$Ž#gŸYŽ#aŸ[ÆŽY?Ž#]½+ÀžYŒ#‚&çŽ"½0ŸYžGŸZœI'¦ ª' „§ ½+À Y? %žZÆ ?' ß–Y&Ž!ß½0Ÿ~1¼½1žŽd.ŸCŽ'ŸEŽ€ ?$žE爧ˆ‹É爧ˆŽ€ŸKŸ/Ÿ79~/‹ŽŸ2ŽŸ4ž7†ü§„†=0o„J&ù0†§„†A0o„c„J&÷–€+ž7½.Q½0Ù%4ŽŸ2½0Ùž7Æ€O?ŽŸ2Æ4½0Ù5%Z&ôŽŸ*Ÿ2½0­%½0Ù%9~1²žE–Š0§„oˆ0¿ ;0ŸGŸyÆžE?%8Ž#gŸ_Ž#aŸaÆŽ_?Ž ÍÆ ½.¹]'Üž_Œ#‚&⎠½/‹žE0ŸwÆ Žw? ÀÁ'½1«¾0ŸIœG'T†—cdžGŸ_Æ ?'œI'8Ÿa00ÖcÁ'ž_¦„¡ &0Z&õ #Æ ×dž_4¦„æ § ç„05Z&ïža ¾–d&¶†‘c&®9žGœI&9fŽ"X½0ŸŽ"´? žCÆc? ¦„æ 'Á &P'Q&½1Ë~+§½- Ö~*²½+§†ÿ—`_žG¿ Ý `Ž Ù½.üŽ Ý½.åžw¿ Ý0æ„Áª'žy0æ„Ä焎"ܽ0e _¾ ÝœI&Ì–_&Ž!ß~0ŸŽ!ð½0ŸÆcžC? ab0ŸUb½/&'WÖXÑ`"Z b'Ñc%R×d ×c×d b-'ß4–a'!_–cHY?%?1?1?*žG?)–dcLÆªç Æ ?'J&õ5,'° &–a&” ažC žžC¦„ &9½-~*1Á '~+‘S'D&õ—e_žC0¿ ÑŽSA¿ –· † · ½.ÙÅ|&m]*Å'f4¶ ‘5&[4–_'}T$ 4Ž Æ½+–5T$† ± '· Ž Æx`žGŸaŽ ŸcÆ žc¦„0Ÿcža¡„'*�ŸaZ&ç0–eS'†ª  ?¦„Š€—f§„ `0 ?'ŸaœI&¼–`& Ž Õ½.åŽ"ƽ0e5,&~*Ì & –_& _~*Å~)¸½- ø¦„ &†*?90Z&ð9–f'žGƪ† œI' m +ç ?( ò9Ÿw¿ Á¦ „§ žE–Š0§„0ŸyÆ Žw?Ž Á½.å–&&Ž#½0eÆžE?%}® Ÿ*ŽŸ,Ÿ4žKŸ/Ÿ=½0­%gŽŸ_½.#žA' Ö_–`?)Ÿ_Ÿj ížEÖ_–`爧ˆ–‚Š0§„æ ¦×l—mÆ?%~-"Á'~,ü–!D%ø† ·#$Ž#–'+½0e ½0Ÿ†·#$–'+8' 9Æ€Ž!.~1·žCÆc? ¦„N'ëY'½- ý-Ž"? žCo„0Æc? ¦„ &žEÆ?%D½-Æ?%C g0¿ ÑžE® ¿ ½.Ù]&à &¿Ž Ÿw¿ ÁžE0ŸyŽwÆ ?Ž Á½.åžE½-~,>Ž!eÆ‚~1·ÆŽ!E~1·Öj–k爧ˆÖl–mç §9Ž í½0ŸÆ†?#9¦ 4žIŸ/Ÿ7žE® Ÿ*Ÿ2–‚—)½0­%¿žK¦„+00 öæ4žI¦„+00 ö5§„ç5„&žKÆu?'ŸwžI?'ŸyÆ Žw?½0Ù %ÿy–—)žE® 0Ÿ2žKŸ=½.#ž?0Ÿ?žA0ŸA½.žAÖ_–`?/%½-Ú ÖO–P?/%½. äž_½-Ú½. Ú½.#žA&Óž4'½0Ù9Ÿ,?$žA?-ŸAž?Ÿ*?)Ÿ?ž_?-Ÿ_ž4?)Ÿ4½0­Ö,–-ÄTFV4‰M5ž/?)Ÿ/9½0ÙŽŸ4žOŸ_žIŸ/9ŽŸAž=½/r$9Ÿ? ½/r%öœn&ò?'ŸnžA?'ŸAž=00Ÿ= ã†>?(¦„„𧄆>0o„J&ù†§9Ž Ÿy† §„Žw?† ± '~$á± &øö Á ' Á0,~$èÁ3.ù9@ßrî„ßwîßyÞrᅫw?9@ßrî„ß{îß}Þrᅫ{?9Ž ¿ ÓŽ Ñ?9ƽ.™Æ.žyç„0ŸyÆŽw?9Æ Æ4¦·/ ¦·/!®„®„¿/Ž/½1Í59Æ Æ4ŸrŽŸW+½2%ŽW½2šX—XZ&ì—t54 à‰M–tžr]9ŸužU ŸužU0ŸU¦„žu9ñ 'ú9愦4ÄHYHY?%5‰MÄ|ËI9Æ?]&9½1žŽŸ*Ÿ2ŽŸ,Ÿ4½0­$~0b–%&~0O½-Ž!¸½0U'$0¿ ѽ.Ù]&ê &æž7ŸyŽ ŸwŽwÆ? ½-Ž!Än''Ʀ„?%î0Z&õ¦„ &ãž7Æ ?'ŸyŽwÆ? ½-Ž!Ó@'8_¦„ ' -ëz.ç0\ íÁ"Þ4ž7†?(ŸyŽw?†54 à'‰Mžy?½0Ù%9? Ž ŸwÆ? ]9½1²–#'6? %=?2¦„ ''0 òÖ(Z& 4Ž å?55Æ:×(?3'?40 Ò?5 ? %? ? %9~1¼ŽŸn@Ž ÅÆ½.™½èi$½1 &öž*Ö,–-?)Ÿ*nï¿9ŽŸn@Ž ÉÆ½.™½è$½1 %&ìž2Ö4–5?)Ÿ2nï¿9½1Ë–1'4'7-9#Rq½1Ë–o':ž œp&4 o&8Ö 'ç–4&]*Þ4 T$×4/ž0Ÿ@ž0Ÿ†—n5Yž 9†—ož Ÿpþž 9ž 0Ÿ žÆ€?'Ÿž Ö–Ÿ?.ž?)Ÿ9–4AÆ? 59Æ6? Ž"%ƃ Ž!Æ„ Ž úÆ…?#½0Ÿ–#' ('Ž ì?5 õ?]'/l&l¿2¾2¦„ #‹‹0m&jj®§„¾2 Z&ݾ294†d„fJ&ù594†hi„J&ù59A% 4‹¹5%€ 0% 4‹Æ5%„9åå 7€ ¿0300ïžþ¿*Ž,»¿*Ž*?'Å&~!/Æ Å&~')ƾ,¼ŒDK&~'-¿,¹ú,˜÷,˜Ž,à¿*Ž*?'Å& Æ Å'ÌÆ¾,áŒDK'Ï¿,Þú,˜÷,˜¾*_¦„0 '];' ò¦„0¿* 'L 'ñŽ, ¡„&6ê¾*D&á†=¡„&/Ž,û¿*Ž*4?'Å'u~')5 ',&¾*0 ´00m„&¾~'1÷,›Å'Å`'$Å@'Å &ŽUDÅ€'ö,˜Å'¼,¼''Å'¼,á'~'9Å&ùö,˜Å'¼,¼'í Å'¼,á'â˜MÄ Á &~'…'… &Æ ñ,à&ñ,é'銷,˜„'~$;Æ ñ,à&¶,»·,àñ,é&¾,Ä¿,éñ,á&Ž,¼¿*Ž,á¿*Ž*Æ?ÆtSõ,›'~'9ö,›ÄPÁP'ôÆ ú,²÷,²Æ ú,×÷,×½)¥$~'Tö,›Å 'Ž,Þ¿*Ž)ý¿*Æ Ž*?Ž,±?'~'?&ùö,›Å@'~"ëö,ÈÄ÷,íö,É÷,î¾,Ê¿,ï¾,Ä00¿,ó½'ÍÆú,×÷,׎,Ö?&¿?'},ó&},ô'±Á&­,ó,ô æ½'XŽ,±?&~"ØÁ &”ö,ÈÄÁ&WŽÿÿ¿,¿,ç¾,ÐÆ?'¿,ÒŽ,±?'~"èŽ*¿,õŽ*•¿,÷¿,ùŽ,Ö?&o¾,ÐÆu?'¿*Ž*‹¿*Ž*Æ ?Žÿÿ¿,çŽ,Ö?&Kö,›Å '"½'hŽ,±?'~'Ž)ý¿*Ž,Þ¿*Ž*Æ ? %½'b}* 'ÆBð* ½(U?¾,Ô¿,ùŽ,Ö?&~",~'¾*–¿,õ0¿,Ò¿,Ô¾*˜¿,÷Ž,Ö½'¬¾,÷0¿* ¿*½'XŽ,±æˆ#¦ˆ$¾* ?/%~#¼Ž,±æˆ¦ˆ ÷* ·*?'Á '~'Ž,Öæˆ#¦ˆ$¾*?/$Ž,Ö?&~$Á &ßö,ÈÄÁ'~"ÆŽÿÿ¿,¿,ç¿* ¾,ÐÆ?'¿,ÒŽ*¿,õŽ*•¿,÷Ž,±?&ªŽ,Ö?&£¾,ÐÆu?'¿*Ž*‹¿*Æ Ž*?'´½(’&ô ­Ž,Öæˆ#¦ˆ$¾*?/$Ž,Öæˆ¦ˆ ÷*·*?'Á ';~'¾* ¿*¾*¿*Æ€Ž*? $~"Æ?'½(’&í¾*¿* ¾*¿*¾* 0¿* ~#¾* ¿*Ž-a¿*Ž*ƽ.'Ž-W½(_~"Æö,›Å '~'9Å€'U¾¿,ž¾¿ÆŽ,û?¾,ž¿$Á&~'"Á&~'IÁ&~'=~'5ö,›Å'¶,4¶,œ42w¨4Ž ¿ÿú¾n„Æ ñ,à&Æ0÷,à½)¥$~'Tö,˜Å&~&\Ž,¼¿*Ž,á¿*Ž*Æ ?Ž,±?'~'?&ùö,ÈÄÁ'Á'~'A¶,›…'~'9…'Á&õÆ Á'ƶ,È„x4«à·,í¶,›…'Á&Ô†º,×·,× |*¶,›…@&KÆú,×÷,׎,Ö½)p'?'~'?&ù½'XŽ,±?'Á &ë~"Æ}*& ¾,µ¼,³'â|*¾,³¿,ÜŽ,Ö?&Ë ÐŽCN¼,Þ&~'-Ž+™¿,ÚŽ,—¿,Üö,›Å&|*½'¬½'X†½)bŽ,±?'4Á &’†½)bŽ,Ö?' Á &~"Æ~'¾* ¿*Ž-U¿*Ž*ƽ-Ž-J~$5}*&®¼,³'±†½)bŽ,Ö?'Á 'Ê~%H}*& ®¼,Ø'á|*¾,µö,³¶,´?.L·)ö¾,Úö,ض,Ù?.L±)ö$·)ö¾,µ¿*¾,Ú¿*ö)öŽ*? $~"Æ?'½(Û&í~%£ŽCN¼,¹&~'-~'9ö,›Å'¶,˜…',²·,²  †·,È |*,¼ö,˜Å' Æ ñ,é&ŽSA¿,éŽ,á¿*Ž,¼¿*Ž*Æ ?Ž,±½)p'?'~'?&ùö,ÈÄÁ' Á'Á'~'Aƶ,È„x4«à·,íö,˜Å&Ž,¼¿*Ž,á¿*Ž*Æ ?ö,›Å@'~%½'ÍÆ~%6Æ? ½'b?Æ õÆŽ,û îÆ êÆ æÆ âÆ ÞÆ ÚÆ ÖÆ ÒÆ ÎÆ ׎,àÆ ÃÆ6 ¿? $½'b?9Ž,±½'ö,×ÄÁ&Æõ,×&Žÿÿ¼,á'ú,×÷,׎,Ö½'9¿'ª?'Á'_? ¾'ª?'Á'_? 9Ž,ÖæÄüÊç½)p'?& ?&Ž-? 9~'Ž,àÆ?'9ö,íÅ€'~'MĶ,È„4¡à' '~'EÁ&ùö,˜ÄÁ&ö,íĶ,È„4¡à&àö,›Å'9Ž,á¿*Ž-'¿*Ž*Æ?¾,é¿-0ö,à÷-3Ž-'? Ž*Æ? ö*ÁY'ÍÆ€?#½'b?Ž(^?5Z&ø9Æ?#ö,›Å&? 9}* &¿(Æ÷* ½(U¾(?5|* ö* ÁB-* 94¾* ¼)÷'¿)÷¿)ùŽ-a¿)ûŽ)ùƽ.'Ž-W½(_54†€4 à·)ú)ùŽ-m¿)ûŽ)ùƽ.'½)%5Z94¾* ¼)÷'¿)÷¿)ùŽ-U¿)ûŽ)ùƽ-Ž-J½(_54¶)ö4 à·)ú)ùŽ-n¿)ûŽ)ùƽ-½)%5Z9¾*0æ„÷)ú)ùŽ-u¿)ûŽ)ùƽ.'¾*æ„0¿*÷)úŽ-}¿)ûŽ)ùƽ.'Ž-c½(_9µ,˜'¾* 0¿* 9¦H&¦ R&¶,™§¶,š§ ¦ Š@§ o„9¦U&ù¦ D&ó¶- §¶- ß¾0¿,п,õÆ??$„€HYIM&Á"9DV„DVF÷)ô·)õ»,Ñù,Ð÷*–·*—»)õù)ô?%0¿,Ò¿,÷¿*˜þ9ÿþ.í$ŸNCWB LV@D€M*š+˜DK0 SA*š+˜DK 0  LO**•VERIFY IN PROGRESSXXXXXXXX.XX:X EXISTS. OVERWRITE? RECORD XXXXXSECTOR XXXX OFFSET XX SRC-XX DST-XX]&~.l&l÷.#¿.%Ž.¿. †·.$¾.%¦„æŽ.o®à¢„%Ž.l ñë©„Ž.44¦‹0æ '0Z&û§„55Ž.l&ll&lj ,¾¯®¦„Ž.® m&jj®§„Ž.l&lj&Þ¾.%O9'èd ]'/l&l¿.Z¾.Z¦„ #‹‹0m&jj®§„¾.Z Z&ݾ.Z94†d„fJ&ù59~.”~.”½.˜~.”½.ª‰M$ A®„®„®„† §„A®„2a2anþ ò¿.õ¾.ñoo„†<§¾.õ9¿.õ¾.ñ¦„†4§†<§.÷.ø¦+ z.ø&÷z.÷&ò¦„%A®®„®„æˆÄÁ&„þ¾.õ9.jä°„ååå@€p 0300ï¿O—"—%—&žþ¿"ø¦„0 ',;' 'ð & 즄0 'Y& " ðS& % è 'äÆ 9† ·"OŽ"PÆ ?Ž"O¿"úŽ"ø?× ¶"O '„'/Æ ·"O– '…'Æ? ?…&† ±"O&±"X& &&æ† ±"O&"O"`½!pþ? $?Ž"OÖ!?$~!IÖ!Å&½!ò&á–%&¶"\… &Ö¶"\„À'Æ?#Ž#½""Ž#? DÖ!Å&$–"& Ž#½""Ž"ü? ? %CŽ"èÆ? ? %8¦„Y&œÆŽ"O?$Æ ? ?Ž#.½""Ž#.? –!J&~ ©¾"ø¦„ ';'~ H?–!J'Å'Æ€?#Ž#D½""Ž#D? ÔÆ ? ?Á&ö~!7O—#—$Æ Ž"P¦„4¡à  & # (– „&†—!9– …&†—#  #0Œ"X'¦„4¡à&ïŽ"X¦„4¡à& $ – …&†—$  $0Œ"X'¦„4¡à&ïŽ"P¿"êŽ"î¿"ìÆ Ž"ê?†—!9Ö#+Ž"P¿"êŽ"î¿"ìŽ"ê?&–$*O J'¾"X¼"ö ¶"X±"ö9¿"ìŽ"P¿"êÆŽ"ê?†.¾"ì§„¶"Xö"Y§ç†:§¶"OŠ0§9 "h"ç DELETE ? IS PROTECTED DELETED DOES NOT EXIST åååC€h 0300ï¿O—$—%—&—#L—-† ·$·$Ø$ކ0·$}Ž$~Æ ?žþ¿%üŽ$}¿%þŽ%ü?× _¾%ü¦„0 'A;&ô¦„0 '5E& ʆ ·$ ëA& ʆ ·$·$Ø ÛL&Ê ÓS&Ê Ë 'ÇÆ ×!ö$}÷$žÄ' Á/Æ~#M÷$}– …'Æ ðŽ¿%êŽ$é¿%ì4×½èu5Ž%é?$Æ~#MŽ$é¿%îŽ$®¿%ðŽ%îÆ?Ž$–½$IÆ Ž$}¦4¡à& ¦ 4¡à'~"ÀÖ Å&÷Å&óÆ×" Æ×"? $~#¹Ö"Ž$}?$~#5–#'½#è&ä–"J& –!…&¶$Š… &Ò &½#É–!„&~"®½$¾$ˆ¿%òŽ$Ï¿%ôÆŽ%ò½&ÛOö$Ž—'×(ž'¿%òŽ$׿%ôÆŽ%ò½&Ûö$}¾$ˆ¿%êŽ%i¿%ìŽ%é?$Æ~#MŽ¿$ÑŽ%iŸ'¦„+ „|‹Ž$Ñ?ž'00Ÿ'¦„*ë¾$Ñ–%Ö$?)Ÿ$¾$Ñ¿%òŽ$Ô¿%ôÆŽ%ò½&Û–!…&~"®¶%i*†@Æ‚?#Ž&F¿%îŽ$Û¿%ðÆ Ž%î?~"®Ž00¿$ÛÆ Ž$Ý?Ž%iŸ)¦æ„Ä—(×'Ž'†?ž'¿%òŽ$á¿%ôÆŽ%ò½&Ûž)¦„„ü‹—('ž'¿%òŽ$å¿%ôÆŽ%ò½&ÛŽ$·½$Iö$·Á 'Ž$·ö$è?Ž$ÜÆ½'ƾ$ÛŒ57&ž)¦+,†@Æ?#Ž&¶½$I ž)00Ÿ)¦æ„+? $~#¹~"Ž$·½$I–"…'~#Q~!_×+×,Æ Ž$~¦„4¡à& + – …&†—+  +0Œ$†' ¦„4¡à&ïŽ$†¦„4¡à& , – …&†  ,0Œ$ˆ'¦„4¡à&ï #Ž$~¿%îŽ&¿%ðŽ%îÆ ?~!Á&Æ€†@?#Ž&Q½$I rÁ'Æ ? h–&'ä–!„',ž$¿%òŽ&‡¿%ôÆŽ%ò½'ž$¿%òŽ&Œ¿%ôÆŽ%ò½&ÛŽ&j½$I–&—('ž'¿%òŽ&°¿%ôÆŽ%ò½'ž'¿%òŽ&´¿%ôÆŽ%ò½&ÛŽ&޽$I–!…'Ö-Z'½$a?Ž$~¿%îŽ$·¿%ðŽ%îÆ?†.·$¿¾$†¿$À9Ö++Ž$~¿%îŽ&¿%ðŽ%î?&–,*O J'¾$†¼& ¶$†±&9Ž%ö¿%îŽ$Å¿%ðŽ%îÆ?Æ.¶$ŠŽ$ÅH%ç„0Œ$Ê&ô¶$Š„ª„§„9–!…&? 9 -&†<—-Æ?49?2Ž& † Z'§„0 ÷†§„Ž& ?5?390  $é%hDRIVE : DISK I.D. : . !WDSCN0 *NO SDW'S* NO DIRECTORY ENTRY FOUND TOTAL NUMBER OF SECTORS : /$ TOTAL DIRECTORY ENTRIES SHOWN : /$ NO TERMINATOR FOUND IN FILE'S R.I.B. ]'/l&l¿'¾'¦„ #‹‹0m&jj®§„¾' Z&ݾ'94†d„fJ&ù59]&~'¯l&l÷'¿'ÄŽ'°¿'¿†·'þ'Ħ„æŽ'ºo®à¢„%Ž'ºl ñë©„Ž'º44¦‹0æ '0Z&û§„55Ž'ºl&ll&lj ,¾¯®¦„Ž'º® m&jj®§„Ž'ºl&lj&Þ¾'ÄO9'èd †«„Ч„‹Æ$ †0§„0Z&ë9  ååH€ $ 301!h èDK h ç UNIT=0 CHANGE BUFFERFILE= . CLUSTER ALLOCATION MAP DIRECTORY  PSN=0000 LSN=0000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  h"""X#R7#O>"°1"­"÷"”"S"("e"("}"( è h h è : SYNTAX ERROR MODE ERROR BOUNDARY ERROR INVALID SECTOR ADDRESS PHYSICAL MODE WHAT? Î!ó†—C†0—0/,7žþ½)@ /&–0„—½èu$ŽÆ? Ž#3? Ž Æc? +Ž Ÿ%–,'~'J½*Ù 'ß— Ž*í¡„'0000Œ+&ï~%æ×"®Ÿ#½*Ù—!B'C'D&1ŽŸ'ŽŸ) ŽŸ'Ÿ)Å'( /&, Å '‰M½*ÙÁB& & SÖ" ' &MÅ&EŽ#6Æ€~%1Ž#CÆ ö +Å'ëÅ&,½*S'âÖ"žHŸ'Ÿ) &Å'Ò ,&ÌÅ'Ƚ*S'à &¿žHŸ)ž#n„Ž Ÿ%½*W'/&–I"—( ,N~&BŽ#‰Æ„ Ž#UÆ‚,Î!ó?#? ~$-½)º–A—@½)/?ž%½)@~$-½)º ø½*Ù0-"3.4½*Ù &½)º5% 7—0„—½èu~$-Ž#6Æ€~%1–!D&–'&q–("kŽ?(Ÿ'½)æŽ#'Æ€½*‰¾"÷Ÿ3ž1Ÿ5†—7~$-Ž#6Æ€~%1–!Ö+&B''D')–7'-ž3–/'ž5 D&–'&–(" Ž?(Ÿ'½)Ú~$-Ž#6Æ€~%1Ž#dƃ ö½*W&"&'½*Ù‰M½*Ù"&½*Ù ÖI &Ž è˜MÆ€?7~$-Ž#6Æ€~%1-ž%Ÿ)–(Ž è?(Ÿ'¿#–N& N½*Ù &~'".ž)Ÿ%–.'½*Ó—I½*Ù &~'"&½*Ù. !†, ½*W&"&½*Ù"&½*Ù  '_ . ÅÖ-'ÖI¾#焾#0¿#,'ªÖ-&O4 '‰M½*Ù &0Á^'Á/&(0ö!ô¶!õ?/#$5^& 0ö!ö¶!÷?/" -ž'¿#~&dŽ#6Æ€~%1Ž#UÆ‚ ö/':^&00¿#ö!ö¶!÷?-?$—8Ž#½*­¾#0¿#Ž#½*­Ž#N? ~$2–8—(~&B,~$-@ †—@—A½)/–!Ö+&DB&~( C&~(D'ƒŽ"@½(÷† Ö/&†·"•Ž##Æ€½*‰ž3¿"÷ž5Ÿ1ž'Ÿ)–7&~(i~(WC&ž'½(è%YŸ'ž)½(è%P000Ÿ)–/'Ž#† Q–!D&?–'&3Ö)&/ž'0Ÿ1–(Ö*Á"!Ž?'Ÿ)Ž?(Ÿ' ŽŸ)ŽÿÿŸ1Ž#† Ž#6Æ€~%1†·"( †Ž#ƽ*‰·"•ž'Ö)–*?/$ –/'ÖŒÿÿ&Ñ–0·"$†—BŽ"½(÷½)æ$~(åŽ#½*±Ž#½*±Ž"ˆ½(÷?Ž gŸ9Ž"´Ÿ;Ž"åŸ=Ž# ½*­Ž9½*­ž90¦„Ÿ9 -z/†.ž=§„0Ÿ=ž;000–?L—?„&0Ÿ;M&Æ? %'Ž"¯½(÷–?€&¦ž'œ)'0Ÿ'–@&~(O B&ù½)/~(E~$-?1% ?1% /'09 @&? 9?2¦„ ''0 òÖCZ& 4Ž#+?55Æ:×C?3'?40 Ò?59 @' –CJ'Ž#2Á ô9ŸL½)º%`†0·"žL¿"ûŽ"¿"ý–0·"Ž ¿" Ž"û?Å&=¶"0-A3.=—0Å€&,Ž"ÿƽ*‰¾" ¿"a† ·!ùŽDK¿"Ž!ø?&?&\×/7þ9Ž#{? 9~)ÑÆ? 9–/'Ž!ø?& O—/—7?&þ9Ž!ø_? 9Ž##Æ€½*‰† OÖ/'<ž'¿" Ÿ1Ž!øM&? ?&ö"¶"ÄHYHYž'?)ö"¶"?-¿"÷þ9Ž!ø_? 9ž'¿"÷ž10Ÿ1Ö0Ž"öM&?9 ?:%9¶"ö4AÆ? 59Æ Æ4ŸOŽŸHu½+b%ŽH½+TšI—IZ&ìa—Q54 à‰M–QžO]94@ßJî„ßDîßFÞJᅫD?59Æ Æ4¦·*Ѧ·*Ò®„®„¿*ÏŽ*Ͻ+59ŸLž% ŸLž%0Ÿ%¦„žL9ñ 'ú9C%RF& L'Z7O%JQ%>R%ˆS'V7U%WW%Ä]'/l&l¿+D¾+D¦„ #‹‹0m&jj®§„¾+D Z&ݾ+D94†d„fJ&ù594†hi„J&ù59A% 4‹¹5%€ 0% 4‹Æ5%„  9åååO€H 0300￞þ¿$ZŽ$h¿$\Ž$Z?' Å'~"ä~"àŽ%%¿$\Ž$Z?'+~"úŽ%0¿$\Ž$Z?'*îŽ%&½#T%æŽ%1½#T%Þö%&'}%1'ñ%1&Ïö%2¶%3¾%'?/%¾$Z¦„ '};'0¿$Z ï¾$Z0¿$Z¦„ 'd 'îH&|%! åL&|% ÜN&|%" ÓF'~"è½#'$~"þö%D#øÁ„"ô÷%#¾$Z¦„ '.&·½#'%Ýö%DÁ #ÖÁc"Ò÷%$¾$Z~ Ž$i¿$ZŽ%W¿$\Ž$ZÆ?Ž%`¿$\Ž$ZÆ?ö$h÷%c¾0¿$}Æ??$Ž€?/$~#„€¾$}4†S±%&5&†?( ?)0¿$Ž$^?'~"×?&ùæˆÄÁ'~"î}%!'Ž%Í? Ž%fÆd? ?'¿%Ë}% ' †L·$‹†P·$ŒŽ$ƒ?'~"×?&ùÆSñ%&&¾%'¿$oŽ$›}%"'Ž$£¿$bŽ%¿$d}%"'Ž$›Æ?Ž$Ÿ¿$\¾%>¿$ZŽ$Zƽ%ÞŽ$^?':Á &/}%='}% '}%@' ö%$ð%@½$A½$?ÆSñ%&'ñ%1'~"ò~"öÁ '~"ׯLñ%&&<ö%>¶%?¾%'?/$/? %·¾%>0¿%>}%1&~!¬ÆLñ%1& ö%2¶%3?/$ì~!ë¾$o0 ì}%@&GŽ%T¿$\¾%;¿$Z0¿%;ÆŽ$Z½%ÞŽ%G¿$‡Ž%L¿$‰Ž$ƒ?&BŽ%M¿$‡¾%Ë¿$‰½#Ä&1ƽ$AÆ÷%@Ž$›¿$‡¾$`¿$‰Æ÷%=½#Ä&|%@ö%@ñ%$-%@~"5Æ? ½$?Æ Æ Æ ? ?Æ çÆ ãÆ ߯ ìÆ èÆ6 äŽ%4¿%A¿%)_¾$Z0¿$Z¦„ '0-9.\Á# ¾%)§„0¿%) ÕŽ%A]'½&†%å)ã}%C&Þþ†9O9æ„'h÷#ÃÁL'ÁS'9m&ù0¿%A¿%E_† ¡„'0\†L±#Ã'Á.Ü êÁ.Ö äŽ%A]'ΆL±#Ã'½&Ú ½&†)½%»ö%C¶%D¾%Eç„§ö#ÃÁL&®„'£þ9¾$‰ö$‡¶$ˆ?-0_¶%#?/$ ¾$‡J?(¿$‰¾$‡† ¡„' † ¡„#†%§„?$¾$d?/$?%0 á? $2a2a~!ðŽ$ƒ?9Ž$ƒ½$"Ž$^½$"9¿$??'Á'_? ¾$??'Á'_? 9Ž%Ý¿$‡Ž%Ý¿$‰Ž$ƒ4?5Z&÷9$›%DK0 SACNPB PAGE XXX XXXXXXXX.XX:X %eENTER HEADING:  ]&~&ol&l÷&‚¿&„Ž&p¿&†·&ƒ¾&„¦„æŽ&zo®à¢„%Ž&zl ñë©„Ž&z44¦‹0æ '0Z&û§„55Ž&zl&ll&lj ,¾¯®¦„Ž&z® m&jj®§„Ž&zl&lj&Þ¾&„O9'èd ]'G¿&×÷&Ùoo ¾&×HY%5HY%1«é%+HY%'§ç®„¦„¾&×l&l„?%_«§éç%z&Ù&ÆO9þ ù]'-¿' oo¾' ®„¦„¾' l&l„½' %00½',ª§Z&ݾ' 9A% 4‹¹5%€ 0% 4‹Æ5%„94†hi„J&ù59åååT€ 0300￞þ¿#ØŽ"¦¿#ÚŽ#Ø?÷#Ü'Å'~"Š~"*Å'ô¶"¦0-3/~"†Å& Æ ñ"¯&ŽSA¿"¯ö"¦÷"¿Ž"ÀÆ ?Ž"¿¿#ÚŽ#Ø#Ý?]'Ä'~"”ö"ÈÁ '|#Ýö"¦ñ"  ¿&¡Ž$¿#ÚÆ¾#ئ„ 'Y;'0¿#Ø ï¾#Ø0¿#ئ„ '@ 'îŽ#÷m„&~ $¡„'000 íZ,~ $4¦æ¾#Ú§„ç00¿#Ú5†º#Ý·#Ý ²¾#Úo„ö#Ý&~"ŠÄ'!ö#ÜÄÁ&~"”ö#ÜÄ'ö"ÀÁ 'ö"ÈÁ &èÆ Ž"®¶#Ü…' á„&0z#ô&õŽ"°…' á„&0z#õ&õ"·#öŽ"¦¿#ØŽ#Þ¿#ÚÆ Ž#Ø?Ž"¿¿#ØŽ#é¿#ÚÆ Ž#Ø?? $?Ž"Ø¿"»Ž#W¿"½Ž"¦ö#ÜÄ'Æ?]'#Á'Æ ? ?}#ö&Ò~"˜Æ?]':Á'òÆ ? ?Ž#ß¿#ØŽ"§¿#ÚŽ#Øö#ô'?&¢Ž#ç¿#ØŽ"¯¿#ÚŽ#Øö#õ'?&Š|#öö#ÝÄ'8ö#êÁ 'Ž#ê Ž"§¿#ØŽ"À¿#ÚÆŽ#Ø?ö#òÁ 'Ž#ò Ž"¯¿#ØÆŽ#Ø?¾"³¿"ÌŽ$¦„'m& º"Ì·"Ì00 ìC´"Ì ñŽ"¦¿#ØŽ"¿¿#ÚŽ#X¿"»Ž#׿"½ö#ÝŽ#Ø?]& ö#ÜÄ' ~!tÁ'Æ ? ?Æ Æ? ?Æ øÆ ôŽ#ÞÆ íŽ"¿Æ æ0 #X#×D@W€S N XÀå W€000†·ì°†·ì°†ÿ·7.Ž0i½6¬Ž4ã½6¬¶üõ¶üõ½6°Ž0NE'!¡„' 0Œ0i&ñ ×¶ì±¶ì±4½6ô5%έ˜ É?T1òS2R2zM2vP2'E0LL3D3ÑV3 Invalid command, select: T TO PERFORM A BLANK CHECK S to select a EPROM type R to read the copy EPROM M to read the master EPROM P to programm the copy EPROM E to exit the programm L to load the copy EPROM contents to memory D to dump memory contents into the EPROM V TO VERIFY COPY EPROM CONTENTS WITH MEMORY½6èOņÀ†»¶7.µ§¾9Ž4Y½6¬½6°0%ó5"ï„·7.9Ž4õ½6¬½6Ø2Ž5 ½6¬½6ؽ6èO|†w†r¶7.l g‰b0˜[M4b¦à+AX9† †4Ž4õ½6¬Î½6Ø2Ž5½6¬Î½6ؽ6èO†5¶7.  ‰0‰ûíM*924 Ž71ܧ€1?&÷5 Ž71Æ40½6´½6ʦ€½6¼3A1?'jä&ñ2a á5„† O4Ž4õ½6¬Î½6Ø2Ž5½6¬Î½6Ø4@Ž5'½6¬Î½6Ø15@½6èO†|†w¶7.q l‰g0b‰]OM*c2a92Î71¦à& :§€1?&÷90¡€'ƒ;1'¯Á§À¦§À1?&çƒ71'+Ž59½6¬¦Â½6¼Ž5K½6¬¦Â½6¼Ž5P½6¬ìý6ʃ71&Ö9Ž5\½6¬9Ž4õ½6¬Î½6Ø4@Ž5½6¬Î½6Ø4@Ž5'½6¬Î½6ؽ6èìä'Pƒ#Ì퉨†£¶7.¦b˜¦c“¦ÀŽ1?&÷|M+vM+ìbÃíbìäƒíä*¬2d9w2d9 Select type 0=2716 1=2732 2=2764 3=27128 4=27256 5=2532 your choice ? Enter command : Start address EPROM: Data: Number of bytes: Memory address: Data should be:was:at address  Data equal BUSY.....WAIT NO RESPONSE MICRO-PROM RESPONSE $82 EXPECTED BY CHECK¶ì°…'ù¶ì±94¶ì°…'ù5·ì±94Ž5û¡€'Œ6¬&÷Ž5ã½6¬5– Unknown error½6´½6¬5–ProgrammingEPROM not blankToo mutch data‚INVALID COMMANDƒEPROM TYPE WRONG„Data doesn't fit…Start address outside EPROM space†EPROM not empty‡EPROM will not proramm½ð'9½ð94½ð!59·7/4Ž7/½ð59ý7/4Ž7/½ð594Ž7/½ð$ûî„594Ž5i½6¬59OþƆþÁ†ÿþ¼þ¹½7¶ì°F$þ¢‚&þ9Žÿ0&ü9Ž5y½6¬9Ž5’ õ ,[€+0010ACIAEQU$FF00 0020‚ORG$E000 0030STARTLDA#3 0040‚STAACIA 0050‚LDA#$11 0060‚STAACIA 0070‚LDA#$FF 0080‚STATYPE 0090MAINLDX#T3 0100‚PRINT 0110‚IN 0120‚LDX#MAIN2 0130MAIN4CMPAX 0140‚BEQMAIN3 0150‚LEAX3,X 0160‚CMPX#MAIN2+27 0170‚BNEMAIN4 0180‚LDX#T1 0190‚PRINT 0200‚BRAMAIN 0210MAIN3JSR(1,X) 0220‚BRAMAIN 0230MAIN2FDB"t",TEST,"s",SEL,"r",READ,"m",MREAD,"p",PROG,"e",EXIT 0240‚FDB"l",LOAD,"d",DUMP,"v",VERI 0250T1FCB$D,$A,"Invalidcommand,select:" 0260‚FCB$D,$A,"ˆttoperformablankcheck" 0270‚FCB$D,$A,"ˆstoselectaEPROMtype" 0280‚FCB$D,$A,"ˆrtoreadthecopyEPROM" 0290‚FCB$D,$A,"ˆmtoreadthemasterEPROM" 0300‚FCB$D,$A,"ˆptoprogrammthecopyEPROM" 0310‚FCB$D,$A,"ˆetoexittheprogramm" 0320‚FCB$D,$A,"ˆltoloadthecopyEPROMcontentstomemory" 0330‚FCB$D,$A,"ˆdtodumpmemorycontentsintotheEPROM" 0340‚FCB$D,$A,"ˆvtoverifycopyEPROMcontentswithmemory" 0350‚FCB4 0360EXITEXIT 0370TESTCLRA 0380‚LBSROUT 0390‚LDA#4 0400‚LBSROUT 0410‚LDA#3 0420‚LBSROUT 0430‚LDATYPE 0440‚LBSROUT 0450‚LBSRIN 0460‚LBSRERROR 0470‚RTS 0480SELLDX#T2 0490‚PRINT 0500‚IN 0510‚CMPA#'0 0520‚BLOSEL 0530‚CMPA#'5 0540‚BHISEL 0550‚ANDA#$F 0560‚STATYPE 0570‚RTS 0580PROGLDX#T5 0590‚PRINT 0600‚INPAR 0610‚TFRU,Y 0620‚LDX#T6 0630‚PRINT 0640‚INPAR 0650‚CLRA 0660‚LBSROUT 0670‚LDA#7 0680‚LBSROUT 0690‚LDA#2 0700‚LBSROUT 0710‚LDATYPE 0720‚LBSROUT 0730‚TFRY,D 0740‚LBSROUT 0750‚EXGA,B 0760‚LBSROUT 0770‚TFRU,D 0780‚TFRB,A 0790‚LBSROUT 0800‚LBSRIN 0810‚PSHSA 0820‚LBSRERROR 0830‚LDAS+ 0840‚BMIPROG2 0850‚LBSRIN 0860‚LBSRERROR 0870PROG2RTS 0880MREADLDA#1 0890‚BRAREAD2 0900READLDA#0 0910READ2PSHSA 0920‚LDX#T5 0930‚PRINT 0940‚LDU#0 0950‚INPAR 0960‚TFRU,Y 0970‚LDX#T7 0980‚PRINT 0990‚LDU#1 1000‚INPAR 1010‚CLRA 1020‚LBSROUT 1030‚LDA#8 1040‚LBSROUT 1050‚PULSA 1060‚LBSROUT 1070‚LDATYPE 1080‚LBSROUT 1090‚TFRY,D 1100‚LBSROUT 1110‚EXGA,B 1120‚LBSROUT 1130‚TFRU,D 1140‚LBSROUT 1150‚EXGA,B 1160‚LBSROUT 1170‚LBSRIN 1180‚TSTA 1190‚BPLREAD9 1200‚LBSRERROR 1210‚RTS 1220READ9EXGU,Y 1230‚PSHSY 1240‚LDX#BUF 1250READ6LBSRIN 1260‚STAX+ 1270‚LEAY-1,Y 1280‚BNEREAD6 1290‚PULSY 1300‚LDX#BUF 1310READ4LDB#16 1320‚PSHSB 1330‚TFRU,D 1340‚CRLF 1350‚OUTH2S 1360READ5LDAX+ 1370‚OUTH1S 1380‚LEAU1,U 1390‚LEAY-1,Y 1400‚BEQREAD3 1410‚DECS 1420‚BNEREAD5 1430‚LEAS1,S 1440‚BRAREAD4 1450READ3PULSB,PC 1460VERILDA#1 1470‚BRALOAD9 1480LOADCLRA 1490LOAD9PSHSA 1500‚LDX#T5 1510‚PRINT 1520‚LDU#0 1530‚INPAR 1540‚TFRU,Y 1550‚LDX#T7 1560‚PRINT 1570‚LDU#1 1580‚INPAR 1590‚PSHSU 1600‚LDX#T9 1610‚PRINT 1620‚LDU#0 1630‚INPAR 1640‚TFRU,X 1650‚PULSU 1660‚CLRA 1670‚LBSROUT 1680‚LDA#8 1690‚LBSROUT 1700‚LDA#0 1710‚LBSROUT 1720‚LDATYPE 1730‚LBSROUT 1740‚TFRY,D 1750‚LBSROUT 1760‚EXGA,B 1770‚LBSROUT 1780‚TFRU,D 1790‚LBSROUT 1800‚EXGA,B 1810‚LBSROUT 1820‚LBSRIN 1830‚TSTA 1840‚BPLLOAD8 1850‚LBSRERROR 1860‚LEAS1,S 1870‚RTS 1880LOAD8TFRU,Y 1890‚LDU#BUF 1900‚LDAS+ 1910‚BNELOAD4 1920LOAD3LBSRIN 1930‚STAX+ 1940‚LEAY-1,Y 1950‚BNELOAD3 1960‚RTS 1970LOAD4LBSRIN 1980‚CMPAX+ 1990‚BEQLOAD5 2000‚CMPU#BUF+1024 2010‚BEQLOAD5 2020‚STXU++ 2030‚S TAU+ 2040‚LDA-1,X 2050‚STAU+ 2060LOAD5LEAY-1,Y 2070‚BNELOAD4 2080‚CMPU#BUF 2090‚BEQLOAD10 2100LOAD12LDX#T12 2110‚PRINT 2120‚LDA-U 2130‚OUTH1S 2140‚LDX#T13 2150‚PRINT 2160‚LDA-U 2170‚OUTH1S 2180‚LDX#T14 2190‚PRINT 2200‚LDD--U 2210‚SUBD#1 2220‚OUTH2S 2230‚CMPU#BUF 2240‚BNELOAD12 2250‚RTS 2260LOAD10LDX#T15 2270‚PRINT 2280‚RTS 2290DUMPLDX#T5 2300‚PRINT 2310‚LDU#0 2320‚INPAR 2330‚PSHSU 2340‚LDX#T7 2350‚PRINT 2360‚LDU#1 2370‚INPAR 2380‚PSHSU 2390‚LDX#T9 2400‚PRINT 2410‚LDU#0 2420‚INPAR 2430DUMP2LDDS 2440‚BEQDUMP4 2450‚CMPD#$400 2460‚BLSDUMP7 2470‚LDD#$400 2480DUMP7TFRD,Y 2490‚ADDD#6 2500‚LBSROUT 2510‚EXGA,B 2520‚LBSROUT 2530‚LDA#2 2540‚LBSROUT 2550‚LDATYPE 2560‚LBSROUT 2570‚LDA2,S 2580‚LBSROUT 2590‚LDA3,S 2600‚LBSROUT 2610DUMP3LDAU+ 2620‚LBSROUT 2630‚LEAY-1,Y 2640‚BNEDUMP3 2650‚LBSRIN 2660‚TSTA 2670‚BMIDUMP5 2680‚LBSRIN 2690‚TSTA 2700‚BMIDUMP6 2710‚LDD2,S 2720‚ADDD#$400 2730‚STD2,S 2740‚LDDS 2750‚SUBD#$400 2760‚STDS 2770‚BPLDUMP2 2780DUMP4LEAS4,S 2790‚RTS 2800DUMP6EQU* 2810DUMP5LBSRERROR 2820‚LEAS4,S 2830‚RTS 2840T2FCB$D,$A,"Selecttype0=2716",$D,$A 2850‚FCB"Œ1=2732",$D,$A 2860‚FCB"Œ2=2764",$D,$A 2870‚FCB"Œ3=27128",$D,$A 2880‚FCB"Œ4=27256",$D,$A 2890‚FCB"Œ5=2532‚yourchoice?",4 2900T3FCB$D,$A,"Entercommand:",4 2910T5FCB$D,$A,"StartaddressEPROM:",4 2920T6FCB$D,$A,"Data:",4 2930T7FCB$D,$A,"Numberofbytes:",4 2940T9FCB$D,$A,"Memoryaddress:",4 2950T12FCB$D,$A,"Datashouldbe:",4 2960T13FCB"was:",4 2970T14FCB"ataddress",4 2980T15FCB$D,$A,"Dataequal",4 2990INLDAACIA 3000‚BITA#1 3010‚BEQIN 3020‚LDAACIA+1 3030‚RTS 3040OUTPSHSA 3050OUT2LDAACIA 3060‚BITA#2 3070‚BEQOUT2 3080‚PULSA 3090‚STAACIA+1 3100‚RTS 3110ERRORPSHSD,X 3120‚LDX#ERROR2 3130ERROR5CMPAX+ 3140‚BEQERROR3 3150‚CMPX#ERROR4 3160‚BNEERROR5 3170‚LDX#T4 3180‚PRINT 3190‚PULSD,X,PC 3200T4FCB$D,$A,"Unknownerror",4 3210ERROR3CRLF 3220‚PRINT 3230‚PULSD,X,PC 3240ERROR2FCB0,4 3250‚FCB1,"Programming",4 3260‚FCB3,"EPROMnotblank",4 3270‚FCB$81,"Toomutchdata",4 3280‚FCB$82,"Softwareerror",4 3290‚FCB$83,"EPROMtypenotselected",4 3300‚FCB$84,"Datadoesn'tfit",4 3310‚FCB$85,"StartaddressoutsideEPROMspace",4 3320‚FCB$86,"EPROMnotempty",4 3330‚FCB$87,"EPROMwillnotproramm",4 3340ERROR4EQU* 3350TYPERMB1 3360BUFRMB1050 3370‚END åååA†ÿ— ƃ½¨Æ†½¨Æ‰½¨Æ½¨Æ½¨Æ½¨Æ½¨†€·D96 ½½ƒS½ƒœ%^D}ï+ó½„T½ u– ¥&½ƒd½—_½‡ï}'z½‡ê½`¶2„'%¶3„'¶4„'}®&¶õ£Æ½¨†ƒ½„H ¤†½„M 9Îÿ½ÿ¿D¶D„Š@·Dƽ¨½’ƽ¨  ;ƽ¨Æ½¨} 'c†µãÒ&}' R†ÿ— Þ½œëÎÿ7Æ„½¨Æ½¨ 7½ƒuîÿ7}9'þ7'kÞ½œ Þ½œ½—†—½š…†—ÞÆÿ½…`½œÍ D†µãÒ'†½„M}õ'†½„M½ƒ7}&kν’P½„T½ u†µãÒ&(†û½„H†@µãÒ&þ7'8 ÿ7Œ&}9' Þ½œë†ÿ— }'z} 'z }9&†µãÑ& ~‚Ù†ÿ—†—–ˆ€—Þ½“À†‘&½`†@µãÒ& ½žuD}õ&6z†@µãÒ&$}9&} &}õ&}' ÆÚ½¨ ~·~E½ƒœ$õ~}&ÅÎÿ7ÎÑÿ9ÎUÿ;½‰-ÞæVÄ÷9ãáÆÿ×÷ôƽ¨Æ½¨~€ÞæV+*}9&}õ& þ7 ÿ7} '} &~·~E|9ãá~€ãáÆ‡½¨†?´DŠ ·Dƃ½¨Æ†½¨Æ‰½¨Æ½¨Æ½¨~·ß½`}ï+ø}ï½—_}'zÞßþãÐÿEþãÒÿGÞ9†ºãзãІï´ãзãÐ967Þ†k½ˆŸö9'†W½ˆŸZ&øß329ß~„' 9½` 9½`%9Á&};'çÆƒ½„)ƽ„>þ< ÖÁ&}>'ÏÆ†½„)þ?ƽ„> ¾Á &}A'LƉ½„)þBƽ„>~ƒÁ&8Þ¼<& ƃ½„)ƽ„>~ƒ•¼?& Ɔ½„)ƽ„>~ƒ•¼B& Ɖ½„)ƽ„>~ƒ• 97ƽ¨Æ½¨Æ ½¨3½¨9†ü½„H½„M9´D ºD·D9þ•ÿîþ—ÿîþ™ÿîþoÿþqÿþsÿ9ÎãÐoooo†p§†§†6§†6§Îãà†oJ&ú†‚·ãàÎ ÿãæ†·ãᆷãáÎÿ &ýãཊ½‡©½’:} &½Ÿ€ÎÿïàÿïâÎ?<ÿïàÎ4ÿï⽄ú½«<½‹+9Î…_÷ïÚ¦·ïÛ\Á&òÎØ† §Œà&ø†3·ïÜ9uPR !`ÿ¶ãá…€'…'þãâ~†…'þãä…'þãæ¶ãÀ*~Š=¶ãÈ*~ŠÈ;†Q½ˆŸß¦„«'R¦„««'H]'EÆ ½†Œ%>×Þ¦„D—¦F—m+xy¦—¦—¦—†·ãá†À·ãà–+ †ß´ãзãÐ  =„—† ºãзãÐÎ_¦' G§ff Y ñÞÿãâãä÷ãå¶:Š€·:†ƒ·ãá 9ö:Þ 9†€µ:'2s}&*Ö½† ßÞ†€¥'Þ ß&¶ãЈ ·ãÐÞ¦„—¦—;¶ãЄ &OÆÞ½ˆH# –ÖÞ½ˆH#ᆠöø¶øÞ½ˆH" Ö–Þ½ˆH"Æö:Ä|·:ãá;Îø?OLá'&ö 9 9Á"$]'!67Z÷í†·íÆµí'Z&øþ톽ˆ2329 9Á"$]'!76†ß½ˆzß Îí ZX½ˆ³– §–!§Þ23 9 97ÄÁ0"E]'B367ZßÎî„xÄ6†]'ZH ù2DDD½ˆŸß Ε½ˆŸ26M*ê Sä çÞ çÞ32 9 39Á0"^]'[Á/Ë67ZßÎî„xÄ6†]'ZH ù2DDD½ˆŸ7äÎ#J½ˆŸ26¤]&26ª§33Ê€77 3C¤§3Ä77Þ332 9 967} &&Îî†oJ&úΕ†oJ&ú†0ß ½‡EJ&ù32Þ 9þ•ÿîþ—ÿîþ™ÿî Ü67~‡Æß Îm67Æß7½† ½ˆ)Þç§3 Z&ëÞ 329×1—2Þ19ß1Ö1–29ß17Ö1T×1Ö2V×2J&óÞ139ß1Ñ1.-‘29ß12Ò19ß1›2Ù19ß176›2Ù1—2×1Þ1239ß17Ö2X×2Ö1Y×1J&óÞ139×1—2ß3Þ1Ö3–4976_ß1›2Ù1—2×1Þ123976Oß1Û2™1×2—1Þ1239ß5½ˆâ½ˆ^½ˆ ½ˆâ]*½ˆ)Ê€Þ5967ß1s1s2†›2ÆÙ1—2×1Þ1329ß16—3–23—2–1‚—1Þ129ß17×3Ö2Ð3×2Ö1Â×1Þ1396ß"Þ7¦ß7Þ9§ß9Þ; ß;.ë2Þ"9ß"ÎO_vAvB$Û@™?FVvAvB &ïÞ"9HY—>×=HYHY›>Ù=976ß"†Þ''Lx(y'y&y%+!&í—$Î)Ʀ§Z&ø)*+,Î(Æ ¦¢§ Z&ö$Î(Æ ¦©§ Z&ö  y,y+y*y)t%v&v'v(z$&½Þ"239Î&ÿžÎ¤ÿ³¸£·À¢†·ãÀ·ãȆ·Æ·ãÀ†‘·ãȶãÉÎÿÙÿÛ9¶ãÀ…&>…'6}¢'1þž¦·ãÁÿž}£'þ  ÿ &£ &¢†ß´Æ·Æ·ãÀ}ã Á;}¸&½þ³öãÁçÿ³}·'þµ ÿµ&£·Î¤ÿ³ ˜Á 'Œ³&Æÿ÷¸ÆôÆ÷Æ÷ãÀ~ŠD¶ãÉÎÙm'ŒÝ' ô§;67ÿĶÙþÚÿÙöÜ÷Ûܽª þÄ329ÿÄ6}¢&Î&}£'þ¾ÿž†ÿ·¢† ºÆ·Æ·ãÀþÄ29ÿÄ6Τ}·'þ¾ÿ³}ãÁ¸†€ºÆ·Æ·ãÀþÄ296†´Æ·Æ·ãÀ2967ÿÄ}¸'½‹|}¹'½‹¸þÄ329Τ½‹ìΨÿºÎ&ÿ¼ÎŒÀÿݽ‹ÿ% ½‹+}ß& ½‹+Î&†§†§½Šÿß9΂½‹ìΆÿºÎ‘ÿ¼ÎŒ¨ÿݽ‹ÿ% Α}ß'½¦r ζ±½¥ð¹9ÿ7ÎÐÿ9Îÿ;½‰-9ÎŒ0ÿÇî¼Ð& þÇî¼Ò'þdž½ˆŸÿǼÝ&ß 9þÇî­9G DOŒÁG DIŒÈG AO G AIG TCWG TStG ST|G TM‘S IDºS DOÞS MMŽ HOLDŽABORŽ“BUZZŽ—REC1Ž›REC2ŽŸREC3Ž£RSETާLOADýSTARŽ«S IMŽÈG IM޽BACK޵MINBü Ε† ΆÿÇ·Ô½ŽñþÇæÿdžX6$†1Œ†0½)½"2J&í½ zÔ&Ú†½)ß 9ÎO ÎoÿǽŽñÆ}¹' ½ŒüΑÿ¼½¥ó~Œü67 ½"Z&ö½ 329þǦÿÇþ¼½¡ÿ¼9½ŽñÎÿÇÆÎÌʽ ÆÃÁ~ŒüÎ2†~ŒÍ½¶9þ¼½¡ÿ¼½ ~Œüþº† ¡&ƽe%þÎÿ7½ÆÎ7ÿǽ2~Œü9þº ¦ ' ÎÿÁ~€Æ½eþÎÿÁ~€Æ½Ž|%"öÏ'Á0"¦ &¦0'1&Ê€½†ö~ŒÁ 9ƽŽ|%÷¦ÿºà &$ÆþÎÿËþº½e%áþ˶ϧþËÿΆÿ·ýþ¼¶ν¡¶Ͻ¡ÿ¼Æ}Ã&ƽ"þΦÿÎþ¼½¡ÿ¼Z&è½ ~Œüþº¦ &½e% 9 9Æ Æ Æ Æ Æ Æ Æ Æ÷À|ß 9†ÿ· ~€%ÿ ·£9 %ûÿµ··|ß9ƽŽ|%ÿºþÎÿ¾½Ž|%þΆÿ99þ¼¶Ò§¶Ó§ÿ¼96† † 29ÞÆZ&û96† 29þ¼§ÿ¼9½Ã€0+ / +.€ 9 9å%HHHHÜ% ûÕ÷Õ9~867÷ÔÍÎϦ '$ ' ·%ÆxÏyÎyÍZ&ô»Ï·ÏzÔ*Ø … 32967DDDD‹09#‹§ÄË0Á9#Ëç329ÿË7Æ@Îÿÿ½¡`¶ãÀ ' G$ô¶ãÁ„þË39Z&䯽¨ ~€7öãÀWW$ù·ãÁ39¶D+9†éºS&ú´9'61&ðÕ½L€·Ö&½LzÖ' §¡& ï\'φ™·ãÁÎÿÿ &ý ~€9½L·×½L·Øþ×96½ŠÝ½‹aöÀ'2 öãжãÐ2&'SÄ' Á'Á "ÑC'×CÁ&7ƽ¨3À×D 9×CÖD&øÖC 967„&† D&† <&† 4&† , & ;&† &† & =&†@ 'J 32937]+ C´ãÒ·ãÒ32 9ºãÒ ô37]+ †÷´ãÓ·ãÓ32 9†ºãÓ ò37]+ †÷´ãÑ·ãÑ æ†ºãÑ·ãÑ Ü37†@]+ C´ãзãÐ32 9ºãÐ ô67ÿ†@µãÒ&,¶ &'þ½‘ž~‘˜67ÿ†@µãÒ&Î ½‘ž 67ÿþ32þ9ÿ!ÁÀ"Z„À&Á"Ë \Ê€ ëÀþ!½‘ç %@&þ!†½ˆŸ½‘ç €&þ!†½ˆŸ½‘ç  96„8DDD½ˆŸ†€Ä'DZ&üª§2967ÿÆ ÷öõ†ÿ·ôÎà†?oJ&úÎàÿÎëÿÎöÿÎÿÎ÷†oJ&úΛ†!oJ&ú329ßM67ˆŸßEÎIßIÎøßKÎø<ßTÞMî† ½ˆŸßG†—XÞT¦ÿ&+–XL—XÞGßGÞIßIÞEßEÞKßKÞTßT&Ó32ÞM 9—SÖXÁ/À½†  Î,ZX½ˆ³î½ˆ)ÞIç§ÞGîŒÿ'ªY6†½ˆzyY†½ˆ2–S'2½ˆÇ×Q—RÄ?]&'"# €Îø+–X½ˆŸ7潡3î Ú32 ÞK潆ö~’ƒ}Y& ½“…$ öÁ"ÖX½‘z ½“…$ öÁ"ÖX½‘Ž–S #ÎÞIæ¦ÞGî6†½ˆz†½ˆ22½ˆÇ–S &]+¥ ]* ÞKæÊ€½†ö œÞE$†&½ˆŸîÖQÄ–R½ˆH" 9}Q*†‘S'ó 9†‘S'ë öß_67†?½ˆŸßZ^†—]—\Ö\½‡Ex]& |]|^ÞZßZ|\†1‘\&à23Þ_9×aÅ€'F–]ÞZ¥ 'þ6&ö8Á# 67Æ÷8ÞZ¥'¥' Æ@Û\½‘z Æ@Û\½‘` ¥'Æ@Û\½‘ŽÎøS¦‘\' Œøc&ó ¦„€˜a„€æÄ½†ö967O·¼—nÎßs†·ïàÆd¶ïà*Z&ø¶¼Š·¼†?Æÿ|ïà|n ½•|ïà|n½•>Þs6–n…2&*Ûr™qGVŒ'%½•ÓÞsë©Ë‰GV§ç–n'ßs ¢—q×r ø§ç½•¥ 놷ïàÎÿ7Îÿ9Îÿ;½‰-}¼'  329ÎbÆ4÷ïá÷ïãÆ<¶ïâ„§÷ïã¶ïâ÷ïá§Œl' Û9Îb¦æßyŒl'¡-&á#¦æ ç åÞyooÎb¦æßyŒl'¡.&á$¦æ ç åÞyooÎl¦æ 멌b&õ9Ά@_à¢XI—o×pB,>-9†B_—o×p¶¼Š€·¼9†>_ î—q×r½•áÞs§ç9ÎO_vqvr$Ûp™oFVvqvr &ï@-†?Æÿ97ZÎ2½ˆ³ßuoXXνˆ³ßwæ¦Î+½ˆH#† Þuª§Þwæ¦Î+½ˆH# †Þuª§0'<Þwæ¦î½ˆÇ7]*ÆŒÆÞuêç3ÄΠ½ˆH"%Þu†ª§Ö…ZX&ÆSô5÷5Þw6H„½ˆŸ2î39Ö…ZX&Æú5÷5Æ€Û…½‘ŽÞwæ¦Î€½ˆH"†€Þuª§Þwæ¦Î€½ˆH"†@Þuª§Þu¦…ð& §„ DDª§ ÄÀÁÀ'–TTêÄ0Á0'ŒÄ &†ª§ ÄP&†ª§~–†67ßy¦'ÆîM+½ ; ½ŸËÞy¦'\îM+½ ; ½ŸËÞy\¦ ' î M+½ ; ½ŸËÞy23967½¡`Îoßþîß{–|—~}x~y}x~ y}x~y}–{—|{x|y{x|y{x|y{–~›|—~–}™{—}½”p5Æ×…½–߃~˜%Þæ¦Þƒ½ˆÇ×—€þÄm'Þ{–€½ˆH#}' 7Æ€Û…½‘Ž3þm'Þ}–€½ˆH#}'}9' 7Æ€Û…½‘z3½˜HÖ…Á''\Þß~—¶…&7Æ€Û…½‘zÆνšf3Á'\~—¶239~—À–…&_Þîß½¢S½¢ƒ[ÎSÿ7Î#ÿ9Î0ÿ;½‰-½™oÎ#ÿ7ÎWÿ9Îÿ;½‰-½š-Î;ÿ7Îkÿ9Îÿ;½‰-ÞŽÿí 9&_Þîß½¢ƒ½¢ƒ‹Îƒÿ7Î#ÿ9Î0ÿ;½‰-½™oÎ#ÿ7·ÿ9Îÿ;½‰-½š-Î;ÿ7Λÿ9Îÿ;½‰-ÞŽÿí"9Þîß½¢³½¢ƒ»Î³ÿ7Î#ÿ9Î0ÿ;½‰-½™oÎ#ÿ7ηÿ9Îÿ;½‰-½š-Î;ÿ7ÎËÿ9Îÿ;½‰-ÞŽÿí$9½¢Œ#+’Î’ÿ7Ζÿ9Îÿ;½‰-}–*x–t–½¢ŒK–– ½¢ŒO––}–*O}’+†·;·<9½¢Œ/'–½¢Š’––½¢Ž?––½¢ŽC’’½¢Š–’’½¢Œ3/–½¢Ž–›Ò–½¢Œ–+–½¢Š–7–½¢ŽG––½¢Š–’’½¢Š’;;9¶;* Îÿ;ÿ=ߎ &/¶<»='Îÿÿ;Îÿÿ=Îÿÿߎ ½¡°;Ž9Îÿkÿmÿ›ÿÿËÿÍÿí ÿí"ÿí$9þ…½šçÎ?ÿ7Îoÿ9Îÿ;½‰-þî|…½šçÎ?ÿ7Οÿ9Îÿ;½‰-þî |…½šçÎ?ÿ7ÎÏÿ9Îÿ;½‰-9ß΀–„?Ö‘¡&á'% ŒØ'†½ˆŸ ä߈îßžÞˆ†Ö…Z' Z'½ˆŸ½ˆŸÿ7Î’ÿ9Îÿ;½‰-½¢žž½¢’š½¢”C½¢–G½¢›Úšš½¢›ÞGG½¢›ÚCC½¢š›Ö?½¢›Úž–½¢Ž–šK½¢ŒšKO9Λâÿ7Îoÿ9Îÿ;½‰-Λâÿ7Οÿ9Îÿ;½‰-Λâÿ7ÎÏÿ9Îÿ;½‰-90ÿÿdé`ÿ0?À67ß§†½ˆŸß£Îø?ߥ¢Æ¦'M|¢Z&óÞ£–¢H½ˆŸß£Æ¢Þ£ |¢Z&ö32Þ§9ߣ7ÎøO–¢½ˆŸæÁÿ' †ÿÞ£î+½ ;Þ£3 Ò½ŸË öߥ7Îø/–¢½ˆŸæÞ£–¢H½ˆŸD‹î+ ½ ;Þ¥3~œ½ŸË õ67ÿã†9½ˆŸÿåΕÆÿçþå¦ÿåþç§Z&ë32þã967ÿãÎøæÁÿ'½†öŒø&ðþã32967ÿãmV+F†½ˆŸÿåÎøÿçŒø'3¦ÿ'#1þå¶齈Ÿå'Ε½ˆŸå& þçæÊ€½†öþçÿç Èþã329JéÆM' XJ]&ø|é ñ9½Ÿ;8½ž²þÿìΦÿîþÿìαÿî9Æ þì¦ÿìþî§ÿîZ&ë967ÿêsôþÿðþÿò}ô& þÿðþÿòþð† m&J&ø}ô&ƽ¨†ï½„H }ô& ƈ½¨†½„MÆ þòÿîþð¦ÿìþî¨ÿîþì¤&QZ&çþòöð¶ñ½ˆÿò÷ð·ñþðÆ oZ&ú}ô'þðÿþòÿ þðÿþòÿ32þê}ô'9~}ô'ÆÊ€½¨ÆÊ€½¨ ž½`%9Á&Ê€†µãÒ'Ä} &뽨 æÁ&Æ îÁ&67ÿê eÁ&φÿ· È67ÿêÎ ¦´û§÷û¦´ü§÷ü¦´ý'zö' O † ·öO§÷ý¦ ´þ§ ÷þO}ö&Æ ÷öÆ ªZ&úM')ÆõãÒ&"Î ÿìΛÿî½…ÆÊ€½¨ÆÊ€½¨3÷õ732þê967ÿêþ¦´÷§÷÷¦´ø§÷ø¦´ù§÷ù¦ ´ú§ ÷ú Ä67ÿÎÆ½†Ì\Á&øÎoÆçoŒ&óΆÆþ罈ŸŒq&ôþÁÿoÿqÿs32þ967ÿ½¡¦þ&O§§§þ§†(§þîöÄ?¶½ˆÇ7Ä÷)·*+,þ7ÿ'%&½‰þ3Ä€ú)ç¶*§¶+§¶,§oo32þ967ÿ½¡†ÿ§¶& †þ§†·þ„?·§¶§þ½†Ì32þ967ÿ_\Á&~¡½¡†µãÒ&†@µãÒ&¦„þþ&þ Z7ÿ7Î ÿ9Îÿ;½‰-þîÿþîÿ Î m+½¡8 hd|½¡8h f¦æþ§çþ¶ §¶§3îÁ#½†Ì~ {32þ 9½¡ÿ½¡$ÿ9Îo†½¡-9Ά½¡-97Z'½ˆŸ ø39ÿÆ ¦7ö3&© ¢§ Z&ëþ9}ãÒ+9Îÿîÿîÿîÿí ÿí"ÿí$|½ö9÷¾}ï+|À&|¿}ãÒ+î_}D+Æÿ÷ ~€0îî¦6¦6¦6O66¦„6¦60¦„@&7¦'†hiiiiJ&ój â¦*l&l¦*¦CæS§çl&lîî222§2§2220î11n0îîO666¦6¦6_760¦*¦C§¦C§l&l¦M&¦M'†dffffJ&ól â¦*¦Š€§îî22§222§2§2§0î11n   _ Æ Æ Æ0îîO6¦6¦6¦6¦60îîO6¦6¦6¦6¦6O66666660]'^Á'T Tm*)l&%l&!l&† ffff J&ôhfll)'if13îî2§2§2§2§† 1J&ü0î11]' n s m S ¨† c†_†§_f ffj'$ë ¦© §¦©§ffVf Ýç¦ èÄ€oHh«) F§†m'¯l 4*"6¦…ð2&€& †?§ Ý p l ‘Ä€Ê?†ÿl _O§§§oç æ ¹7† M†I†§¦ HæXj-1'@. ‹ ëË ß f fff9 ff f f 9. ” ] Y š ¦ Œ§ÖÞ¦ *† y¦*†q2&n¦« §¦© §¦© §¦ ©((§†f gfffJ&õll(iV ­ ¡ * * ¡ ¡§m *†! )åfiii i¦…ð&؆, Ò ( o Ò Ò q¦  §¦¢ §¦¢ §¦ ¢% Š ¦6_J&ü¦ªªª'3hY¦…ð&j)j ðlÊVf2 J&ü„9†hiiiJ&õ9Æo á I ­J&üccccl& l& l&l) Z&ü9 † † Ó Ï Ë† ffffJ&ôll 󠈠 Ü)Ø'Ö†df f f J&õd fffæ †6Xi i ihiiiঠ¢§ ¦ ¢§ ¦¢ §$  › — “ë¦ ©§ ¦ ©§ ¦© § l2J&¶†hiiiJ&õ¦è Ä€oHh   (* Á‹ »‹) ³ õ½¦r6¦'@ õ29ÎØÖ©–ª½ˆU÷)·*ÎPÿ'ÿAÎÿ+ÿ%½‰þ)ÿ?½‰KÎØöA¶B½ˆg967߯ީ ' '§ ½¦± '© †P½ˆŸß©œ­&½¦ÙÞ©½¦ÊÞ¯3296† ņ Á29óñï96† ½¦²=*&]&  åßµ¶=ö>à¢÷@·?îÿA½‰KÞµ}Ð&öA  yAé©92Ê%´^õ× § ›&/W²Šq¦˜îÒäÌRK .ã¶á q‘ ³d~#[ ×â'3 ìÎF+ dÿÿÿÿÿÿ΂oŒ‰&ø† ÆŒÎ‚½©¯†ÆÎƒ½©¯†XÆÎ…½©¯†<ÆÎ†½©¯† ÆÎˆ½©¯–¸·‰†Æ0΂·sÆ0ëçÆ0ëçzs'†.§ 憧9—µ×¶Ñ·"-‘¸"–¸µ—¸Ö·Ò¶×·–µÖ¶l Þ9¦_½‰n«6¦_½‰n«6¦'† «Æ÷t_½‰nHY·>÷=½‰w÷=·>þ=2½ˆŸÿ=¶>ö=zt&×9·ÍÎÄDDDD'Ë J ù ¶Í„' Ëd$|ÎJ ô¶ÍDDDD·Í&¶Î ¶Î Ëè‰zÍ&ö9Ϊ–sà¢%|s õë©7ÿtösË0Þ±çß±3þtŒª &Ó9 'èd M'ÞÄn}Ú'}& ½¬½«Ð† ·9½¦©Úε¢½¥ðη3½¥ðΪÕßÄ98,L€1-H-9·tη÷½¥ðη3½¥ðΪößÄ9½µ•)*Î;J' Î>J'ÎAJ&æ]'îß̶tΫ.H½ˆŸînζ±½¥ð~ªÃ«f°2°Í¾`³m´V´ÐÎØÿ«Î߀ÿ­¹½«f9æ×Èß¿—Á9¦ß¿Æ×É—È9†—Ú½¦©Ñß½¬þøˆ¦(*½¦rþø€†½«O† —ɽ¬õ½¦}þø„†½«O½¬õ½¦r½¦r½­Wþø‚†½«O½¬õ½¦}þøˆ†½«O½¬õ½¦r½¬§½«ÐΪ½ßÄ9½¦±ÎØ †½ˆŸ½¦Êþøˆ¦(*½¦r½­ø½¦}½®r½¦r½¦r½¯½¯R½¦}½¯š½¦±Îß0†2½ˆŸ½¦Ê9½¦±Î؆½ˆŸ½¦Ê¶D„&ƽ¦„ 0þ 4235ˆBEQ„CHTM11ƒBRANCHTOEXITIFCR 4236ˆBRA„CHTM04 4237* 4238*ENTERHEREAFTERKEYENTRY 4239* 4240CHTM03JSR„INDEC„CHECKIFDECIMALCHARCTER 4241ˆBVS„CHTM06ƒINCORRECTENTRY 4242CHTM04LDX„TEMP1 4243ˆSTAAƒ0,X 4244ˆSTX„TEMP1 4245ˆRETURNCHTM05 4246* 4247*ENTERHEREAFTERKEYENTRY 4248* 4249CHTM05JSR„INDEC 4250CHTM06BVS„CHTM12ƒINCORRECTENTRY 4251ˆLDX„TEMP1 4252ˆSTAAƒ1,X 4253ˆINX 4254ˆINX 4255ˆSTX„TEMP1 4256ˆDEC„R1 4257ˆBEQ„CHTM09ƒBRANCHIFHH.MM.SSAREENTERED 4258ˆRETURNCHTM08ƒSKIPTHE.INTHEENTRY 4259CHTM08JSR„OUTCH„DISPLAY. 4260ˆRETURNCHTM03 4261*TESTIFENTRIESARECORRECT 4262CHTM09LDX„#NUMBER 4263ˆLDAAƒ#1 4264ˆCMPAƒ0,X 4265ˆBLT„CHTM12ƒBRANCHIFTIME>19HOURS 4266ˆBNE„CHTM10ƒBRANCHIFTIME<10HOURS 4267ˆLDAAƒ#7 4268ˆCMPAƒ1,X 4269ˆBLT„CHTM12ƒBRANCHIFTIME>17HOURS 4270CHTM10LDAAƒ#5 4271ˆCMPAƒ2,X 4272ˆBLT„CHTM12ƒBRANCHIF>59MINUTES 4273ˆCMPAƒ4,X 4274ˆBLT„CHTM12ƒBRANCHIF>59SECONDS 4275ˆLDX„#NUMBER 4276ˆJSR„TIMSECƒRESULTINA,BANDINX 4277ˆSTX„NUMBER 4278ˆLDX„#M25…/CHANGESOK?/ 4279ˆJSR„PDATA 4280ˆRETURNCHTM11 4281* 4282*ENTERHEREAFTERKEYENTRY 4283* 4284CHTM11LDX„EDVECTƒRETURNADDRESS 4285ˆJMP„X 4286* 4287CHTM12LDX„#M7†/INCORRECTENTRY/ 4288ˆJSR„PDATA 4289ˆJMP„CHTM00ƒTRYAGAIN 4585ˆPAGE 4590CHDOƒEQU„*ˆCHANGESTHEDIGITALOUTPUTSINTHESTATUS 4595*ENTEREDWITHADDRESSOFOUTPUTDATAINOUTPUT 4600ˆINITƒSYSTAB+10,CNST10!  4605ˆJSR„NAMDSPƒDISPLAYDIGITALOUTPUTS 4610ˆCURPOSLINE3,0 4615ˆJSR„DOVAL 4620ˆLDAAƒ#1¨ 4625ˆSTAAƒDOBYTEƒUSEDASCOUNTER 4630ˆMOVEƒOUTPUT,DIGOUT,6 4635ˆCURPOSLINE15,0 4640ˆJSR„CLRDSP 4645CHDO1‚INITƒSYSTAB+10,CNST10 4650ˆLDABƒDOBYTE 4655ˆCMPBƒ#7‡ 4660ˆBEQ„CHDO3AƒBRANCHIFDONE 4665CHDO2‚DECB 4670ˆBEQ„CHDO3 4675ˆADDA2X#CNST80,POINTRPOINTXTOCORRECTENTRY 4680ˆLDAAƒCOUNT 4685ˆSUBAƒ#8 4690ˆSTAAƒCOUNT 4695ˆBRA„CHDO2 4700CHDO3‚LDAAƒCOUNT 4705ˆBGT„CHDO4 4710CHDO3AJMP„CHDO19ƒALLDO'SDONE 4715CHDO4‚CMPAƒ#8 4720ˆBLT„CHDO5„NROFDO'STOBEDISPLAYEDYET 4725ˆLDAAƒ#8 4730CHDO5‚STAAƒR6‡USEDASCOUNTER 4735ˆSTAAƒCOUNT„MAXIMUMIS8 4740ˆSTX„TEMPX 4745ˆJSR„NAMDSP 4750ˆJSR„PCRLF 4755ˆLDX„TEMPX 4760ˆDEX 4765ˆSTX„POINTRƒPOINTTODONR 4770CHDO6‚RETURNCHDO8 4775* 4780*ENTERHEREAFTERKEYENTRY 4785* 4790CHDO8‚CMPAƒ#$D†CR? 4795ˆBNE„CHDO7„ 4800ˆJMP„CHDO18ƒJMPFORNEXT8D.O.'SOREXIT 4805CHDO7‚LDABƒ#9 4810ˆCMPAƒ#$20…SPACE 4815ˆBEQ„CHDO17ƒBRANCHFORNEXTDO 4820ˆPSHA 4825ˆLDX„POINTR 4830ˆLDABƒ0,X 4835ˆSTABƒSAVE1„DONR 4840ˆLDABƒ7,X†DOTYPE 4845ˆSTABƒR0 4850ˆPULA 4855ˆLDX„#M18…/CLOSED/ 4860ˆCMPAƒ#'C 4865ˆBEQ„CHDO10ƒDISPLAYCLOSED 4870ˆLDX„#M17…/OPEN/ 4875ˆLDABƒR0 4880ˆCOMBŒCOMPLEMENTR0,BIT0 4885ˆANDBƒ#$01… 4890ˆSTABƒR0 4895ˆCMPAƒ#'O 4900ˆBEQ„CHDO10 4905ˆJMP„CHDO23ƒBRANCHIFERROR 4910CHDO10JSR„PDATA1 4915ˆLDX„#DIGOUT 4920ˆSTX„BUFPTRƒDATAPOINTER 4925ˆLDX„POINTR 4930ˆTST„R0 4935ˆBEQ„CHDO11ƒBRANCHIF1TO0TRANSITIONFORTHED.O. 4940ˆJSR„LOCK…CHECKTHEINTERLOCK 4945ˆBRA„CHDO12 4950CHDO11JSR„CONLCKƒCHECKTHECONDITIONALINTERLOCKS 4955CHDO12BCC„CHDO13ƒBRANCHIFNOERRORS 4960ˆJMP„CHDO24ƒINTERLOCKERROR 4965CHDO13LDABƒSAVE1„DONR. 4970ˆLDX„#DIGOUT‚POINTTODATA 4975ˆJSR„TSTBITƒGETTHED.O.BITINTHECARRY 4980ˆJSR„SETBITƒSETCORRECTDIGITALOUTPUTBIT 4985ˆLDABƒ#3 4990CHDO17JSR„SPACE 4995ˆDEC„R6‚ 5000ˆBEQ„CHDO18ƒBRANCHIFDONEWITHTHISLINE 5005ˆADDA2X#CNST10,POINTR 5010ˆJMP„CHDO6„NEXTOUTPUT 5015CHDO18INC„DOBYTE 5020ˆJSR„PCRLF 5025ˆJMP„CHDO1„NEXTOUTPUTS 5030CHDO19LDX„#M25…/ALLCHANGESOK?/ 5035ˆJSR„PDATA 5040ˆRETURNCHDO20 5045* 5050*ENTERHEREAFTERKEYENTRY 5055* 5060CHDO20CMPAƒ#'Y 5065ˆBEQ„CHDO21ƒBRANCHIFOK 5070ˆJMP„CHDO…TRYAGAIN 5075CHDO21LDX„#DIGOUT‚NEWVALUESINTHEOUTPUTFIELD 5080ˆSTX„SOURCE 5085ˆLDX„OUTPUT 5090ˆSTX„DESTIN 5095ˆLDX„#6‡LENGTHOFDATARECORD 5100ˆSTX„LENGTH 5105ˆJSR„BUFBUFƒMOVEDATATOCORRECTMEMORY 5110CHDO22LDX„EDVECT 5115ˆJMP„XˆRETURNTONEXTLEVELSUBROUTINE 5120*ERROR 5125CHDO23LDAAƒ#'? 5130ˆJSR„OUTCH 5135ˆLDABƒ#1 5140ˆJSR„LEFT…CURSOR1POSITIONLEFT 5145ˆJMP„CHDO6„TRYAGAIN 5150CHDO24LDABƒ#6 5155ˆJSR„LEFT 5160ˆLDX„#M24…/INTERLOCKERROR/ 5165ˆJSR„PDATA1 5170ˆJSR„PCRLF 5175ˆJMP„CHDO1 5180ˆSPC3ƒ 5185LOCKƒEQU„*ˆCHECKSTHEINTERLOCKANDCONDIT.INTERLOCK 5190*XPOINTSTODONRINSYSTEMFILE 5195ˆSTX„SAVEX 5200ˆCLC 5205ˆLDABƒ8,X†GETINTERLOCKNR 5210ˆBEQ„LOCK2„NOINTERLOCK 5215ˆLDX„BUFPTR 5220ˆJSR„TSTBITƒTESTOTHERD.O. 5225ˆBCS„LOCK4„BRANCHIFCARRYSETDUETOINTERLOCKERROR 5230ˆLDX„SAVEX„POINTERTOSYSTABENTRY 5235LOCK2‚LDABƒ9,X†GETCOND.INTERLOCKNR 5240ˆBEQ„LOCK4„NOCONDIT.INTERLOCK 5245ˆLDX„BUFPTR 5250ˆJSR„TSTBITƒTESTOTHERD.O. 5255ˆBCC„LOCK3„COMPLEMENTTHECARRYBIT 5260ˆCLC 5265ˆRTS 5270LOCK3‚SECINTERLOCKERROR 5275LOCK4‚RTS 5280ˆSPC„3 5285CONLCKEQU„*ˆCHECKSTHECONDITIONALINTER" LOCKSOFTHEOTHER 5290*D.O.'SWHENAD.O.ISDEACTIVATED 5295ˆLDX„SYSTAB+10THECONDITIONALINTERLOCKAREINTHESYSTEMFILE 5300ˆLDABƒ0,X 5305ˆSTABƒR1‡TOTALNR.OFD.O.'S 5310ˆINX 5315ˆSTX„TEMPX„POINTSTOD.O.NR 5320CONLC1LDABƒ9,X†COND.INTERL.NR 5325ˆCMPBƒSAVE1„D.O.NROFDOTOBECHANGED 5330ˆBNE„CONLC2ƒBRANCHIFNOTCOND.INTERLOCK 5335ˆLDABƒ0,X†GETD.O.NRTOCHECKITSVALUE 5340ˆLDX„BUFPTRƒPOINTTODATA 5345ˆJSR„TSTBIT 5350ˆBCS„CONLC3ƒBRANCHIFCOND.INTERLOCKERROR 5355CONLC2ADDA2X#CNST10,TEMPX 5360ˆDEC„R1‡ 5365ˆBNE„CONLC1ƒBRANCHFORNEXTD.O. 5370ˆCLCNOERRORS 5375CONLC3RTS 5380ˆPAGE 5385RCEDITEQU„*ˆRECIPEEDITOR 5395ˆJSR„CLRALL 5400RCP1ƒLDX„#M27…/ENTERSTEPNR/ 5405ˆJSR„PDATA1 5420ˆJMP„INSTEPƒGETSTEPNR 5425RCP1A‚BVS„RCP3…ERROR 5430ˆLDAAƒVAL1 5435ˆCMPAƒ#CR 5440ˆBNE„RCP2…BRANCHIFNOEXITREQUESTED 5445ˆJMP„JOB00„EXITTOJOBSELECTION 5450RCP2ƒLDABƒVAL1+1 5455ˆJSR„BCDBINƒCHANGEENTRYTOBINARY 5460ˆTSTA 5465ˆBNE„RCP3…ERROR 5470ˆSTABƒSTEPNO 5475ˆLDX„RECIPE‚ 5480ˆLDAAƒ#TOTSTP‚OFFSETTOTOTALSTEPNRBYTEINTHEHEADER 5485ˆJSR„AXA 5490ˆLDAAƒ0,X†GETTOTALNROFSTEPS 5495ˆSBA 5500ˆBGT„RCP4…BRANCHIFSTEPNRISOK 5505ˆLDX„#M23…/TOOLARGEANR/ 5510ˆBRA„RCP3A 5515RCP3ƒLDX„#M7†/INCORRECTENTRY/ 5520RCP3A‚JSR„PDATA 5530ˆJMP„RCP1…TRYAGAIN 5535*COMPUTESTARTADDRESSOFTHESTEP 5540RCP4ƒINX 5545ˆLDABƒSTEPNO 5546ˆINCBŒADJUSTSTEPNOFORADDRPTROUTINE 5550ˆLDAAƒ#STPLEN 5555ˆJSR„ADDRPTƒADDB-1TIMESATOXREG 5560ˆSTX„STEPPT 5565* 5570RCP6ƒCURPOSLINE1,0 5575ˆJSR„CLRDSP 5580ˆLDX„#M4†/‚STEP/ 5585ˆJSR„PDATA1 5590ˆPARAM‚#0,STEPNO,#DSPBUF 5595ˆJSR„STEPNRƒDISPLAYSTEPNR 5600ˆLDX„#M16…/(1)TIMEETC./ 5605ˆJSR„PDATA 5620ˆRETURNRCP6A 5625* 5630*ENTERHEREAFTERKEYENTRY 5635* 5640RCP6A‚CMPAƒ#CR 5645ˆBNE„RCP6B 5650ˆJMP„RCEDITƒEXITFROMTHISSTEP 5655RCP6B‚SUBAƒ#$30 5660ˆBLT„RCP6…TRYAGAIN 5665ˆPSHA 5670ˆCURPOSLINE2,0 5675ˆJSR„CLRDSP 5680ˆPULA 5685ˆDECA 5690ˆBEQ„STTIMEƒBRANCHIFTIMECHANGE 5695ˆJMP„RCP7…CHECKFORD.O.CHANGE 5700*CHANGETHETIMEINASTEP 5705STTIMELDX„STEPPT 5710ˆLDX„1,X†GETTIMEENTRY 5715ˆSTX„SECOND 5720ˆLDX„#RCP6CƒRETURNADDRESS 5725ˆSTX„EDVECT 5730ˆJMP„CHTIMEƒGETNEWENTRY 5735RCP6C‚CMPAƒ#$D 5736ˆBEQ„RCP10„EXITWITHOUTTIMECHANGE 5737ˆCMPAƒ#'Y 5740ˆBNE„STTIMEƒBRANCHIFTIMENOTOK 5745ˆLDX„STEPPT 5750ˆLDAAƒNUMBER 5755ˆSTAAƒ1,X†ANDSTOREIT 5760ˆLDAAƒNUMBER+1 5765ˆSTAAƒ2,X 5770RCP10‚JMP„RCEDITƒEXITFROMTHISSTEP 5775RCP7ƒDECA 5780ˆBNE„RCP8‚ 5785*DIGITALOUTPUTS 5790ˆLDX„STEPPT 5795ˆLDAAƒ#DOMSK1‚OFFSETINSTEPOFD.O.'S 5800ˆJSR„AXA 5805ˆSTX„OUTPUTƒADDRESSOFDATA 5810ˆLDX„#RCEDIT‚RETURNADDRESS 5815ˆSTX„EDVECT 5820ˆJMP„CHDO…CHANGETHEDIGITALOUTPUTS 5825RCP8ƒDECA 5830ˆBNE„RCP10„TRYAGAIN 5835*SETPOINTCHANGE 5840ˆLDX„STEPPT 5845ˆLDAAƒ#AIN04ƒOFFSETINSTEP 5850ˆJSR„AXA 5855ˆSTX„OUTPUTƒADDRESSOFDATA 5860ˆLDAAƒ#1 5865ˆSTAAƒRFLAG„SETFLAGFORRECIPECHANGE 5870ˆLDX„#RCEDIT‚RETURNADDRESS 5875ˆSTX„EDVECT 5880ˆJMP„SPRECPƒCHANGETHESETPOINTS 5885ˆPAGE 5890LOTNR‚EQU„*ˆCHANGESTHELOTNR 5900ˆJSR„CLRALL 5905ˆLDX„#M32…/LOTNUMBER:/ 5910ˆJSR„PDATA1 5915ˆLDX„RECIPE 5920ˆLDAAƒ#9‡SKIPFIRST9BYTESINRECIPEHEADER 5925ˆJSR„AXA 5930ˆSTX„RECIPE 5935ˆMOVEƒRECIPE,DSPBUF,15 5940ˆLDAAƒ#4 5945ˆSTAAƒDSPBUF+15 5950ˆLDX„#DSPBUF 5955ˆJSR„PDATA1 5960ˆLDX„#M33…/NEWNUMBER:/ 5965ˆJSR„PDATA 5970ˆLDABƒ#$20 5975ˆLDX„RECIPE 5980ˆDEX 598# 5ˆSTABƒ0,X†PUTSPACEBEFORETHELOTNR 5990ˆINX 5995ˆLDABƒ#15†MAX15CHAR. 6000LOTNR1STX„OUTPUT 6005ˆSTABƒR3 6010ˆRETURNLOTNR5 6015* 6020*ENTERHEREAFTERKEYENTRY 6025* 6030LOTNR5CMPAƒ#CR 6035ˆBEQ„LOTNR4ƒBRANCHIFDONE 6040LOTNR2CMPAƒ#CR 6045ˆBEQ„LOTNR3ƒBRANCHIFCR 6050ˆJSR„OUTCH 6055ˆLDX„OUTPUT 6060ˆSTAAƒ0,X 6065ˆINX 6070ˆSTX„OUTPUT 6075ˆDEC„R3 6080ˆBEQ„LOTNR4ƒBRANCHIFMAX.NUMBERLENGTHISENTERED 6085ˆRETURNLOTNR2 6090* 6095LOTNR3LDAAƒ#$20…FILLREMAINDERWITHCHARACTERS 6100ˆLDX„OUTPUT 6105ˆSTAAƒ0,X 6110ˆINX 6115ˆSTX„OUTPUT 6120ˆDEC„R3 6125ˆBNE„LOTNR3 6130LOTNR4JMP„JOB00„RETURNTOJOBSELECTION 6135ˆPAGEƒ 6140RCNAMEEQU„*ˆCHANGESTHERECIPENAME 6150ˆJSR„CLRALL 6155ˆLDX„#M34…/RECIPENAME:/ 6160ˆJSR„PDATA1 6165ˆMOVEƒRECIPE,DSPBUF,8 6170ˆLDAAƒ#4 6175ˆSTAAƒDSPBUF+8 6180ˆLDX„#DSPBUF 6185ˆJSR„PDATA1ƒDISPLAYOLDNAME 6190ˆLDX„#M35…/NEWNAME:/ 6195ˆJSR„PDATA 6200ˆLDABƒ#8‡MAX8CHARACTERS 6205ˆLDX„RECIPE 6210ˆJMP„LOTNR1ƒ 6215ˆSPC„3 6220TSTBITEQU„*ˆBITNRTOBECHECKEDINB-REG 6225*XPOINTSTOSTARTOFTHEDATA;EXITSWITHBITVALUEINTHECARRYAND 6226ˆPSHBŒBITNRINBREG 6230ˆCLRA 6235TSTB1‚STABƒBLOOP 6240ˆSUBBƒ#8 6245ˆBLE„TSTB2„BRANCHIFOFFSETISCORRECTFORTHISINPUT 6250ˆINCAŒBLOOPHAS(BITNR+1)MODULO8 6255ˆBRA„TSTB1„CHECKTHENEXTBYTE 6260TSTB2‚STAAƒR4‡KEEPTHEOFFSET 6265ˆJSR„AXA 6270ˆJSR„GETBIT 6271ˆPULB 6275ˆRTS 6280ˆSPC„3 6285GETBITEQU„* 6290*ENTEREDWITH(BITNR+1)INBLOOP 6295*SELECTSTHECORRESPONDINGBITOUTOFABYTEPOINTEDTOBYXAND 6300*PUTSITINTHECARRY 6305* 6310ˆLDABƒBLOOP 6315ˆLDAAƒ0,X 6320GET01‚RORAŒROTATERIGHT;BITINCARRY 6325ˆDECB® 6330ˆBNE„GET01„ROTATETILLREQUESTEDBITISINTHECARRY 6335ˆRTS 6340ˆPAGEƒ 6345SETBITEQU„*ˆSETSORCLEARSTHED.O.BITINTHECARRY 6350*R0=0CLEARBIT;R0=1SETBIT;MOVESBITBACKINTOBYTE 6355* 6360ˆLDABƒBLOOP„BITPOSITIONINABYTE 6365ˆLSR„R0‡BIT0OFR0INTHECARRY 6370SETB1‚ROLAŒMOVEBITBACK 6375ˆDECB 6380ˆBNE„SETB1 6385ˆSTAAƒ0,X„RETURNTHEBYTE 6390ˆRTSDONE 6392ˆSPC„3 6394FNDBITEQU„* 6396*ENTEREDWITH(BITNR+1)INB-REG 6398*SELECTSTHECORRESPONDINGBITOUTOFABYTEPOINTEDTOBYXBY 6400*SHIFTINGLEFTANDPUTSITINTHECARRY 6402* 6403ˆPSHA 6404ˆJSR„AXA†ADDOFFSETTOPOINTER 6405ˆJSR„TSTBITƒFINDBIT 6406ˆPSHBŒBITNR 6407ˆLDABƒBLOOP 6408ˆLDAAƒ0,X†GETBYTE 6409FND01‚ROLAŒROTATELEFT;BITINCARRY 6410ˆDECB® 6412ˆBNE„FND01„ROTATETILLREQUESTEDBITISINTHECARRY 6413ˆPULB 6414ˆPULA 6415ˆRTS 6416ˆPAGE 6417INSTEPEQU„*ˆGETSA1-3DIGITDECIMALNRANDSTORESITINVAL1 6418*ONERRORTHEOVERFLOWBITISSET 6419ˆCLR„VAL1+1 6420ˆRETURNINSTP0 6421* 6425*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6430* 6435INSTP0JSR„INNR 6440ˆBVS„INSTP3ƒBRANCHIFERROR 6445ˆSTAAƒVAL1 6450ˆCMPAƒ#CR 6455ˆBEQ„INSTP3ƒBRANCHIFCR 6460ˆRETURNINSTP4 6465* 6470*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6475* 6480INSTP4JSR„INNR…GETDECIMALCHAR. 6485ˆBVS„INSTP3 6490ˆLDABƒVAL1…GETFIRSTENTRY 6495ˆCMPAƒ#CR 6500ˆBEQ„INSTP1ƒBRANCHIFCR 6505ˆASLB 6510ˆASLB 6515ˆASLB 6520ˆASLB 6525ˆABA 6530ˆSTAAƒVAL1+1ƒTWOHEXCHARACTERSINABYTE 6535ˆRETURNINSTP5 6540* 6545*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6550* 6555INSTP5JSR„INNR…NEXTCHAR. 6560ˆBVS„INSTP3ƒBRANCHIFERROR 6565ˆCMPAƒ#CR 6570ˆBEQ„INSTP2ƒBRANCHIFCR 6575ˆLDABƒVAL1+1 6580ˆASLB 6585ˆASLB 6590ˆA$ SLB 6595ˆASLB 6600ˆABA 6605ˆSTAAƒVAL1+1 6610ˆBRA„INSTP3 6615INSTP1STABƒVAL1+1 6620INSTP2CLR„VAL1 6625INSTP3JMP„RCP1A 6630ˆSPC„2 6635INNRƒEQU„*ˆINPUTSDECIMALNUMBERORCR 6640ˆCMPAƒ#CR 6645ˆBEQ„INOK…BRANCHIFCR 6650INDEC‚JSR„OUTCH 6655ˆSUBAƒ#$30…CHANGETODECIMAL 6660ˆBLT„INERR„BRANCHIFERROR 6665ˆCMPAƒ#9 6670ˆBLE„INOK…BRANCHIFOK 6675INERR‚SEV 6680INOKƒRTS 6685ˆPAGEƒ 6690***************************** 6695*‚STRINGS‚AND‚CONSTANTS‚* 6700***************************** 6705M1…FCC„/TUBELEVELJOBSELECTION/ 6710ˆFCB„CR,LF 6715ˆFCC„/(1)‚TUBESTATUSDISPLAY/ 6720ˆFCB„CR,LF 6725ˆFCC„/(2)‚DIGITALOUTPUTSTATUSDISPLAY/ 6730ˆFCB„CR,LF 6735ˆFCC„'(3)‚STATUSCHANGE' 6740ˆFCB„CR,LF 6741ˆFCC„/(4)‚MAINTENANCECOMMANDS/ 6742ˆFCB„CR,LF 6745ˆFCC„'(5)‚RECIPECHANGE' 6750ˆFCB„CR,LF 6755ˆFCC„'(6)‚LOTNUMBERCHANGE' 6760ˆFCB„CR,LF 6765ˆFCC„'(7)‚RECIPENAMECHANGE' 6770ˆFCB„LF,EOF 6775M2…FCC„/‚STATUS/ 6780ˆFCB„EOF 6785M3…FCC„/‚BOAT/ 6790ˆFCB„EOF 6795M4…FCC„/‚STEP/ 6800ˆFCB„EOF 6805M5…FCC„/‚TIME/ 6810ˆFCB„EOF 6815M6…FCC„/PRESSANYKEYFORJOBSELECTION/ 6820ˆFCB„EOF 6825M7…FCC„/INCORRECTENTRY/ 6830ˆFCB„CR,LF,EOF 6835M8…FCC„/ID/ 6840ˆFCB„EOF 6845M9…FCC„/RN/ 6850ˆFCB„EOF 6855M10„FCC„/FN/… 6860ˆFCB„EOF 6865M11„FCB„$C1,$C2,$20,EOF/AB/ 6870M12„FCB„$C1,$CC,$20,EOF/AL/ 6875M13„FCB„$C8,$CC,$20,EOF/HD/ 6885M14„FCC„/ON/„ 6890ˆFCB„EOF 6895M15„FCC„/OFF/… 6900ˆFCB„EOF 6905M17„FCC„/OPEN‚/„ 6910ˆFCB„EOF 6915M18„FCC„/CLOSED/… 6920ˆFCB„EOF 6925M19„FCC„/STATUSCHANGE/ 6930ˆFCB„CR,LF 6935M16„FCC„/(1)‚TIME/ 6940ˆFCB„CR,LF 6945ˆFCC„/(2)‚DIGITALOUTPUTS/ 6950ˆFCB„CR,LF 6955ˆFCC„/(3)‚SETPOINTS/ 6960ˆFCB„CR,LF 6962M30„FCC„/…YOURSELECTION:/ 6964ˆFCB„EOF 6970M20„FCC„/„TIME=/ 6975ˆFCB„EOF 6980M21„FCC„/NEWTIME=/ 6985ˆFCB„EOF 6990M23„FCC„/NUMBERTOOLARGE/ 6995ˆFCB„EOF 7000M24„FCC„/INTERLOCKERROR/ 7005ˆFCB„EOF 7010M25„FCC„/CHANGESOK?/… 7015ˆFCB„EOF 7030M27„FCC„/ENTERTHESTEPNUMBERORCRTOEXIT/ 7031ˆFCB„CR,LF,EOF 7060M31„FCC„/RATIOERROR/ 7065ˆFCB„EOF 7070M32„FCC„/LOTNUMBER:/ 7075ˆFCB„EOF 7080M33„FCC„/NEWNUMBER:/ 7085ˆFCB„EOF 7090M34„FCC„/RECIPENAME:/ 7095ˆFCB„EOF 7100M35„FCC„/ƒNEWNAME:/ 7105ˆFCB„EOF 7110M36„FCC„/ENTERTHERECIPENUMBER(1-3)/ 7115ˆFCB„CR,LF,EOF 7116M38„FCC„/COMMANDMODE;LEAVETHISFUNCTIONBYTYPINGCTRL-A/ 7117ˆFCB„CR,LF,EOF 7120ˆPAGE 7125ˆEND FOLLOWS 0414LDX#32 0416IDL1LDAADSPBUF-1,X 0418‚ASLA 0420‚ASLA 0422‚STAAP3AAD 0424LDAAP3AAD 0426DEX 0428‚BNEIDL1D.O.NR 3800DOVAL1LDX„POINTR 3775ˆBEQ„DOVAL9ƒBRANCHIFNOD.O.'S 3761ˆJSR„INIT2„SETPARAMETERS 3760ˆLDX„SYSTAB+10DOPTR 3750LAY 0442CLRA 0444STAAP3AAD 0446BRAIDLE 0448PAGE 0450*‚THISSECTIONISSCHEDULED10TIMES/ 0452*‚SECONDBYTHEREAL-TIMECLOCK. 0454SPC1 0456TIMINTLDAA#$FF 0458‚STAAP3ABD 0460LDAA#$7F 0462STAAP3ABDKICKI/OTIMER 0464LDAAP3ABDCLEARINTERRUPT 0466LDAAP1AADREADDIGITALINPUTS 0468TABSAVEREADING 0470EORBLASTDICOMPARETOLASTREADING 0472STAALASTDISTORENEWD.I.VALUE 0474LDAAKEYCHG 0476BNECHKKBDBRANCHIFTHEREISAKEYSWITCH 0478*…POSITIONCHANGENOTYETPROCESSED. 0480BITB#$80 0482BEQJSRCTRBRANCHIFNOKEYSWITCHPOSITION 0484*…CHANGESINCELASTD.I.READ. 0486INCKEYCHGS% ETKEYSWITCHPOSITION-CHANGEFLAG 0488CHKKBDLDAAKEYBSY 0490BNEJSRCTRBRANCHIFKEYBOARDACTIVE 0492STAAKEYCHGCLEARFLAG 0494JSRSETBTHCLEARANYMULTIPLE-STROKE 0496*…KEYENTRYINPROGRESSANDSETTO 0498*…CURRENT-STATUSDISPLAY. 0500SPC3 0502JSRCTRJSRDIFCTRGOCHECKINPUTCOUNTERS/ 0504*…UPDATESTATUSBITSINDICHNG. 0506SPC3 0508*ƒ'DIFDUN'SETSBITSINDIFALTAS 0510*…REQUIREDTOSHOWANYCHANGE-OF-STATE. 0512SPC1 0514DIFDUNLDAADICHNG 0516EORADIFALT 0518ANDADICHNG 0520STAADICHNGSAVECHANGE-OF-STATE(0TO1). 0522TAB‚SAVEDICHNGVALUE 0524ORAADIFALT 0526STAADIFALTUPDATECURRENTSTATUS- 0528*…CHANGE-OF-STATE/ACCUMULATIVE. 0530BITB#$20 0532BEQPMPLIMBRANCHIFNOTAT2-TORR 0534*ƒTRANSITION(ABOVE-TO-BELOW). 0536LDAASTNDBY 0538ADDAMANSET 0540BEQDIFD01BRANCHIFNOTINSTANDBYOR 0542*…MANIFOLDSETUP. 0544LDAAMODFLG 0546BNEDIFD00BRANCHIFNOTINSTATUS(DISPLAY)MODE 0548JSRSETBTHELSE,UPDATEDISPLAYTOSHOW'/RDY' 0550DIFD00LDAAMODFLG+1 0552BNEDIFD01BRANCHIFREMOTENOTINSTATUSMODE 0554INCA 0556STAAPANELSETPANELSELECT 0558JSRSETDSPUPDATEDISPLAYTOSHOW'/RDY' 0560CLRPANELRESETSELECT 0562DIFD01JMPDICHEK 0564PMPLIMBITB#$08 0566BNEPLIM00 0568JMPDICHEKBRANCHIFNOTATPUMPDOWN-LIMIT 0570*…TRANSITION(ABOVE-TO-BELOW). 0572PLIM00LDAASTNDBY 0574BEQPLIM02BRANCHIFNOTINSTANDBY 0576LDAALASTDO+1 0578ORAA#$40 0580STAALASTDO+1OPENPV07TOEVACUATEMANIFOLE 0582PLIM02JMPDICHEK 0584PAGE 0586DIFCTRCLRA 0588STAADICHNG 0590LDAALASTDI 0594DIF01LDAB#$01 0596STABR0SAVEBITMASK 0598LDX#1GETCOUNT/LIMITTBLINDEX 0600BSRCHKCTRCHECKDOOROPEN 0602BRADIF02TONEXTCHECK 0604CHKCTRANDAR0MASKFAULTBIT 0606BNECKCT01BRANCHIFSET 0608CLRFLTCTR-1,XELSE,CLEARCOUNTER 0610COMBCOMPLEMENTBIT-SELECT 0612ANDBDIFALT 0614STABDIFALTCLEARBITINDIFALT 0616RTSDONE 0618CKCT01LDABFLTCTR-1,X 0620INCBBUMPFAULTCOUNT 0622SUBBFLTLMT-1,X 0624BEQCKCT02BRANCHIFATLIMIT 0626ADDBFLTLMT-1,X 0628STABFLTCTR-1,X 0630RTSDONE 0632CKCT02STABFLTCTR-1,XCLEARCOUNTER 0634ORAADICHNG 0636STAADICHNGSETFAULTBIT 0638RTSDONE 0640DIF02LDAALASTDI 0642LDAB#$02 0644STABR0 0646LDX#2 0648BSRCHKCTRCHECKOVER-PRESSURE 0650DIF03LDAALASTDI 0652LDAB#$04 0654STABR0 0656LDX#3 0658BSRCHKCTRCHECKPRESSURE=1ATM. 0660DIF04LDAALASTDI 0662LDAB#$08 0664STABR0 0666LDX#4 0668BSRCHKCTRCHECKPUMP-DOWNPRESSURELEVEL 0670DIF05LDAALASTDI 0672LDAB#$10 0674STABR0 0676LDX#5 0678BSRCHKCTRCHECKLEAK-CHECKPRESSURELIMIT 0680DIF06LDAALASTDI 0682LDAB#$20 0684STABR0 0686LDX#6 0688BSRCHKCTRCHECKPRESSURE<2TORR 0690SPC2 0692RTSCOUNTERUPDATEDONE/RETURN 0694PAGE 0696*D.I.READINGSCOMPLETE/PROCESSINPUTS 0698SPC2 0700DICHEKLDABDIFALT 0702LDAAABBUSY 0704ADDABAKFIL 0706ADDASTNDBY 0708ADDAMANSET 0710BNECKADIOBRANCHIFNOTIDLE 0712PSHB 0714LDABLASTDI 0716RORB 0718RORB 0722ANDB#$80 0724LDAALASTDO+1 0726ANDA#$7F 0728ABA 0730STAALASTDO+1SETPV08ACCORDINGTODOORPOSITION 0732PULB 0734CKADIOBITB#$02 0736BEQCKADI2BRANCHIFNOTOVER-PRESSURE 0738SPC1 0740CKADI1ANDBDICHNG 0742B& ITB#$02 0744BNECKAD1ABRANCHIFATOVER-PRESSURETRANSITION 0746JMPDECBAS 0748CKAD1ACLRAPROCESSANOVER-PRESSURE 0750STAALASTDO 0752STAALASTDO+2 0754STAABAKFIL 0756LDAA#$44 0758STAALASTDO+1 0760LDX#MSGOVR 0762JSRTRMSETSETUPTERMINATIONSTATUSMESSAGE 0764JSRSETSONTURNONSONALERT 0766JSRSETIDLGOSETUPIDLESTATE 0768JMPDECBAS 0770SPC1 0772CKADI2BITB#$01 0774BEQCKADI3BRANCHIFDOORCLOSED 0776LDX#MSGDOR 0778LDAAABBUSY 0780BNECKAD2ABRANCHIFRUNNING 0782ADDASTNDBY 0784ADDAMANSET 0786ADDABAKFIL 0788BNECKAD2BBRANCHIFNOTIDLE 0790ANDBDICHNG 0792BITB#$01 0794BNECKAD2BBRANCHIFATDOOR-OPENINGTRANSITION 0796JMPDECBASELSE,CONTINUE 0798PAGE 0800*…THEFOLLOWINGSECTIONIS 0802*…EXECUTEDFORLEAK-CHECKFAILURE, 0804*…OVER2-TORR,DOOROPEN,ORONANABORT. 0806SPC1 0808CKAD2AJSRTRMSETSETUPTERMINATIONSTATUSMESSAGE 0810LDAAPRCLNGGETPROCESSLENGTH(#/STEPS) 0812DECA 0814STAACURSTPSETTOLASTSTEP 0816LDAB#1 0818STABTIMBAS 0820LDXZERO 0822STXTIMCTRSETUPASTEP-ENDTIMEOUT 0824CLRHLDFLG 0826JSRSETSONTURNONSONALERT 0828LDAACNTABT 0830STAADLYABT 0832JMPDECBAS 0834CKAD2BCLRA 0836‚STAASTNDBY 0837‚STAAMANSET 0838STAABAKFIL 0840STAADLYSLO 0842STAALASTDO 0844STAALASTDO+2 0846LDAALASTDO+3 0848ANDA#$80 0850STAALASTDO+3 0852LDAA#$C0 0854STAALASTDO+1SHUTALLVALVESEXCEPT7,3 0856JSRSETBTHUPDATEDISPLAY 0858JMPDECBAS 0860SPC1 0862CKADI3LDAAABBUSY 0864ADDASTNDBY 0866ADDAMANSET 0868BEQCKABKFBRANCHIFINIDLE 0870BITB#$20 0872BEQCKAD3ABRANCHIF>2TORR 0874JMPDECBAS 0876CKAD3ALDABDLY2TR 0878BEQCKAD3BBRANCHIFNOCHECK-DELAY 0880JMPDECBAS 0882CKAD3BLDABMANSET 0884ADDBSTNDBY 0886BNECKAD2BBRANCHIFINMANIFOLDSETUP 0888*ƒORINSTANDBY. 0890LDXSTPINX 0892LDAB0,X 0894DECB 0896BNECKAD3CBRANCHIFNOTINPUMP/CHK1 0898JMPDECBAS 0900CKAD3CSTXVAL2 0902LDX#PRCBUF 0904JSRXSUB 0906BLECKAD3DBRANCHIFNOTJUSTSTARTED 0908JMPDECBAS 0910CKAD3DLDX#MSG2TR 0912BRACKAD2A 0914PAGE 0916CKABKFLDAABAKFIL 0918BEQDECBASBRANCHIFNOBACKFILLIN-PROGRESS 0920SUBA#2 0922BNECKABK0BRANCHIFNOTINBACKFILLCAUSED 0924*…BYEXCESSIVEPOWER-FAILDOWN-TIME. 0926LDAADELAY 0928BNEDECBASBRANCHIFDISPLAYUPDATE 0930*ƒDELAYCOUNTERISACTIVE. 0932LDAALASTDO+1 0934BGECKABK2BRANCHIFVENTOPEN 0936BITB#$04 0938BEQDECBASBRANCHIFNOTAT1ATM. 0940LDAA#30 0942STAADELAYSETFOR3.0'DELAY 0944LDABLASTDO+1 0946ANDB#$78OPENVENT(PV08) 0948STABLASTDO+1 0950BRADECBAS 0952CKABK0LDAADLY1ATGET1-ATMOSPHERECHECK-DELAY 0954BNEDECBASBRANCHIFCHECK-DELAYSET 0956LDAADLYABT 0958BNEDECBASBRANCHIFINABORT/PUMPDOWN 0960BITB#$04 0962BEQDECBASBRANCHIFNOTAT1ATM. 0964CKABK2CLRA 0966STAABAKFILSETBACKFILLDONE 0968STAASONLRT 0970LDAALASTDO+3 0972ORAA#$80 0974STAALASTDO+3TURNONSONALERT 0976JSRSETBTH 0978BRADECBAS 0980PAGE 0982*…ROUTINETOSETPROCESSIDLE 0984SPC1 0986SETIDLLDX#-1 0988STXTIMCTRTURNTIMEROFF 0990CLRA 0992STAAABBUSYCLEARPROCESS-ACTIVEFLAG 0994STAASTNDBY 0996STAAMANSET 0998STAACURSTPRESETSTEPCOUNT 1000STAAHLDFLGCLEAR' HOLDFLAG 1002STAADLYABT 1004STAADLYSLO 1006JSRSETBTH 1008RTS 1010SPC3 1012HOLDITLDAA#1 1014STAAHLDFLG 1016LDAATIMBAS 1018STAASAVBASSAVETIMBASVALUEFORRESTART 1020CLRLASTDO+3CLEARANYSOFTSTARTS 1022RTS 1024SPC3 1026SETSONLDAA#$8A 1028STAASONLRTACTIVATESONALERT 1030LDAALASTDO+3 1032ORAA#$80 1034STAALASTDO+3 1036RTS 1038SPC3 1040TRMSETLDAAABBUSY 1042BEQTRMRTS 1044STXTRMMSG 1046LDAACURSTP 1048STAATRMSTP 1050LDXTIMCTR 1052STXTRMTIM 1054TRMRTSRTS 1056PAGE 1058*„DECREMENTTHE10/SECONDCOUNTER 1060DECBASLDAANMIBSY 1062BNENMISETBRANCHIFJUSTRETURNED 1064*ƒFROMPOWER-FAIL. 1066JMPDEC08ELSE,CONTINUE 1068NMISETCLRNMIBSYCLEARFLAG 1070LDAACNT2TR 1072STAADLY2TRSET2-TORRCHECK-DELAY 1074LDABCOUNT3 1076BGTDEC00BRANCHIFINTERMEDIATEDOWN-TIME 1078BEQDECBA0BRANCHIF<1.0MINUTE 1080LDABABBUSY 1082BEQCKOTHRBRANCHIFNOTRUNNING 1084JMPDEC06AELSE,GOSETUPSHUTDOWNCOND'NS 1086CKOTHRLDABSTNDBY 1088ADDBMANSET 1090BEQDEC01CBRANCHIFIDLEORINBACKFILL 1092JMPDEC06BELSE,SETUPIDLESTATECOND'NS 1094DECBA0LDAACOUNT2 1096SUBALIMIT1 1098BGEDEC00BRANCHFORINTERMEDIATEDOWN-TIME 1100JMPDEC07ELSE,DOWN4 1130DEC01LDXSSTIME 1132INX 1134STXVAL2 1136LDXTIMCTR 1138JSRXSUB 1140BGEDEC01CBRANCHIF(TIMCTR.GE.SSTIME) 1142LDXSSTIME 1144INX 1146STXTIMCTRRESETFORSOFTSTARTS 1148DEC01BLDAA#1 1150STAATIMBAS 1152DEC01CLDXSAVEDO 1154STXLASTDO 1156LDAASAVEDO+2 1158STAALASTDO+2 1160LDABLASTDO+3 1162ANDB#$80 1164ORABSAVEDO+3 1166STABLASTDO+3 1168JMPDEC07GOUPDATETIMEDISPLAY 1170DEC02SUBA#9 1172BGEDEC01BRANCHIFINST'D-STEPS#13-17 1174ADDA#6 1176BGTDEC04BRANCHIFNOTINST'DSTEP5-7 1178DEC02ALDX5,X 1180INX 1182STXTIMCTRRESETTOSTARTOFSTEPFOR5-7 1184BRADEC01B 1186DEC03STAAVAL2ENTEREDHEREIFIN'LEAKCHECK' 1188STAATIMCTR 1190INCA 1192STAATIMBAS 1194STAATIMCTR+1 1196LDAB#18 1198STABVAL2+1 1200JSRXSUB 1202STXSTPINX 1204LDABCURSTP 1206SUBB#2 1208STABCURSTPRESETTOSTARTOF 1210*ƒPRECEDINGSTEP. 1212JMPDEC07 1214DEC04STAAR7SAVE((CURRENTST'D-STEP#)-7) 1216LDAA#5 1218STAAR6 1220JSRFINDERSEARCHFORST'D-STEP#5 1222TSTB 1224BEQDEC06BRANCHIFNOTFOUND 1226DEC05STAAHLDFLGCLEARHOLDFLAG 1228LDAAR7RETRIEVE((CURRENTST'D-STEP#)-7) 1230SUBA#2 1232STAAR7SAVE((CURRENTST'D-STEP#)-9) 1234BLEDEC05CBRANCHFORO2PREPURGESTEPS(8,9) 1236LDAA#1 1238STAASAVBAS 1240JSRX2AB 1242LDX1,X 1244STXSAVEDO 1246JSRAB2X 1248LDX3,X 1250STXSAVEDO+2SETUPSAVBASANDSAVEDOFOR 1252*ƒ'PWR/HOLD'CONDITION. 1254LDX#9 1256STXVAL2 1258LDXSTPINX 1260LDAATIMCTR 1262STAA7,X 1264LDAATIMCTR+1 1266STAA8,X 1268DEC05AJSRXSUB 1270LDAA0,X 1272SUBA#10 1274BLTDEC05BBRANCHFORS( T'D-STEPS#1-9 1276SUBA#2 1278BGTDEC05BBRANCHFORST'D-STEP13+ 1280LDAA7,X 1282ORAA#$80SETSKIP-BITFORTHISDEP.STEP 1284STAA7,XDISABLEONRERUN 1286DEC05BCPX#PRCBUF 1288BNEDEC05A 1290JSRSTRT07GOSETUPPREPURGESTEPSACCORDING 1292*ƒTONATURE(DOPED,UNDOPED)OF1STDEP.STEP. 1294DEC05CLDAA#5 1296STAAR6 1298JSRFINDERGETST'D-STEP#5DATA 1300STABCURSTPSETCURSTPFORST'D-STEP#5 1302STXSTPINXSETSTPINXFORST'D-STEP#5 1304STAATIMCTR 1306INCA 1308STAATIMBAS 1310LDAB#4 1312STABTIMCTR+1SETFOR0.3'INST'D-STEP#5 1314LDX1,X 1316STXLASTDO 1318LDXSTPINX 1320LDAA3,X 1322STAALASTDO+2 1324LDAALASTDO+3 1326ANDA#$80 1328ORAA4,X 1330STAALASTDO+3SETUPST'D-STEP5D.O.'S 1332LDAAR7RETRIEVE((CURRENTST'D-STEP#)=9) 1334BLEDEC07BRANCHFORO2PREPURGE 1336DEC06JSRHOLDIT 1338INCHLDFLG 1340LDAA#10 1342STAASONLRT 1344BRADEC07 1346DEC06ALDX#MSGPWR 1348JSRTRMSETSETUPPOWER-FAILSHUTDOWN 1350DEC06BJSRSETIDL 1352LDABLASTDO+1 1354ORAB#$40OPENPV07 1356STABLASTDO+1 1358BGEDEC08BRANCHIFVENTOPEN 1360JSRSETSON 1362BRADEC08 1364DEC07LDXTIMCTR 1366JSRX2AB 1368JSRTIMUPD 1370JSRSETBTH 1372DEC08LDAAABORTS 1374BEQDEC0BRANCHIFABORTNOTREQUESTED 1376CLRABORTSELSE,RESETFLAG 1378LDX#MSGABT 1380JMPCKAD2ASWITCHTOABORT/BACKFILL 1382DEC0LDAASONLRT 1384BEQDEC0A 1386DECA 1388STAASONLRT 1390TAB 1392ANDA#$7F 1394BNEDEC0A 1396BITB#$80 1398BEQSONON 1400SONOFFLDAA#10 1402STAASONLRT 1404LDAALASTDO+3 1406ANDA#$7F 1408STAALASTDO+3 1410BRADEC0A 1412SONONLDAA#$8A 1414STAASONLRT 1416LDAALASTDO+3 1418ORAA#$80 1420STAALASTDO+3 1422DEC0ADECTIMBASDECREMENTTHE10/SECCTR 1424BEQDEC1BRANCHIFTIMEDOUT 1426JMPTOCKSSELSE,TODIG.OUTROUTINE 1428DEC1LDAA#60 1430STAATIMBAS‚RESETTIMBAS 1432LDAADLYSLO 1434BEQDEC1VBRANCHIFNOSLOW-PUMPTIMING 1436*ƒ(INSTANDBYORMANIFOLDSETUP). 1438DECA 1440STAADLYSLO 1442BEQDEC1UBRANCHIFJUSTTIMEDOUT 1444TSTMANSET 1446BNEDEC1VBRANCHIFINMANIFOLDSETUP 1448DECA 1450BNEDEC1VBRANCHIFNOT0.1MIN.LEFTIN'DLYSLO'INSTANDBY 1452INCA 1454ORAALASTDO+3 1456STAALASTDO+3SETN2SOFTSTART 1458BRADEC1V 1460DEC1ULDAALASTDO+2 1462ANDA#$FE 1464STAALASTDO+2CLOSEPV17(SLOWPUMP) 1466LDAALASTDO 1468ORAA#$01 1470STAALASTDOOPENPV09(FASTPUMP) 1472TSTMANSET 1474BNEDEC1VBRANCHIFINMANIFOLDSETUP 1476LDAALASTDO+3 1478ANDA#$FE 1480STAALASTDO+3CLEARN2SOFTSTART 1482LDAALASTDO+1 1484ORAA#$02 1486STAALASTDO+1OPENPV02(N2PURGE)IFINSTANDBY 1488DEC1VLDAADELAY 1490BEQDEC1WBRANCHIFNODISPLAY-UPDATEDELAY 1492DECA 1494STAADELAY 1496DEC1WLDAASTNDBY 1498DECA 1500BLEDEC1XBRANCHIFSTNDBY=0OR1 1502STAASTNDBYSETTO1 1504CLRB 1506BRADEC1Y 1508DEC1XLDAAMANSET 1510DECA 1512BLEDEC1ZBRANCHIFMANSET=0OR1 1514STAAMANSETSETTO1 1516LDAB#$01 1518DEC1YSTAALASTDO+2OPENPV17(SLOWPUMP) 1520LDAA#$84CLOSEPV2,3,AND8 1522ABASETUPPV01ASREQUIRED 1524STAALASTDO+1 1526CLRA 1528STAALASTDO 1530STAALASTDO+3 1532JSRSETBTH 1534JMPDIGOUT 1536DEC1ZLDAADLY2TR 1538BEQDECBA1 1540DECDLY2TRDEC) REMENT2-TORRCHECK-DELAYCOUNT 1542DECBA1LDAADLY1AT 1544BEQDECBA3 1546DECDLY1ATDECREMENT1-ATMCHECK-DELAYCOUNT 1548DECBA3LDXTIMCTR 1550BEQDECBA4BRANCHIFTIME=0 1552LDAADLYABT 1554BEQDECBA4BRANCHIFNOABORT/PUMPDOWN 1556*…INPROGRESS. 1558DECA 1560STAADLYABTDECREMENTABORT/PUMPDOWNCOUNTER 1562CLRB 1564JSRTIMUPDUPDATETIMEDISPLAY 1566LDAADLYABT 1568BNETOCKSSBRANCHIFNOTDONE 1570JMPTRNOFFELSE,GOENDABORT/PUMPDOWN; 1572*…BEGINTHEBACKFILL. 1574DECBA4LDAAHLDFLG 1576BNETOCKSS‚TODIG.OUTCHECK 1578DEC2LDABABBUSY 1580BNEDEC3 1582TOCKSSJMPDIGOUT‚TODIG.OUTCHECK 1584DEC3LDXTIMCTRGETTIMEREMAINING 1586BNENONZRO 1588JMPLODNXT‚WEREINHOLD;HOLDISCLEAR; 1590*„PROCEEDWITHRUN 1592NONZRODEXDECREMENTCOUNTER 1594‚STXTIMCTR 1596JSRX2AB 1598JSRTIMUPDUPDATETIMEDISPLAYASREQ'D 1600EXMTIMLDXTIMCTRGETCURRENTTIME 1602BNEGETSSTBRANCHIFNOTATSTEP-END 1604JMPENDCHKELSE,GOCHECKEND-CONDITIONS 1606PAGE 1608*ƒTHISSUBROUTINESCANSPREVIOUSLY-EXECUTED 1610*ƒSTEPSFORASPECIFIEDST'D-STEP#(INR6). 1612*ƒONRETURN,B-REG.=0IFNOTFOUND; 1614*ƒELSE,B-REG.=CURSTPVALUEANDX-REG.= 1616*ƒSTPINXVALUEFORTHEREQ'DSTEP. 1618SPC1 1620FINDERLDX#9 1622STXVAL2 1624LDXSTPINX 1626LDABCURSTP 1628FIND00LDAA0,X 1630SUBAR6 1632BNEFIND02BRANCHIFNOTAMATCH 1634LDAA5,X 1636ADDA6,X 1638BNEFNDRTSBRANCHIFTIMENOT0 1640FIND02DECB 1642CPX#PRCBUF 1644BEQFNDRTSBRANCHIFNOMATCHFOUND 1646JSRXSUBDECREMENTSTPINXVALUE 1648BRAFIND00CHECKNEXTSTEP 1650FNDRTSCLRA 1652RTS 1654PAGE 1656GETSSTLDAACURSTP 1658LDXSTPINX 1660JSRNXTSTP 1662TSTA 1664BNEGETSS1BRANCHIFTHEREISANOTHER 1666*…STEPWITHNON-ZEROTIME. 1668JMPDIGOUTELSE,BYPASSSOFT-STARTCHECKS 1670GETSS1STXSAVXSAVEADDRESSOFNEXTSTEP 1672LDXTIMCTRGETCURRENTTIMEVALUE 1674STXVAL2STOREFORUSENOWANDBELOW(SSCHK2) 1676LDXSSTIMEGETN2SOFTSTARTINTERVAL 1678JSRXSUB 1680BNESSCHK2BRANCHIFN2SOFTSTARTCHECKNOTDUE 1682SSCHEKLDAALASTDO+1 1684ANDA#$03 1686BNESSCHK2BRANCHIFN2ALREADYON(PV01OR02) 1688LDXSAVXRETRIEVENEXT-STEPADDRESS 1690LDAA2,XCHECKVALVESETTINGS(PV01OR02) 1692BITA#$03 1694BEQSSCHK2BRANCHIFNOTTURNINGN2ON 1696LDAALASTDO+3 1698ORAA#$01SETN2SOFTSTARTBIT 1700STAALASTDO+3 1702SSCHK2LDXSSTIME+2GETREACTIVE-GASSOFTSTARTINTERVAL 1704JSRXSUB 1706BEQSETSSBRANCHIFSOFTSTARTCHECK 1708*…DUEONFLOWMETERSCONTROLLING 1710*…REACTIVEGASES. 1712JMPDIGOUTELSE,GOPERFORMD.O.'S 1714SETSSLDAALASTDO+1 1716LDXSAVXRETRIEVENEXT-STEPADDRESS 1718EORA2,X 1720ANDA2,X 1722LSRA 1724LSRA 1726ANDA#$0E 1728ORAALASTDO+3 1730STAALASTDO+3SETSOFTSTARTSASREQUIRED 1732*…FORFLOWMETERSCONTROLLINGREACTIVEGASES. 1734LDXSTPINX 1736LDAA0,X 1738SUBA#5 1740BNESETSS1BRANCHIFNOTST'DSTEP5 1742LDAALASTDO 1744ANDA#$FE 1746STAALASTDOELSE,CLOSEPV09NOW 1748SETSS1JMPDIGOUT 1750PAGE 1752*…THISSUBROUTINEISCALLEDWITHTHECURRENT-STEP 1754*ƒVALUESFOR'CURSTP'AND'STPINX'INTHEAAND 1756*ƒXREGISTERS,RESPECTIVELY. 1758*…ITCOMPUTESANDRETURNS; 1760*ˆ-‚INTHEX-REGISTER,THESTARTINGADDRESS 1762*ˆ-‚IN* THEA-REGISTER,THE'CURSTP'VALUE 1764*ƒFORTHENEXTPROCESSSTEPWITHNON-ZEROTIME. 1766*…IFTHEREARENONE,THEXANDAREGISTERSARE 1768*ƒSETTOZEROONRETURN. 1770SPC1 1772NXTSTPINCA 1774INX 1776INX 1778INX 1780INX 1782INX 1784INX 1786INX 1788INX 1790INX 1792TAB 1794SUBBPRCLNG 1796BGENXTS01BRANCHIFENDOFPROCESS 1798LDAB7,X 1800BLTNXTSTPBRANCHIFTHISSTEPSKIPPED 1802LDAB5,X 1804ORAB6,X 1806BEQNXTSTPBRANCHIFTIMEISZERO 1808RTSRETURNINDEXVALUES 1810NXTS01CLRA 1812LDXZERO 1814RTSRETURNZEROVALUES 1816PAGE 1818*ƒTHISSUBROUTINEUPDATESTHEMAINAND/ORREMOTE 1820*…PANELTIMEDISPLAY. 1822SPC1 1824TIMUPDPSHA 1826PSHBSAVETIMEVALUE 1828CLRPANELCLEARDISPLAYSELECT 1830LDABEXMSTP 1832BNETIMUP1BRANCHIFINEXAMPROC 1834LDAAKEYTYP 1836TAB 1838SUBA#7 1840BNETIMUP0BRANCHIFNOTINEXAMMEMORY 1842LDAAADRDTA 1844BNETIMUP1BRANCHIFADDRESSALREADYENTERED 1846TIMUP0EORB#$84 1848BEQTIMUP1BRANCHIFIN'OPERATOR' 1850*ƒCHANGE-TIME//MAINPANEL. 1852PULB 1854PULARETRIEVETIMEVALUE 1856PSHA 1858PSHB 1860JSRTIMCVTGOUPDATEMAINPANELDISPLAY 1862TIMUP1LDAAKEYTYP 1864EORA#$94 1866STAAR0 1868PULB 1870PULA 1872TSTR0 1874BEQTIMUP2BRANCHIFIN'OPERATOR' 1876*ƒCHANGE-TIME//MAINPANEL. 1878INCPANELSETDISPLAYSELECTTOREMOTE 1880JSRTIMCVTUPDATEREMOTEDISPLAY 1882TIMUP2RTS 1884SPC2 1886ENDCHKLDABDIFALT 1888LDXSTPINX 1890LDAA0,X 1892SUBA#5 1894BEQCKPRESBRANCHIFATENDOF'PUMP/CHK3' 1896ADDA#3 1898BEQCKPRESBRANCHIFATENDOF'PUMP/CHK2' 1900DECA 1902BNELODNXTBRANCHIFNOTATENDOF'LEAKCHEK'STEP 1904BITB#$08 1906BNELODNXTBRANCHIFPRESS.L.T.40MICRONS 1908LDX#MSGLCK 1910JMPCKAD2AELSE,FAILEDLEAKCHECK/ABORT 1912CKPRESBITB#$08 1914BNELODNXTBRANCHIFBELOWREQUIRED 1916*…PUMPDOWNPRESSURELEVEL. 1918SETHLDJSRHOLDITPUTINHOLDIFWE 1920*…DIDN'TMAKETHEPUMPDOWNPRESSURELIMIT. 1922JSRSETBTHUPDATETHEDISPLAYTO'INHOLD' 1924JMPDIGOUTGOPERFORMD.O.'S 1926PAGE 1928*LOADNEXT-STEPDATAHERE 1930LODNXTLDAACURSTP 1932LDXSTPINX 1934JSRNXTSTP 1936TSTA 1938BNELODNX1BRANCHIFTHEREIS 1940*ƒANOTHERSTEPWITHNON-ZEROTIME. 1942JMPTRNOFFELSE,SETUPBACKFILL 1944LODNX1STAACURSTPUPDATECURSTP 1946STXSTPINXUPDATESTPINX 1948LDAA0,X 1950SUBA#2 1952BNELODNX2BRANCHIFNOTENTERING 1954*…'PUMP/CHK2'. 1956LDAASTP2TR 1958BRALODNX3 1960LODNX2LDAACNT2TR 1962LODNX3STAADLY2TRSET2-TORRCHECK-DELAYCTR 1964LOADOSLDAB1,X 1966STABLASTDO 1968LDAA2,X 1970STAALASTDO+1 1972LDAA3,X 1974STAALASTDO+2 1976LDAALASTDO+3 1978ANDA#$80 1980ORAA4,X 1982STAALASTDO+3 1984LDAB7,X 1986LDAA8,X 1988ABA 1990BEQLODNX7BRANCHIFNO'TIME-REMAINING' 1992LDAA8,X 1994JSRAB2X 1996BRALODNX8 1998LODNX7LDX5,X‚GETTIME/NEXTSTEP 2000LODNX8STXTIMCTR‚LOADNEXT-STEPTIME 2002JSRX2AB 2004JSRTIMUPDUPDATETHETIMEDISPLAY 2006JSRSETBTH‚GOINITIALIZEDISPLAY 2008JMPGETSSTSEEIFSOFTSTARTSREQUIRED 2010PAGE 2012TRNOFFLDAACNT1AT 2014STAADLY1ATSET1-ATMOSPHERECHECK-DELAYCOUNT 2016CLRCURSTPSETSTEP#TO0 2018CLRHLDFLG‚CLEARHOLDS 2020LDAA#1 2022STAABAK+ FILSETTHEBACKFILL-IN-PROGRESSFLAG 2024‚LDX#-1 2026‚STXTIMCTRSETTIMEROFF 2028LDAADLYABT 2030BNETOFF2BRANCHIFABORTEDTOBACKFILL 2032TOFF1CLRA 2034LDX#9 2036STXVAL2 2038LDX#PRCBUF+234 2040TOFF1ASTAA7,XZEROTHETIME-REMAININGCOUNTER 2042STAA8,X 2044JSRXSUB 2046CPX#PRCBUF 2048BNETOFF1ABRANCHIFMORESTEPSTOZERO 2050STAALASTDO 2052STAALASTDO+2 2054LDAA#$C0 2056STAALASTDO+1 2058BRATOFF3 2060TOFF2CLRA 2062STAALASTDO+2 2064INCA 2066STAALASTDO 2068LDAA#$84 2070STAALASTDO+1 2072TOFF3LDAALASTDO+3 2074ANDA#$80 2076STAALASTDO+3 2078ZROBSYCLRA 2080STAAABBUSY 2082JSRSETBTH 2084SPC1 2086DIGOUTJSRPFMOUT 2088LDAAMODFLG 2090BEQDIG08 2092DIG07LDAAEXMSTP 2094ADDADEPSTP 2096BNEOUTDUNBRANCHIFINEXAMPROCESS 2098DIG08LDX#LASTDO 2100STXVAL1 2102JSRDSPYDOGODISPLAYD.O.VALUES 2104OUTDUNJMPRETURN 2106SPC1 2108MSGIDLFCC$ASM/MICON1$ 2110MSGTRMFCC/TERM***/ 2112MSGHLDFCC/INHOLD‚/ 2114MSGPHDFCC$PWR/HOLD$ 2116MSGABPFCC$ABORT/PUMP$ 2118MSGSBYFCC$STANDBY/PMP$ 2120MSGMSTFCC$MAN-SET/PMP$ 2122MSGBAKFCC/BACKFILLING/ 2124PAGE 2126*…SUBROUTINETOPLIN-ENTEREDWITHPROCESS 2128*ƒSTEP#(SEQUENCE#)INA-REG.,STEP-ENTRY 2130*ƒADDRESS(PRCBUF)INX-REG. 2132*…THISSUBROUTINELOADSAPROCESS-STEP 2134*ƒDESCRIPTIONTOTHE'MODE'LINEOF 2136*ƒTHEDISPLAY. 2138****CHANGESR0-R5,R7-R9,VAL1,VAL2*** 2140SPC2 2142TOPLINLDAB#$20 2144STABR4 2146STAAR5SAVESTEP#(COUNT)INR5 2148LDAAXGETSTEP-TYPEINDEX 2150BGTLODSTDBRANCHIFST'DSTEP 2152LODTRMLDX#MSGTRM-2 2154BRAXFRMSG 2156LODSTDLDABEXMSTP 2158ADDBDEPSTP 2160BNENOTHLDBRANCHIFDISPLAYINGPROCESSSPEC 2162LDABHLDFLG 2164BEQNOTHLDBRANCHIFNOTINA'HOLD' 2166SUBB#2 2168BGELODPHDBRANCHIFIN'PWR/HOLD' 2170LODHLDLDX#MSGHLD-2 2172BRAXFRMSG 2174LODPHDLDX#MSGPHD-2 2176BRAXFRMSG 2178NOTHLDDECA 2180STAAVAL2+1 2182CLRVAL2 2184LDXLNGSTP 2186STXVAL1 2188JSRHSMUL 2190LDX#STEPS-2 2192JSRXADD 2194JSRX2AB 2196PSHA 2198PSHBSAVESTEP-DESCRIPTIONADDRESS 2200STXVAL2 2202LDX#11 2204JSRXADDSETTOADDRESSOF 2206*…((STANDARD-STEPDIGITALOUTENTRY)-1). 2208STXR8SAVEINR8 2210LDAAR5 2212JSRGETPNXGETADDRESSOFPROCESS-SPEC 2214*…DIGITALOUTENTRY 2216STXVAL1 2218DEX 2220STXR9SAVEINR9 2222LDAB#6 2224BUMPITLDXR8 2226INX 2228STXR8 2230GETVALLDAAX 2232LDXR9 2234INX 2236STXR9 2238CMPVALEORAXCOMPARED.O.'SANDTIMES 2240BEQTSTBNX 2242SETASTLDAA#$2AFLAGMODIFIEDSTEPS 2244*…WITHANASTERISK 2246STAAR4 2248BRARTRVDS 2250TSTBNXDECB 2252BNEBUMPIT 2254RTRVDSPULB 2256PULA 2258JSRAB2XRESTORESTEP-DESCRIPTIONADDR. 2260XFRMSGSTXR8 2262JSRLODMSG 2264LDAAR4 2266TSTPANEL 2268BNEXFRMS1BRANCHFORREMOTEPANEL 2270STAADSPBUF+2 2272BRAXFRMS2 2274XFRMS1STAADSPBUF+18 2276XFRMS2LDAAR5 2278BSRBINDEC 2280TSTPANEL 2282BNEXFRMS3BRANCHFORREMOTEPANEL 2284STXDSPBUF 2286BRAXFRMS4 2288XFRMS3STXDSPBUF+16 2290XFRMS4RTS 2292PAGE 2294*ƒTHEFOLLOWINGSUBROUTINELOADSTHE 2296*ƒL.E.D./VALVEINDICATORSPARTOFTHE 2298*ƒDISPLAY. 2300*ƒENTEREDWITHADDRESSOFTHE2-BYTE 2302*ƒENTRYTOBEDISPLAYE, DCONTAINED 2304*ƒINVAL1. 2306SPC1 2308DSPYDOLDAATSTFLG 2310BNEDSPDO1BRANCHIFLAMP-TESTINPROGRESS 2312LDXVAL1 2314LDAA1,X 2316STAAP1ABD 2318LDAA0,X 2320STAAP2ABD 2322DSPDO1RTS 2324SPC2 2326*ƒBINARYTOHEX-ASCIICONVERSIONROUTINE 2328SPC1 2330HEXCVTTAB 2332‚LSRB 2334‚LSRB 2336‚LSRB 2338LSRB 2340‚SUBB#9 2342‚BLEHX01 2344‚ADDB#$07 2346HX01ADDB#$39 2348ANDA#$0F 2350‚SUBA#9 2352‚BLEHX02 2354‚ADDA#$07 2356HX02ADDA#$39 2358‚RTS 2360‚PAGE 2362* 2364*…CONVERTSTIME(TENTHSOFMINUTES) 2366*…TOANASCIIREPRESENTATION 2368*…ANDSTORESRESULTINDISPLAYBUFFER. 2370*…TIMEISCONTAINEDINA-REG.(LSB) 2372*…ANDB-REG.(MSB). 2374SPC2 2376TIMCVTLDX#100 2378BSRDIVIDR 2380BSRBINDEC 2382TSTPANEL 2384BNETIMCV1BRANCHFORREMOTEDISPLAY 2386STXDSPBUF+14 2388BRATIMCV2 2390TIMCV1STXDSPBUF+30 2392TIMCV2LDAAR2 2394BSRBINDEC 2396TSTPANEL 2398BNETIMCV3BRANCHFORREMOTEDISPLAY 2400STXDSPBUF+12 2402BRATIMCV4 2404TIMCV3STXDSPBUF+28 2406TIMCV4RTS 2408SPC3 2410*…'DIVIDR'COMPUTESB/ADIVIDEDBYX; 2412*ŠQUOTIENT(<127)TOR2 2414*ŠREMAINDER(<127)TOR3 2416* 2418*…CHANGESA,B,X,R2,R3,VAL1. 2420SPC1 2422DIVIDRCLRR2 2424STXVAL2 2426JSRAB2X 2428SUBITJSRXSUB 2430BLTADDBAK 2432INCR2 2434CPXZERO 2436BEQDIVDUN 2438BRASUBIT 2440ADDBAKJSRXADD 2442DIVDUNJSRX2AB 2444STAAR3 2446RTS 2448PAGE 2450* 2452*…BINDECCONVERTSABINARYVALUEINA-REG 2454*…TOASCIIDECIMALINTHEX-REG.THERESULT 2456*…ISASSUMEDTOBELESSTHAN100BASE10. 2458* 2460BINDECLDX#$3030 2462STXR0 2464SUBMORSUBA#10 2466‚BLTBD1 2468INCR0 2470TSTA 2472‚BEQBD2 2474BRASUBMOR 2476BD1ADDA#10 2478ADDAR1 2480STAAR1 2482BD2LDXR0 2484RTS 2486SPC3 2488* 2490*…HIGH-SPEED,16-BITMULTIPLY 2492* 2494*…((VAL1)*(VAL2))TOA,B,VAL2 2496* 2498HSMULPSHB 2500PSHA 2502LDX#16 2504‚CLRA 2506‚CLRB 2508‚RORVAL2 2510‚RORVAL2+1 2512NXTTBCCROTAT 2514‚ADDBVAL1+1 2516‚ADCAVAL1 2518ROTATRORA 2520‚RORB 2522‚RORVAL2 2524‚RORVAL2+1 2526‚DEX 2528‚BNENXTT 2530PULA 2532PULB 2534‚RTS 2536PAGE 2538*‚THEINTERRUPTHANDLERFOLLOWS 2540SPC2 2542INTRPTEQU* 2544SAVREGLDX#20 2546STOREGLDAA0,X‚ 2548PSHA 2550DEX 2552BNESTOREG 2554LDAA0,X‚GETR0FORSTORE 2556PSHA 2558CK2LDAAP3ABC 2560BITA#$80 2562BEQCK3 2564JMPTIMINT 2566CK3LDAAP2AAC 2568BITA#$80 2570BEQCK4 2572JMPKEYBRD 2574CK4LDAAP1AACTESTFORAUXILIARYKEYS 2576BITA#$80 2578BEQCK5 2580JMPCHGMODTOCHANGE-MODEROUTINE 2582CK5BITA#$40 2584BEQRETURN 2586JMPENTDTATOENTER-DATAROUTINE 2588RETURNLDX#-21 2590LODREGPULA‚RESTOREPSEUDOREGISTERS 2592‚STAA21,X 2594‚INX 2596BNELODREG 2598RTIRTI 2600PAGE 2602*…NMIROUTINEFOLLOWS- 2604SPC1 2606NMIRTNLDAAPRCBUF+250 2608SUBAPWRDWN 2610BNENMIRTIBRANCHIFRAMSETHASNOT 2612*…YETBEENRUN(NMIROUTINENOTINRAM). 2614LDAANMIBSYGETPWRDWNBUSYFLAG 2616BEQNOTBSYBRANCHIFNOTALREADYACTIVE 2618NMIRTIRTI 2620NOTBSYINCNMIBSYSETBUSYFLAG 2622CLRA 2624STAACOUNT1 2626STAACOUNT2CLEARDOWN-TIMECOUNTERS 2628STAACOUNT3 2630LDXLASTDO 2632STXSAVEDO 2634LDXLASTDO+2 2636STXSAVEDO+2 2638LDAAR7 26- 40PSHA 2642LDAAVAL1 2644PSHA 2646LDAAVAL1+1 2648PSHA 2650LDAAP1AAC 2652PSHA 2654LDAAP2AAC 2656PSHA 2658LDAAP3AAC 2660PSHA 2662LDAAP3ABC 2664PSHA 2666LDAA#4 2668STAAP1AAC 2670STAAP2AAC 2672STAAP3ABC 2674*THEFOLLOWINGINSTRUCTIONSBLANKTHEDISPLAY 2676LDAA#$2C 2678STAAP3AAC 2680LDX#32 2682NMIDSPLDAA#$80 2684STAAP3AAD 2686LDAAP3AAD 2688DEX 2690BNENMIDSP 2692LDAA#4 2694STAAP3AAC 2696LDAA#1 2698STAAP3AAD 2700JMPPRCBUF+250 2702SPC1 2704*…RETURNCONTROLHEREWITHPOWERRESTORATION 2706SPC1 2708PWRBAKPULA 2710STAAP3ABC 2712PULA 2714STAAP3AAC 2716PULA 2718STAAP2AAC 2720PULA 2722STAAP1AAC 2724PULA 2726STAAVAL1+1 2728PULA 2730STAAVAL1 2732PULA 2734STAAR7 2736RTI 2738PAGE 2740*…POWER-DOWNROUTINEFOLLOWS‚- 2742*‡THISROUTINEISLOADEDTOR.A.M.ATINITIALIZATION 2744*‡INTHESPACEIMMEDIATELYFOLLOWINGPRCBUF.‚ITIS 2746*‡ENTEREDONTHEPOWER-FAILNMIANDTIMESTHE 2748*‡INTERVALDURINGWHICHPOWERISOFF. 2750SPC2 2752PWRDWNLDAA#100 2754BSRTORLY1GODELAY0.1SECOND 2756LDAA#$FF 2758STAAP3ABD 2760LDAA#$7F 2762STAAP3ABDKICKI/OTIMER 2764BSRTORLY2WRITED.O.'S 2766LDAAP1AAD 2768BITA#$40 2770BNETORLY4BRANCHIFPOWERBACKON 2772BITA#$02 2774BEQPWR01BRANCHIFNOTOVERPRESSURE 2776PWR00LDAA#$80 2778STAACOUNT3DISABLETIMER 2780LDAA#$04 2782STAALASTDO+1SHUTPV1-7;OPENPV8(VENT) 2784STAAP1ABD 2786CLRA 2788STAALASTDOSHUTPV9-16 2790STAAP2ABD 2792STAALASTDO+2SHUTPV17 2794STAALASTDO+3CLEARANYSOFTSTARTS 2796BSRRELAY2WRITED.O.'S 2798BRAPWRDWN 2800PWR01LDABCOUNT3 2802BLTPWRDWNBRANCHIFDOWN>LIMIT2 2804PWR02LDAACOUNT1 2806INCA 2808STAACOUNT1INCREMENT0.1SECONDCOUNTER 2810SUBA#10 2812BNEPWRDWNBRANCHIFNOTAT1.0SEC.INCREMENT 2814STAACOUNT1CLEAR0.1SECONDCOUNTER 2816LDAACOUNT2 2818INCA 2820STAACOUNT2INCREMENT1.0SECONDCOUNTER 2822TABSAVESECONDSCOUNT 2824SUBALIMIT1 2826BNEPWR03BRANCHIFSECONDSCOUNTER 2828*ƒNOTATLIMIT1. 2830LDABCOUNT3 2832BNEPWRDWNBRANCHIFMINUTESCOUNTER 2834*ƒNOTATZERO. 2836LDAA#$84ISOLATETHETUBEIFATLIMIT1 2838STAALASTDO+1 2840STAAP1ABD 2842STABLASTDO 2844STABLASTDO+2 2846STABLASTDO+3 2848STABP2ABD 2850BSRRELAY2 2852BRAPWRDWN 2854TORLY1BSRRELAY1 2856RTS 2858TORLY2BSRRELAY2 2860RTS 2862TORLY4BRARELAY4 2864RELAY5BRAPWRDWN 2866RELAY6BRAPWR00 2868PWR03SUBB#60 2870BNEPWRDWNBRANCHIFNOTAT1.0MINUTE 2872*„INCREMENT 2874STABCOUNT2CLEAR1.0SECONDCOUNTER 2876LDAACOUNT3 2878INCA 2880STAACOUNT3 2882SUBALIMIT2 2884BLTRELAY5BRANCHIFTIME—8~ºŽO—K—L—N—9—&—(–)„€—)†À—'½ÆS~ºŽ–H›K›L'0Å '~ºŽÖ6'~ºŽÖLÛK&ÇÞ…æZ&~ºŽßν®/~ºŽÎÈ' Ž–N'v€&–@&n–',Å'f†—@Ö'Äx×' Z–7&V–8&RÅ'NO—N—M–)Š€—)½ÆS >Îÿÿß.O—H—K—L—„—J—8—9½ÆS9†—J–0—1)9†Š—M–)Š€—)9–H' ߊ–„—‡Þ.߈9–R&~»ÊR–<—6ÖE.'ÖH'~»©ÖKÛL'5~»¯–DF,~»¿–H'%Þ…Œ-¦€':J.(Þ2ßÞ.½Â®, Þ2ß.†—0Þ*ß&–,—(Ö)Ä€Ú-×)~»¿€ ,Ô‹."îß. Ú——.L—0—/Æ×½Â®ß…Ö„Àׄ~»¿—†—½¼°]'p—J–€—/<†—1½Âšîß*½Â“îß,Î ßÞ…–.§–/§½Â®¦€ - €.¦Š€§Œ&è½Çe†—½¼°×„ß…—.L—0Æ×/îß&Þ…¦—(–)„€ª—)–/"½ºh|J† —M ÎÈK½º½ºPÖ'Ê@×',½ºt Þ.½Âš½½I½ÆS–I' IÎÈ?~¹¢–M'"J—M„&Å€' † —M–)„—) †Š—M–)Š€—)z0'~¼–†<—0–9'1J—9'}L&'J&$Lš)—) –(„þ—(–&Š—&}L& –)„þ—)–'Š—'–@'J—@–KJ/—K_ –LJ/—LÆ—(†„—'O—&—)½ÆS~¾A–6'z6–7'z7Þ.'–8'J—8_½½I–8& ~½õ–J&ÖH&~¾AÞ.&~½¤ ß.½Âš½½IÞ.&%~½|Î ßÞ…Ö„¦&¦«& ZŒ'½Â® éO9–„Þ…½½+M&~¾AßÞ.ßÞ2½Â®&–'„&Þ¦…'–)Š—)Þ4½Â®'~¾A–'Þ¨¤DD„š)—)Þ…¦€&–&„þ—&~¾ALÐ, æ-íæê'ç9OÞ967ÖZ&–W€&–a& È„'3267½¿q–Wˆ”—32}'|½¿q9Ö%Þ…¦€'‹' J&Å&ÎÈ3~¹¢Å& ½ºh½ÆS~¾A–„Þ…½½+M&~½õ—„ß…¦€&–; –<—6æ×&¦—'¦—(–)„€ª—)æ¦'¦½Â“ îß.½Âš½½I½ÆS~¼Ò–=—7„J†—NÎÿÿß.–8&OÎ ßÎz§§½Â®Œ&ô—&—(†À—' O—(L—&†„—'–)„€—)O—H½ÆS½Áƒ–T'–Z›[&Î&ß ½¿H~ÀASM / MICON1 TERM *** IN HOLD PWR/HO1 LD ABORT / PUMPSTANDBY /PMPMAN-SET /PMPBACKFILLING Æ ×—¦.ξc dÖZÛ[&ÖJ'À,ξm Qξw LJ—Þß ½¿ÌÎÎÆ½Â¡½Âš67ßÎ ½Â¡ß–½Å¤ß ß ÆÞß¦Þ ß ¨'†*— Z&ç32½Â“߽˕–}&—f —v–v}&ßd ßt9–O& Þ ¦·X¦·X9TTTTÀ /ËË9„€ /‹‹99Îd:}&ßr ß‚–+}&ßp ߀9߽“½Â®- |œ' ò½Â¡½Âš—9Î00߀ -|M' ô‹ ›—Þ976ÎO_vv$Û ™ FVvv &ï239Φ6 &ú¦6¶X …€'~¸o¶X…€'~»¶X…€'~¾…@'~ÂÂÎÿë2§&ú;¶аÀ¥&–R';|RO—C—D—EÞ&ß*Þ(ß,–6– 6– 6¶X6¶X6¶X 6¶X 6†·X·X·X †,·X Î †€·X¶X &õ†·X †·X~Š2·X 2·X 2·X2·X2— 2— 2—;†da†ÿ·X †·X X¶X…@&T…'†€—E†—'·XO—&·X—(—)h ÌÖE-È–CL—C€ &¿—C–DL—DF&$ÖE&¯†„—'·X×&×(×)÷X7 ›0909 2 ‘ ªÀ<&‹×D–EL—EG-íÆ€×E–H›L›K'ᆗN÷X×' :9B9 Î +†d.†ÿ·X †·X -¶X…@&…&³…'áO·X—'†—@ цd~À‹7Æ¥Z&ýJ.ø39†-·X Þ&ß Þ(ßÆÎ —ÎI”·X Z&놷X †ÿ·X †û·X 9OhiIC9΄O§ &ûC—WÎÿÿß.†@—'†—Q½Ë«|½Ë«†<—0†—A†—>—;J—–V&Þ]ß] Ý –``Þ]§ Ó–,22ÎÄ 9ÎÃè߽˕mÖ.-–/ _O½¿q¶X¶X† ·X†·XS~ÀCHNG IN PROGINVALID KEY INVALID REQ KEY DISABLEDCHANGE DONE RUN COMPLETEO—Z—[—\—VÖWC—WOÞßXÀ&ß]ß_—a9Î † §c &û97—½Âš67–6DDDD—  Î ß½¿Ì2„›—32½Â“3–9½Ã –YÍ—Œ/~Å–ZZ&Z&ôÀ-~ŽŤ Ö&7ÖZ†€§×O§Œ‰&ø~ÅÆçß Z×Þß ½¿ÌÎÎҽ¡ßÎß½Âm9¦6Ø2M-~ÅÆ–ZL6½Å¤ 3~Ī @€ @€–Y'½ÄO—Æ€/ÎÃô~ï'_‹ .\×ÖZ&–L' –€ -€/½Ã ]&u–W€'–€.‹- Ö%Å &ÎÈ'~ïÎ&ÎÄ ~ïßÞ½Â¡ßÆþ–€'€'_–W€6ÞßÎÄö½Â¡¦Þ3]'C¤ ª§9_J½Â“ß Î ß½¿ÌΑ½Â¡9Ð-~Åà¦O—\—V—X—YC—W~ʤ–X½ÄO–Y½ÄO6×Îdß ½¿Ì2_½Â“½Â¡ß9½Ã ×–Z&Þ'Þ..~Å}H'øÞ…Þß.ÎÄ ~ïÐ-~ŽŤ Ö–ç§~ÅÆž–[½Å¤Ö–ç§O—V—X—Y~ÃÆ ~ÃÆ†—T9½ÄDÎ&ß ½¿H†T—T& U|9½Ä&}&T U}H'–„Þ…½¾³Ö.–/½¿q9½Ë«9×C„˜Wˆ„&~Ö\'~ÉàÅ'ÄÀ&~É~À&Æ”~É–.~Ã¬Ë ×À '~È –H'h–J'^Þ.&–%…'T–J€- Þ*ß&Þ,ß(Þ.O—JßÞ2½Â®½Âš],Þ…¦€&–%…' Îß.†—1–1—0~Ȩ߽š½Ë•½Â“ß|½Ë•½Ä&~ÃÆ–J.ÎÈ Ú½Èy–Q&ÎÈW Î eÎ ßΦ/€- €.O§§½Â¡ êÎæ/?¦-¦«' À ' Z' Z'½Â¡ ㆠ†—Œ'½Â®æÐ&ÖAç ìÀ&èÖBç â9O—QL—HO—‡Þß.߈·߅–'„¿—'Æ×0~É~ INACTIVE ACTIVE NO PROCESS DOOR OPEN OVERPRESS OVR 2TORR LEAK FAIL ABORTED POWR FAIL NOT RESET NO DEP STEPSÖH'922~ÇE–N›K›L›H'ÎÇ÷22~Ç/–%…'ÎÈ ð…'ÎÈ ç9Z& ʽºh½ÆS~ÃÆZ&X–Z'~ÅÆ–H›N'ÎÇ÷~Ç/L—QÞߊ½Ä&–K›L'!_×K×L×&×(×)×6×9ÆÀ×'Æ×NÖ=×7Æ<×0 ³—&—(—)†@Ö%Å'Š—' ŸZ&½Èy†—K–:—6–?—9~ÇÞZ&ÖH&ÎÇë~Ç/×I~ÃÆZ&&–K& ½Èy†—L Ó–K—LKÖ'Ľ€'Ê×'½ÆS~ÇEË&¶Xˆÿ&¶Xˆÿ' †ÿ·X·X—O O óË& M–)„—)~ÇEË&R–…€'LÆ„–T&F×W–[—|[–[Ð'&½Å¤¦…þ'í¦…'熗\}&—T —U–[½Ê«~ÃÆ–'½ÆS~ÃÆÎÈc~Ç/–TÖÅ'–UM&~ÃÆÄ×–\J&~Êò/?~Ë] OPEN VLV# CLOSE VLV# CHG TIME ENTER STEP EXAM MEM –&–Z&~Å€/~ÅÎÊ% €&–…'ÎÈ~ïÎÊÆß–—W×\½Ë•~ÃÆJ&ÎÊ èJ&ÎÊ à€&ÎÊ1Æ ׋'~ì–Z&—Z|Z–Z~ÃÆ6½Å¤ß 2½¾³Þ–Wˆ”'ß ½¿Hæ,_O ¦'¦ 榽¿q9æ¦HYHYHYHYçÖħ9–À /À'~ìÖZ'ù~ÅÆ|VÎXÍ–[',–X½¿Y}&×p—q ×€—–Y½¿Y}&×r—s~ÃÆ×‚—ƒ~ÃÆ–Y½¿Y×n—o–W€'~ÃÆ–X½¿Y×l—m~ÃÆ|V–a& Î]½ÊÜ~ÃÆÎ_½ÊÜ–`~Ãz–]½¿Y72 6–^½¿Y762—o2—n2—m2—l9Îd}'Îtß Î ß½Âm9–N&I–K&@–L&7–%…'ÎÈ LÞŠ&–Q'ξY ?ÎÄ :8–‡½¿²}&ßd ßtÖˆ–‰½¿q9ξ› ξ –8&ξ§  –8_½¿qξƒß ‡ßÎ00}&ßpßr ߀߂½Ë•–KšL'!–%… '}& Î/RßlÎDYßn Î/Rß|ÎDYß~9 PUMP/CHK1„ PUMP/CHK2„ LEAK CHEK„ N2 PRG 1 † PUMP/CHK3„ª MAN PRG 1Ô MAN PRG 2ô O2 PRG 1 œ O2 PRG 2 ¼ LTO1/XDOP}œ LTO2/DOPEë¼ LTO3/DOPEë¼@ LTO4/DOPEë¼€ 02 POSPRGŒ PUMP DOWN„ N2 PRG 2 † EVAC MANFÄ *SPECIAL*„¿íÀ'À(¸MEMORY'FUNCTION); 0240*ƒ0=ADDRESSNOTYETENTERED 0242*ƒ1=ADDRESSHASBEENENTERED 0244SPC1 0246*ƒL.E.D.DISPLAY- 0248SPC1 0250DSPINXRMB2DISPLAYBUFFERINDEX 0252DSPBUFRMB32CURRENT-DISPLAYBUFFER‚ 0254SPC2 0256*ƒPROCESSSPECIFICATIONANDSEQUENCING- 0258SPC1 0260CURSTPRMB1‚NUMBEROFCURRENTLY- 0262*ƒEXECUTINGPROCESSSTEP-THISISA 0264*ƒSEQUEN H€S00500000002F8 S11B000049424D33353020202020202020202020202020202020202034 S11B00187FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFE4 S11B00307FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFCC S11B00487FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFB4 S11B00607FFF7FFF2020202020200400000A000007F507F507F57FFF48 S11B00787FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF84 S11B00907FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF0000000068 S11B00A800000000000000000000000000000000000000008F0A0002A1 S11B00C0E8000000B4000008910FD007F57FFF7FFF7FFF7FFF7FFF7F1F S11B00D8FF1FFE7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F85 S11B00F0FF7FFF7FFF7FFF7FFF7FFF400000000000000000000000003F S11B01080000000000000000000000000038D174000004B0000007F5AE S11B012007F507F57FFF7FFF7FFF7FFF7FFF7FFF1FFE7FFF7FFF7FFF40 S11B01387FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFC3 S11B01507FFF40000000000000000000000000000000000000000000D5 S11B01680000000000000080000258000007F507F507F57FFF7FFF7F32 S11B0180FF7FFF7FFF7FFF1FFE7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FDC S11B0198FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF400000000000001C S11A01B00000000000000000000000000000000000000038D1748037 S9 åå K€TT ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ3 ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ 00.00.10.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@ 00.00.20.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@€  åååN€S00500000001F9 S11B00005454202020202020202020202020202020202020202020207C S11B00187FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFE4 S11B00307FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFCC S11B00487FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFB4 S11B00607FFF7FFF2020202020200200000A000003FA03FA03FA7FFF47 S11B00787FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF84 S11B00907FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF2000000048 S11B00A80000000000000000000000000000000000000000000038D133 S11B00C07400000014000003FA03FA03FA7FFF7FFF7FFF7FFF7FFF7FB0 S11B00D8FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F24 S11B00F0FF7FFF7FFF7FFF7FFF7FFF200000000000000000000000005F S11401080000000000000000000000000038D17480E5 S9 å P€PRE ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@ 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@ 4  ååå S€Z0 ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ,@ÿ￞,@ÿ￞ 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@ 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿa}ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@  ååå V€TTEST ÿa}ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ,@ÿ￞,@ÿ￞ 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@EINS 00.12.30P–P—.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿD8†  å5 åå Y€T1 ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ,ÿ÷­ž,ÿ÷­ž 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@ 00.00.10.sÁÈ.sÁÈ.sÁÈÿÿÿa}ÿÁÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@€  ååå\€S00500000001F9 S11B00005431202020202020202020202020202020202020202020209F S11B00187FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFE4 S11B00307FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFCC S11B00487FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFFB4 S11B00607FFF7FFF20202020202002000006000003FA03FA03FA7FFF4B S11B00787FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF84 S11B00907FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF2000000048 S11B00A80000000000000000000000000000000000000000000038D133 S11B00C0740000000A000003FA03FA03FA7FFF7FFF7FFF7FFF41997F5E S11B00D8FF0CCC7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FCA S11B00F0FF7FFF7FFF7FFF7FFF7FFFE00000000000000000000000009F S11401080000000000000000000000000038D17480E5 S9 å^€T2 ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ,ÿ÷­ž,ÿ÷­ž 00.00.00.sÁÈ.sÁÈ.sÁÈÿÿÿÿÿÿÿÿ6 ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ@  å}`|ï€þ7125ˆEND 7120ˆPAGE 7117ˆFCB„CR,LF,EOF 7116M38„FCC„/COMMANDMODE;LEAVETHISFUNCTIONBYTYPINGCTRL-A/ 7115ˆFCB„CR,LF,EOF 7110M36„FCC„/ENTERTHERECIPENUMBER(1-3)/ 7105ˆFCB„EOF 7100M35„FCC„/ƒNEWNAME:/ 7095ˆFCB„EOF 7090M34„FCC„/RECIPENAME:/ 7085ˆFCB„EOF 7080M33„FCC„/NEWNUMBER:/ 7075ˆFCB„EOF 7070M32„FCC„/LOTNUMBER:/ 7065ˆFCB„EOF 7060M31„FCC„/RATIOERROR/ 7031ˆFCB„CR,LF,EOF 7030M27„FCC„/ENTERTHESTEPNUMBERORCRTOEXIT/ 7015ˆFCB„EOF 7010M25„FCC„/CHANGESOK?/… 7005ˆFCB„EOF 7000M24„FCC„/INTERLOCKERROR/ 6995ˆFCB„EOF 6990M23„FCC„/NUMBERTOOLARGE/ 6985ˆFCB„EOF 6980M21„FCC„/NEWTIME=/ 6975ˆFCB„EOF 6970M20„FCC„/„TIME=/ 6964ˆFCB„EOF 6962M30„FCC„/…YOURSELECTION:/ 6960ˆFCB„CR,LF 6955ˆFCC„/(3)‚SETPOINTS/ 6950ˆFCB„CR,LF 6945ˆFCC„/(2)‚DIGITALOUTPUTS/ 6940ˆFCB„CR,LF 6935M16„FCC„/(1)‚TIME/ 6930ˆFCB„CR,LF 6925M19„FCC„/STATUSCHANGE/ 6920ˆFCB„EOF 6915M18„FCC„/CLOSED/… 6910ˆFCB„EOF 6905M17„FCC„/OPEN‚/„ 6900ˆFCB„EOF 6895M15„FCC„/OFF/… 6890ˆFCB„EOF 6885M14„FCC„/ON/„ 6875M13„FCB„$C8,$CC,$20,EOF/HD/ 6870M12„FCB„$C1,$CC,$20,EOF/AL/ 6865M11„FCB„$C1,$C2,$20,EOF/AB/ 6860ˆFCB„EOF 6855M10„FCC„/FN/… 6850ˆFCB„EOF 6845M9…FCC„/RN/ 6840ˆFCB„EOF 6835M8…FCC„/ID/ 6830ˆFCB„CR,LF,EOF 6825M7…FCC„/INCORRECTENTRY/ 6820ˆFCB„EOF 6815M6…FCC„/PRESSANYKEYFORJOBSELECTION/ 6810ˆFCB„EOF 6805M5…FCC„/‚TIME/ 6800ˆFCB„EOF 6795M4…FCC„/‚STEP/ 6790ˆFCB„EOF 6785M3…FCC„/‚BOAT/ 6780ˆFCB„EOF 6775M2…FCC„/‚STATUS/ 6770ˆFCB„LF,EOF 6765ˆFCC„'(7)‚RECIPENAMECHANGE' 6760ˆFCB„CR,LF 6755ˆFCC„'(6)‚LOTNUMBERCHANGE' 6750ˆFCB„CR,LF 6745ˆFCC„'(5)‚RECIPECHANGE' 6742ˆFCB„CR,LF 6741ˆFCC„/(4)‚MAINTENANCECOMMANDS/ 6740ˆFCB„CR,LF 6735ˆFCC„'(3)‚STATUSCHANGE' 6730ˆFCB„CR,LF 6725ˆFCC„/(2)‚DIGITALOUTPUTSTATUSDISPLAY/ 6720ˆFCB„CR,LF 6715ˆFCC„/(1)‚TUBESTATUSDISPLAY/ 6710ˆFCB„CR,LF 6705M1…FCC„/TUBELEVELJOBSELECTION/ 6700***************************** 6695*‚STRINGS‚AND‚CONSTANTS‚* 6690***************************** 6685ˆPAGEƒ 6680INOKƒRTS 6675INERR‚SEV 6670ˆBLE„INOK…BRANCHIFOK 6665ˆCMPAƒ#9 6660ˆBLT„INERR„BRANCHIFERROR 6655ˆSUBAƒ#$30…CHANGETODECIMAL 6650INDEC‚JSR„OUTCH 6645ˆBEQ„INOK…BRANCHIFCR 6640ˆCMPAƒ#CR 6635INNRƒEQU„*ˆINPUTSDECIMALNUMBERORCR 6630ˆSPC„2 6625INSTP3JMP„RCP1A 6620INSTP2CLR„VAL1 6615INSTP1STABƒVAL1+1 6610ˆBRA„INSTP3 6605ˆSTAAƒVAL1+1 6600ˆABA 6595ˆASLB 6590ˆASLB 6585ˆASLB 6580ˆASLB 6575ˆLDABƒVAL1+1 6570ˆBEQ„INSTP2ƒBRANCHIFCR 6565ˆCMPAƒ#CR 6560ˆBVS„INSTP3ƒBRANCHIFERROR 6555INSTP5JSR„INNR…NEXTCHAR. 6550* 6545*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6540* 6535ˆRETURNINSTP5 6530ˆSTAAƒVAL1+1ƒTWOHEXCHARACTERSINABYTE 6525ˆABA 6520ˆASLB 6515ˆASLB 6510ˆASLB 6505ˆASLB 6500ˆBEQ„INSTP1ƒBRANCHIF7 CR 6495ˆCMPAƒ#CR 6490ˆLDABƒVAL1…GETFIRSTENTRY 6485ˆBVS„INSTP3 6480INSTP4JSR„INNR…GETDECIMALCHAR. 6475* 6470*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6465* 6460ˆRETURNINSTP4 6455ˆBEQ„INSTP3ƒBRANCHIFCR 6450ˆCMPAƒ#CR 6445ˆSTAAƒVAL1 6440ˆBVS„INSTP3ƒBRANCHIFERROR 6435INSTP0JSR„INNR 6430* 6425*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6421* 6420ˆRETURNINSTP0 6419ˆCLR„VAL1+1 6418*ONERRORTHEOVERFLOWBITISSET 6417INSTEPEQU„*ˆGETSA1-3DIGITDECIMALNRANDSTORESITINVAL1 6416ˆPAGE 6415ˆRTS 6414ˆPULA 6413ˆPULB 6412ˆBNE„FND01„ROTATETILLREQUESTEDBITISINTHECARRY 6410ˆDECB® 6409FND01‚ROLAŒROTATELEFT;BITINCARRY 6408ˆLDAAƒ0,X†GETBYTE 6407ˆLDABƒBLOOP 6406ˆPSHBŒBITNR 6405ˆJSR„TSTBITƒFINDBIT 6404ˆJSR„AXA†ADDOFFSETTOPOINTER 6403ˆPSHA 6402* 6400*SHIFTINGLEFTANDPUTSITINTHECARRY 6398*SELECTSTHECORRESPONDINGBITOUTOFABYTEPOINTEDTOBYXBY 6396*ENTEREDWITH(BITNR+1)INB-REG 6394FNDBITEQU„* 6392ˆSPC„3 6390ˆRTSDONE 6385ˆSTAAƒ0,X„RETURNTHEBYTE 6380ˆBNE„SETB1 6375ˆDECB 6370SETB1‚ROLAŒMOVEBITBACK 6365ˆLSR„R0‡BIT0OFR0INTHECARRY 6360ˆLDABƒBLOOP„BITPOSITIONINABYTE 6355* 6350*R0=0CLEARBIT;R0=1SETBIT;MOVESBITBACKINTOBYTE 6345SETBITEQU„*ˆSETSORCLEARSTHED.O.BITINTHECARRY 6340ˆPAGEƒ 6335ˆRTS 6330ˆBNE„GET01„ROTATETILLREQUESTEDBITISINTHECARRY 6325ˆDECB® 6320GET01‚RORAŒROTATERIGHT;BITINCARRY 6315ˆLDAAƒ0,X 6310ˆLDABƒBLOOP 6305* 6300*PUTSITINTHECARRY 6295*SELECTSTHECORRESPONDINGBITOUTOFABYTEPOINTEDTOBYXAND 6290*ENTEREDWITH(BITNR+1)INBLOOP 6285GETBITEQU„* 6280ˆSPC„3 6275ˆRTS 6271ˆPULB 6270ˆJSR„GETBIT 6265ˆJSR„AXA 6260TSTB2‚STAAƒR4‡KEEPTHEOFFSET 6255ˆBRA„TSTB1„CHECKTHENEXTBYTE 6250ˆINCAŒBLOOPHAS(BITNR+1)MODULO8 6245ˆBLE„TSTB2„BRANCHIFOFFSETISCORRECTFORTHISINPUT 6240ˆSUBBƒ#8 6235TSTB1‚STABƒBLOOP 6230ˆCLRA 6226ˆPSHBŒBITNRINBREG 6225*XPOINTSTOSTARTOFTHEDATA;EXITSWITHBITVALUEINTHECARRYAND 6220TSTBITEQU„*ˆBITNRTOBECHECKEDINB-REG 6215ˆSPC„3 6210ˆJMP„LOTNR1ƒ 6205ˆLDX„RECIPE 6200ˆLDABƒ#8‡MAX8CHARACTERS 6195ˆJSR„PDATA 6190ˆLDX„#M35…/NEWNAME:/ 6185ˆJSR„PDATA1ƒDISPLAYOLDNAME 6180ˆLDX„#DSPBUF 6175ˆSTAAƒDSPBUF+8 6170ˆLDAAƒ#4 6165ˆMOVEƒRECIPE,DSPBUF,8 6160ˆJSR„PDATA1 6155ˆLDX„#M34…/RECIPENAME:/ 6150ˆJSR„CLRALL 6140RCNAMEEQU„*ˆCHANGESTHERECIPENAME 6135ˆPAGEƒ 6130LOTNR4JMP„JOB00„RETURNTOJOBSELECTION 6125ˆBNE„LOTNR3 6120ˆDEC„R3 6115ˆSTX„OUTPUT 6110ˆINX 6105ˆSTAAƒ0,X 6100ˆLDX„OUTPUT 6095LOTNR3LDAAƒ#$20…FILLREMAINDERWITHCHARACTERS 6090* 6085ˆRETURNLOTNR2 6080ˆBEQ„LOTNR4ƒBRANCHIFMAX.NUMBERLENGTHISENTERED 6075ˆDEC„R3 6070ˆSTX„OUTPUT 6065ˆINX 6060ˆSTAAƒ0,X 6055ˆLDX„OUTPUT 6050ˆJSR„OUTCH 6045ˆBEQ„LOTNR3ƒBRANCHIFCR 6040LOTNR2CMPAƒ#CR 6035ˆBEQ„LOTNR4ƒBRANCHIFDONE 6030LOTNR5CMPAƒ#CR 6025* 6020*ENTERHEREAFTERKEYENTRY 6015* 6010ˆRETURNLOTNR5 6005ˆSTABƒR3 6000LOTNR1STX„OUTPUT 5995ˆLDABƒ#15†MAX15CHAR. 5990ˆINX 5985ˆSTABƒ0,X†PUTSPACEBEFORETHELOTNR 5980ˆDEX 5975ˆLDX„RECIPE 5970ˆLDABƒ#$20 5965ˆJSR„PDATA 5960ˆLDX„#M33…/NEWNUMBER:/ 5955ˆJSR„PDATA1 5950ˆLDX„#DSPBUF 5945ˆSTAAƒDSPBUF+15 5940ˆLDAAƒ#4 5935ˆMOVEƒRECIPE,DSPBUF,15 5930ˆSTX„RECIPE 5925ˆJSR„AXA 5920ˆLDAAƒ#9‡SKIPFIRST9BYTESINRECIPEHEADER 5915ˆLDX„RECIPE 5910ˆJSR„PDATA1 5905ˆLDX„#M32…/LOTNUMBER:/ 5900ˆJSR„CLRALL 5890LOTNR‚EQU„*ˆC8 HANGESTHELOTNR 5885ˆPAGE 5880ˆJMP„SPRECPƒCHANGETHESETPOINTS 5875ˆSTX„EDVECT 5870ˆLDX„#RCEDIT‚RETURNADDRESS 5865ˆSTAAƒRFLAG„SETFLAGFORRECIPECHANGE 5860ˆLDAAƒ#1 5855ˆSTX„OUTPUTƒADDRESSOFDATA 5850ˆJSR„AXA 5845ˆLDAAƒ#AIN04ƒOFFSETINSTEP 5840ˆLDX„STEPPT 5835*SETPOINTCHANGE 5830ˆBNE„RCP10„TRYAGAIN 5825RCP8ƒDECA 5820ˆJMP„CHDO…CHANGETHEDIGITALOUTPUTS 5815ˆSTX„EDVECT 5810ˆLDX„#RCEDIT‚RETURNADDRESS 5805ˆSTX„OUTPUTƒADDRESSOFDATA 5800ˆJSR„AXA 5795ˆLDAAƒ#DOMSK1‚OFFSETINSTEPOFD.O.'S 5790ˆLDX„STEPPT 5785*DIGITALOUTPUTS 5780ˆBNE„RCP8‚ 5775RCP7ƒDECA 5770RCP10‚JMP„RCEDITƒEXITFROMTHISSTEP 5765ˆSTAAƒ2,X 5760ˆLDAAƒNUMBER+1 5755ˆSTAAƒ1,X†ANDSTOREIT 5750ˆLDAAƒNUMBER 5745ˆLDX„STEPPT 5740ˆBNE„STTIMEƒBRANCHIFTIMENOTOK 5737ˆCMPAƒ#'Y 5736ˆBEQ„RCP10„EXITWITHOUTTIMECHANGE 5735RCP6C‚CMPAƒ#$D 5730ˆJMP„CHTIMEƒGETNEWENTRY 5725ˆSTX„EDVECT 5720ˆLDX„#RCP6CƒRETURNADDRESS 5715ˆSTX„SECOND 5710ˆLDX„1,X†GETTIMEENTRY 5705STTIMELDX„STEPPT 5700*CHANGETHETIMEINASTEP 5695ˆJMP„RCP7…CHECKFORD.O.CHANGE 5690ˆBEQ„STTIMEƒBRANCHIFTIMECHANGE 5685ˆDECA 5680ˆPULA 5675ˆJSR„CLRDSP 5670ˆCURPOSLINE2,0 5665ˆPSHA 5660ˆBLT„RCP6…TRYAGAIN 5655RCP6B‚SUBAƒ#$30 5650ˆJMP„RCEDITƒEXITFROMTHISSTEP 5645ˆBNE„RCP6B 5640RCP6A‚CMPAƒ#CR 5635* 5630*ENTERHEREAFTERKEYENTRY 5625* 5620ˆRETURNRCP6A 5605ˆJSR„PDATA 5600ˆLDX„#M16…/(1)TIMEETC./ 5595ˆJSR„STEPNRƒDISPLAYSTEPNR 5590ˆPARAM‚#0,STEPNO,#DSPBUF 5585ˆJSR„PDATA1 5580ˆLDX„#M4†/‚STEP/ 5575ˆJSR„CLRDSP 5570RCP6ƒCURPOSLINE1,0 5565* 5560ˆSTX„STEPPT 5555ˆJSR„ADDRPTƒADDB-1TIMESATOXREG 5550ˆLDAAƒ#STPLEN 5546ˆINCBŒADJUSTSTEPNOFORADDRPTROUTINE 5545ˆLDABƒSTEPNO 5540RCP4ƒINX 5535*COMPUTESTARTADDRESSOFTHESTEP 5530ˆJMP„RCP1…TRYAGAIN 5520RCP3A‚JSR„PDATA 5515RCP3ƒLDX„#M7†/INCORRECTENTRY/ 5510ˆBRA„RCP3A 5505ˆLDX„#M23…/TOOLARGEANR/ 5500ˆBGT„RCP4…BRANCHIFSTEPNRISOK 5495ˆSBA 5490ˆLDAAƒ0,X†GETTOTALNROFSTEPS 5485ˆJSR„AXA 5480ˆLDAAƒ#TOTSTP‚OFFSETTOTOTALSTEPNRBYTEINTHEHEADER 5475ˆLDX„RECIPE‚ 5470ˆSTABƒSTEPNO 5465ˆBNE„RCP3…ERROR 5460ˆTSTA 5455ˆJSR„BCDBINƒCHANGEENTRYTOBINARY 5450RCP2ƒLDABƒVAL1+1 5445ˆJMP„JOB00„EXITTOJOBSELECTION 5440ˆBNE„RCP2…BRANCHIFNOEXITREQUESTED 5435ˆCMPAƒ#CR 5430ˆLDAAƒVAL1 5425RCP1A‚BVS„RCP3…ERROR 5420ˆJMP„INSTEPƒGETSTEPNR 5405ˆJSR„PDATA1 5400RCP1ƒLDX„#M27…/ENTERSTEPNR/ 5395ˆJSR„CLRALL 5385RCEDITEQU„*ˆRECIPEEDITOR 5380ˆPAGE 5375CONLC3RTS 5370ˆCLCNOERRORS 5365ˆBNE„CONLC1ƒBRANCHFORNEXTD.O. 5360ˆDEC„R1‡ 5355CONLC2ADDA2X#CNST10,TEMPX 5350ˆBCS„CONLC3ƒBRANCHIFCOND.INTERLOCKERROR 5345ˆJSR„TSTBIT 5340ˆLDX„BUFPTRƒPOINTTODATA 5335ˆLDABƒ0,X†GETD.O.NRTOCHECKITSVALUE 5330ˆBNE„CONLC2ƒBRANCHIFNOTCOND.INTERLOCK 5325ˆCMPBƒSAVE1„D.O.NROFDOTOBECHANGED 5320CONLC1LDABƒ9,X†COND.INTERL.NR 5315ˆSTX„TEMPX„POINTSTOD.O.NR 5310ˆINX 5305ˆSTABƒR1‡TOTALNR.OFD.O.'S 5300ˆLDABƒ0,X 5295ˆLDX„SYSTAB+10THECONDITIONALINTERLOCKAREINTHESYSTEMFILE 5290*D.O.'SWHENAD.O.ISDEACTIVATED 5285CONLCKEQU„*ˆCHECKSTHECONDITIONALINTERLOCKSOFTHEOTHER 5280ˆSPC„3 5275LOCK4‚RTS 5270LOCK3‚SECINTERLOCKERROR 5265ˆRTS 5260ˆCLC 5255ˆBCC„LOCK3„COMPLEMENTTHECARRYBIT 5250ˆJSR„TSTBITƒTESTOTHERD.O. 5245ˆLDX„BUFPTR 5240ˆBEQ„LOCK4„NOCONDIT.INTERLOCK 5235LOCK2‚LDABƒ9,X†GETCOND.INTERLOCKNR 5230ˆLDX„SAVEX„POINTERTOSYSTABENTRY 5225ˆBCS„LOCK4„BRANCHIF9 CARRYSETDUETOINTERLOCKERROR 5220ˆJSR„TSTBITƒTESTOTHERD.O. 5215ˆLDX„BUFPTR 5210ˆBEQ„LOCK2„NOINTERLOCK 5205ˆLDABƒ8,X†GETINTERLOCKNR 5200ˆCLC 5195ˆSTX„SAVEX 5190*XPOINTSTODONRINSYSTEMFILE 5185LOCKƒEQU„*ˆCHECKSTHEINTERLOCKANDCONDIT.INTERLOCK 5180ˆSPC3ƒ 5175ˆJMP„CHDO1 5170ˆJSR„PCRLF 5165ˆJSR„PDATA1 5160ˆLDX„#M24…/INTERLOCKERROR/ 5155ˆJSR„LEFT 5150CHDO24LDABƒ#6 5145ˆJMP„CHDO6„TRYAGAIN 5140ˆJSR„LEFT…CURSOR1POSITIONLEFT 5135ˆLDABƒ#1 5130ˆJSR„OUTCH 5125CHDO23LDAAƒ#'? 5120*ERROR 5115ˆJMP„XˆRETURNTONEXTLEVELSUBROUTINE 5110CHDO22LDX„EDVECT 5105ˆJSR„BUFBUFƒMOVEDATATOCORRECTMEMORY 5100ˆSTX„LENGTH 5095ˆLDX„#6‡LENGTHOFDATARECORD 5090ˆSTX„DESTIN 5085ˆLDX„OUTPUT 5080ˆSTX„SOURCE 5075CHDO21LDX„#DIGOUT‚NEWVALUESINTHEOUTPUTFIELD 5070ˆJMP„CHDO…TRYAGAIN 5065ˆBEQ„CHDO21ƒBRANCHIFOK 5060CHDO20CMPAƒ#'Y 5055* 5050*ENTERHEREAFTERKEYENTRY 5045* 5040ˆRETURNCHDO20 5035ˆJSR„PDATA 5030CHDO19LDX„#M25…/ALLCHANGESOK?/ 5025ˆJMP„CHDO1„NEXTOUTPUTS 5020ˆJSR„PCRLF 5015CHDO18INC„DOBYTE 5010ˆJMP„CHDO6„NEXTOUTPUT 5005ˆADDA2X#CNST10,POINTR 5000ˆBEQ„CHDO18ƒBRANCHIFDONEWITHTHISLINE 4995ˆDEC„R6‚ 4990CHDO17JSR„SPACE 4985ˆLDABƒ#3 4980ˆJSR„SETBITƒSETCORRECTDIGITALOUTPUTBIT 4975ˆJSR„TSTBITƒGETTHED.O.BITINTHECARRY 4970ˆLDX„#DIGOUT‚POINTTODATA 4965CHDO13LDABƒSAVE1„DONR. 4960ˆJMP„CHDO24ƒINTERLOCKERROR 4955CHDO12BCC„CHDO13ƒBRANCHIFNOERRORS 4950CHDO11JSR„CONLCKƒCHECKTHECONDITIONALINTERLOCKS 4945ˆBRA„CHDO12 4940ˆJSR„LOCK…CHECKTHEINTERLOCK 4935ˆBEQ„CHDO11ƒBRANCHIF1TO0TRANSITIONFORTHED.O. 4930ˆTST„R0 4925ˆLDX„POINTR 4920ˆSTX„BUFPTRƒDATAPOINTER 4915ˆLDX„#DIGOUT 4910CHDO10JSR„PDATA1 4905ˆJMP„CHDO23ƒBRANCHIFERROR 4900ˆBEQ„CHDO10 4895ˆCMPAƒ#'O 4890ˆSTABƒR0 4885ˆANDBƒ#$01… 4880ˆCOMBŒCOMPLEMENTR0,BIT0 4875ˆLDABƒR0 4870ˆLDX„#M17…/OPEN/ 4865ˆBEQ„CHDO10ƒDISPLAYCLOSED 4860ˆCMPAƒ#'C 4855ˆLDX„#M18…/CLOSED/ 4850ˆPULA 4845ˆSTABƒR0 4840ˆLDABƒ7,X†DOTYPE 4835ˆSTABƒSAVE1„DONR 4830ˆLDABƒ0,X 4825ˆLDX„POINTR 4820ˆPSHA 4815ˆBEQ„CHDO17ƒBRANCHFORNEXTDO 4810ˆCMPAƒ#$20…SPACE 4805CHDO7‚LDABƒ#9 4800ˆJMP„CHDO18ƒJMPFORNEXT8D.O.'SOREXIT 4795ˆBNE„CHDO7„ 4790CHDO8‚CMPAƒ#$D†CR? 4785* 4780*ENTERHEREAFTERKEYENTRY 4775* 4770CHDO6‚RETURNCHDO8 4765ˆSTX„POINTRƒPOINTTODONR 4760ˆDEX 4755ˆLDX„TEMPX 4750ˆJSR„PCRLF 4745ˆJSR„NAMDSP 4740ˆSTX„TEMPX 4735ˆSTAAƒCOUNT„MAXIMUMIS8 4730CHDO5‚STAAƒR6‡USEDASCOUNTER 4725ˆLDAAƒ#8 4720ˆBLT„CHDO5„NROFDO'STOBEDISPLAYEDYET 4715CHDO4‚CMPAƒ#8 4710CHDO3AJMP„CHDO19ƒALLDO'SDONE 4705ˆBGT„CHDO4 4700CHDO3‚LDAAƒCOUNT 4695ˆBRA„CHDO2 4690ˆSTAAƒCOUNT 4685ˆSUBAƒ#8 4680ˆLDAAƒCOUNT 4675ˆADDA2X#CNST80,POINTRPOINTXTOCORRECTENTRY 4670ˆBEQ„CHDO3 4665CHDO2‚DECB 4660ˆBEQ„CHDO3AƒBRANCHIFDONE 4655ˆCMPBƒ#7‡ 4650ˆLDABƒDOBYTE 4645CHDO1‚INITƒSYSTAB+10,CNST10 4640ˆJSR„CLRDSP 4635ˆCURPOSLINE15,0 4630ˆMOVEƒOUTPUT,DIGOUT,6 4625ˆSTAAƒDOBYTEƒUSEDASCOUNTER 4620ˆLDAAƒ#1¨ 4615ˆJSR„DOVAL 4610ˆCURPOSLINE3,0 4605ˆJSR„NAMDSPƒDISPLAYDIGITALOUTPUTS 4600ˆINITƒSYSTAB+10,CNST10 4595*ENTEREDWITHADDRESSOFOUTPUTDATAINOUTPUT 4590CHDOƒEQU„*ˆCHANGESTHEDIGITALOUTPUTSINTHESTATUS 4585ˆPAGE 4289ˆJMP„CHTM00ƒTRYAGAIN 4288ˆJSR„PDATA 4287CHTM12LDX„#M7†/INCORRECTENTRY/ 4286* 4285ˆJMP„X 4284CHTM11LDX„EDVECTƒRETURNADDRESS 4283* 4282*ENTERHEREAFTERKEYENTRY 4281* 4280ˆRETURNCHTM11 42: 79ˆJSR„PDATA 4278ˆLDX„#M25…/CHANGESOK?/ 4277ˆSTX„NUMBER 4276ˆJSR„TIMSECƒRESULTINA,BANDINX 4275ˆLDX„#NUMBER 4274ˆBLT„CHTM12ƒBRANCHIF>59SECONDS 4273ˆCMPAƒ4,X 4272ˆBLT„CHTM12ƒBRANCHIF>59MINUTES 4271ˆCMPAƒ2,X 4270CHTM10LDAAƒ#5 4269ˆBLT„CHTM12ƒBRANCHIFTIME>17HOURS 4268ˆCMPAƒ1,X 4267ˆLDAAƒ#7 4266ˆBNE„CHTM10ƒBRANCHIFTIME<10HOURS 4265ˆBLT„CHTM12ƒBRANCHIFTIME>19HOURS 4264ˆCMPAƒ0,X 4263ˆLDAAƒ#1 4262CHTM09LDX„#NUMBER 4261*TESTIFENTRIESARECORRECT 4260ˆRETURNCHTM03 4259CHTM08JSR„OUTCH„DISPLAY. 4258ˆRETURNCHTM08ƒSKIPTHE.INTHEENTRY 4257ˆBEQ„CHTM09ƒBRANCHIFHH.MM.SSAREENTERED 4256ˆDEC„R1 4255ˆSTX„TEMP1 4254ˆINX 4253ˆINX 4252ˆSTAAƒ1,X 4251ˆLDX„TEMP1 4250CHTM06BVS„CHTM12ƒINCORRECTENTRY 4249CHTM05JSR„INDEC 4248* 4247*ENTERHEREAFTERKEYENTRY 4246* 4245ˆRETURNCHTM05 4244ˆSTX„TEMP1 4243ˆSTAAƒ0,X 4242CHTM04LDX„TEMP1 4241ˆBVS„CHTM06ƒINCORRECTENTRY 4240CHTM03JSR„INDEC„CHECKIFDECIMALCHARCTER 4239* 4238*ENTERHEREAFTERKEYENTRY 4237* 4236ˆBRA„CHTM04 4235ˆBEQ„CHTM11ƒBRANCHTOEXITIFCR 4234ˆCMPAƒ#$D† 4233ˆBVS„CHTM06ƒINCORRECTENTRY 4232CHTM01JSR„INNR…CHECKIFDECIMALCHARCTERORCR 4231* 4230*ENTERHEREAFTERKEYENTRY 4229* 4228ˆRETURNCHTM01 4227ˆSTABƒR1‡COUNTER 4226ˆLDABƒ#3 4225ˆSTX„TEMP1 4224ˆLDX„#NUMBER 4223ˆJSR„PDATA 4222CHTM00LDX„#M21…/NEWTIME=/ 4221ˆJSR„PDATA1 4220ˆLDX„#DSPBUF 4219ˆJSR„TIMCVT‚CONVERTOLDTIMETODISPLAYFORMAT 4218ˆJSR„PDATA1 4217ˆLDX„#M20…/TIME=/ 4216*ENTEREDWITHTHEOLDTIMEINSECOND;NEWTIMEINVAL1,X,NUMBER 4215CHTIMEEQU„*ˆDISPLAYSTHETIMEANDGETSTHENEWVALUE 4210ˆPAGE 4209ˆJMP„SPSTATƒCHANGEDESIREDSETPOINTS 4208ˆINC„SPFLAG 4207ˆSTX„OUTPUT 4206ˆLDX„#AIMIR+6STARTADDRESSOFDATA 4205ˆBNE„EDITSTƒINCORRECTENTRY 4200EDIT04DECA 4195ˆJMP„CHDO…CHANGEDESIREDDIGITALOUTPUTS 4190ˆSTX„OUTPUT 4185ˆLDX„#DOMIRƒSTARTADDRESSOFTHEDATA 4180ˆBNE„EDIT04ƒBRANCHFORSETPOINTCHANGE 4175ˆDECA 4170ˆCLR„RFLAG 4165ˆSTX„EDVECTƒRETURNVECTOR 4160EDIT03LDX„#EDIT02 4155ˆJMP„JOB00 4151EDIT02CLR„SPFLAGƒENDOFSETPOINTCHANGEINSTATUS 4150ˆSTX„TIME+1 4145ˆLDX„NUMBERƒREPLACEOLDTIMEWITHNEWTIME 4140ˆBNE„EDIT01ƒBRANCHIFNOTSURE 4135ˆCMPAƒ#'Y 4132ˆBEQ„EDIT02ƒEXITWITHOUTTIMECHANGE 4131EDIT1ACMPAƒ#$D 4130ˆJMP„CHTIMEƒDISPLAYANDGETTHETIMECHANGE 4125ˆSTX„EDVECTƒRETURNVECTOR 4120ˆLDX„#EDIT1A 4115ˆSTX„SECOND 4110EDIT01LDX„TIME+1 4105*TIMECHANGE 4100ˆBNE„EDIT03ƒBRANCHIFDIG.OUTPUTCHANGE 4095ˆBLT„EDITSTƒINCORRECTENTRY 4090ˆSUBAƒ#$31 4085ˆPULA 4080ˆJSR„CLRDSP 4075ˆCURPOSLINE2,0 4070ˆPSHA 4065ˆBEQ„EDIT02ƒBRANCHIFCR;EXIT 4060EDIT00CMPAƒ#CR 4055* 4050*ENTERHEREAFTERKEYENTRY 4045* 4040ˆRETURNEDIT00 4025ˆJSR„PDATA1 4020ˆLDX„#M19…STATUSCHANGESELECTION 4015ˆJSR„CLRALL 4005EDITSTEQU„*ˆSTATUSEDITOR 4000ˆPAGEƒ 3995DOVAL9RTS 3990ˆBRA„DOVAL1 3985ˆSTAAƒCOUNT1 3980ˆLDAAƒ#8 3975ˆJSR„PCRLF 3970ˆJSR„PCRLF 3965ˆBNE„DOVAL1 3960ˆDEC„COUNT1 3955ˆADDA2X#CNST10,POINTR 3950ˆJSR„SPACE 3945ˆLDABƒ#3 3940ˆBEQ„DOVAL9 3935ˆDEC„COUNT 3925DOVAL6JSR„PDATA1 3920ˆLDX„#M17…/OPEN/N.O.OUTPUT 3915ˆBEQ„DOVAL6ƒBRANCHIFN.C.OUTPUT 3910ˆLDAAƒR5 3905DOVAL4LDX„#M18…/CLOSED/ 3900ˆBRA„DOVAL6ƒ 3895ˆLDX„#M18…/CLOSED/NORMALLYOPENOUTPUT 3890ˆBEQ„DOVAL6ƒBRANCHIFNORMALLYCLOSEDOUTPUT 3885ˆLDAAƒR5 3880ˆLDX„#M17…/OPEN/ 3875ˆBCC„DOVAL4ƒBRANCHIFD.O.=0 3870ˆJSR„GETBIT 3865ˆJSR„AXA 3; 860ˆLDAAƒR4 3855ˆLDX„OUTPUT 3850ˆSTAAƒR5 3845ˆLDAAƒ7,X†GETD.O.TYPE 3840DOVAL3STAAƒR4 3835ˆBRA„DOVAL2 3830ˆINCA 3825ˆBLE„DOVAL3ƒBRANCHIFOFFSETISCORRECT 3820ˆSUBBƒ#8 3815DOVAL2STABƒBLOOP„DONRISSTOREDINBLOOPMODULO8 3810ˆCLRA 3805ˆLDABƒ0,X†GET}€} À0010ˆNAM„ACCESSƒ 0015ˆOPT„LLEN=120,REL 0020ˆSPC„3 0025ˆXDEFƒTUBACC,INITTA,POINTR,JOB00 0026ˆXDEFƒCONLCK,DSPAI,DSPAO,LOCK,M23,M24,M25,M31,M7,M38 0027ˆXDEFƒNAMAO,NAMDSP,SETBIT,TSTBIT,INIT1,INIT2 0030ˆXDEFƒRFLAG,STEPPT,COUNT,COUNT1,TEMPX,VALVE,DOBYTE,TEMP1,SAVEX 0035ˆXDEFƒSAVE1,BUFPTR,BLOOP,R0,R1,R2,R5,R6,R7,DVECTR,EDVECT,OFFSET 0040ˆXDEFƒOUTPUT,EXIT,RCEDIT,EDIT02 0045ˆSPC„1 0050ˆXREFƒPDATA,PDATA1,OUTCH,PCRLF,PCRLF3,SPACE,SCROLL,CLRDSP,LEFT 0055ˆXREFƒNOBLNK,BLINK,CURSOR,TOSCR,BOSCR,CLRALL 0060ˆXREFƒCVTSP,CVTNUM,INT2FP,IPOLR,IPOL,TIMCVT,TIMSEC,BCDBIN 0065ˆXREFƒBINBCD,NUMBER,FACTOR,SECOND,BUFADD,DSPBUF,BUFFER 0070ˆXREFƒDIV4,DIVID,DIVISR,RCPTR1,RCPTR2,RCPTR3,SYSTAB 0075ˆXREFƒFPDIV,FPMUL,FIX,HSMUL,MUL1,MUL2,DISPTM,R3,R4 0080ˆXREFƒAXA,CPBAX,BUFBUF,SOURCE,DESTIN,LENGTH,COMMND,TUBRDY 0085ˆXREFƒIMTC1,TIME,CURSTP,ACTIV,AIMIR,AOMI1,DIMIR,DOMIR,ABSTAT 0090ˆXREFƒALSTAT,HLSTAT,TCERR,ABVEC 0095ˆXREFƒSPFLAG,SPSTAT,SPRECP,FNDAO,AOVAL,ADDRPT 0100ˆSPC„3 0105DSTIMEEQU„10‡5SECONDREFRESHTIME 0110ˆBSCT 0115ˆSPC„1 0120R0…RMB„1 0125R1…RMB„1 0130R2…RMB„1 0135R5…RMB„1 0140R6…RMB„1 0145R7…RMB„1 0150POINTRRMB„2 0155OFFSETRMB„1 0160BUFPTRRMB„2ˆADDRESSOFBUFFER 0165DVECTRRMB„2ˆJUMPVECTORFORINTERRUPTSERVICEROUTINE 0170EDVECTRMB„2ˆRETURNVECTORTOHIGHERLEVEL'SUBROUTINES' 0175COUNT‚RMB„1ˆCOUNTER 0180COUNT1RMB„1ˆIDEM 0185OUTPUTRMB„2 0190RECIPERMB„2ˆADDRESSOFRECIPEPOINTERTORECIPE1,2OR3 0195RCPPTRRMB„2ˆADDRESSOFRECIPEBEINGEXECUTED 0200STEPPTRMB„2ˆSTARTADDRESOFASTEP 0205SAVEX‚RMB„2 0210TEMPX‚RMB„2 0215TEMP1‚RMB„2 0220VAL1ƒRMB„2 0225UPDATERMB„1ˆ1=UPDATESTATUSDISPLAY 0230MEMOƒRMB„4 0235RFLAG‚RMB„1ˆRECIPE=1/STATUS=0 0240DIGOUTRMB„6 0245VALVE‚RMB„1 0250BLOOP‚RMB„1 0255DOBYTERMB„1 0260STEPNORMB„1 0265SAVE1‚RMB„1 0270ˆSPC3ƒ 0275*******MACRODEFINITIONS******* 0280* 0285*MACROWHICHSETSINTITIALPARAMETERSFORNAMEDISPLAY; 0290*ARGUMENTSARETHESYSFILEPOINTERANDTHEOFFSETINANENTRY 0295INITƒMACR 0300ˆLDX„\0 0302ˆLDAAƒ#\1 0303ˆJSR„INIT1 0340ˆENDM 0345ˆSPC„2 0350*THISMACROSENDSCURSORINSTRUCTIONSTOTHECRT 0355*THESPECIFIEDARGUMENTISTHELINENUMBER 0360*OFTHEINSTRUCTION,FOLLOWEDBYTHEPOSITIONONTHELINE 0365*ITCALLSBLINKTOPUTCURSORONSCREEN 0370CURPOSMACR 0375ˆJSR„NOBLNK 0380ˆLDX„#\0 0385ˆLDAAƒ#\1 0390ˆJSR„AXA 0395ˆJSR„BLINK 0400ˆENDM 0405ˆPAGEƒ 0410*MACROMOVESETSTHEPARAMETERSFORBUFBUFANDCALLSBUFBUF 0415*THEARGUMENTSARESOURCEPOINTER,DESTINATION,LENGTHOFDATASTRING 0420MOVEƒMACR 0425ˆLDX„\0 0430ˆSTX„SOURCE 0435ˆLDX„#\1 0440ˆSTX„DESTIN 0445ˆLDX„#\2 0450ˆSTX„LENGTH 0455ˆJSR„BUFBUF 0460ˆENDM 0465ˆSPC„2 0470*MACROTOPUTVALUESINA,BANDXREGISTER 0475PARAM‚MACR 0480ˆLDAAƒ\0 0485ˆLDABƒ\1 0490ˆLDX„\2 0495ˆENDM 0500ˆSPC„2 0505*MACROWHICHADDSOFFSETTOPOINTER;RESULTINPOINTERANDX 0510ADDA2XMACR 0515ˆLDAAƒ\0 0520ˆLDX„\1 0525ˆJSR„AXA 0530ˆSTX„\1 0535ˆENDM 0540ˆSPC„3 0545*MACROWHICH< PUTSRETURNADDRESSFORKEYBOARDENTRYINDVECTR 0550*ARGUMENTISRETURNADDRESS 0555RETURNMACR 0560ˆLDX„#\0 0565ˆSTX„DVECTR 0570ˆRTS 0575ˆENDM 0580ˆPAGE 0585ˆPSCT 0590ˆSPC„1 0595TUBACCEQU„*ˆENTRYFORTUBELEVELACCESSFROMMAINTUBE 0600*CONTROLLERSOFTWARE 0605ˆTSTAŒCHECKKEYBOARDENTRY 0610ˆBEQ„TUB01„BRANCHIFNOCHARACTER 0615ˆLDX„DVECTRƒ 0620ˆJMP„XˆJUMPTOKEYHANDLINGROUTINE 0625TUB01‚TST„UPDATE 0630ˆBEQ„EXIT…BRANCHIFNOTSTATUSDISPLAY 0635ˆTST„DISPTM 0640ˆBNE„EXIT…BRANCHIFNOUPDATEYET 0645ˆJSR„DSHEADƒSTATUSHEADERREFRESH 0650ˆJSR„DSPVALƒSTATUSDISPLAYREFRESH 0655ˆLDAAƒ#DSTIMEƒRESETTHEDISPLAYREFRESHCOUNTER 0660ˆSTAAƒDISPTM 0665EXITƒRTS 0670ˆSPC„3 0675JOB00‚EQU„*ˆJOBSELECTIONFORTUBEACCESS 0685ˆJSR„CLRALL 0690ˆCLR„UPDATEƒNOTUBESTATUSDISPLAY 0695JOB01‚LDX„#M1†/JOBSELECTIONETC./ 0700ˆJSR„PDATA 0705JOB11‚LDX„#M30…/YOURSELECTION:/ 0710ˆJSR„PDATA 0715ˆRETURNJOB02 0720* 0725*ENTERHEREAFTERKEYENTRY 0730* 0731JOB02‚CMPAƒ#$38…AHASKEYBOARDENTRY 0732ˆBGE„JOB09„INCORRECTENTRY 0735ˆSUBAƒ#$31…AHASKEYBOARDENTRY 0740ˆBLT„JOB09„INCORRECTENTRY 0741ˆCMPAƒ#4 0742ˆBLT„JOB07„BRANCHIFFIRST4FUNCTIONS 0743ˆSTAAƒR3‡TEMPSTORAGE 0744*ASKWHICHRECIPEHASTOBECHANGED(1,2,3) 0746ˆLDX„#M36…/ENTERSTEPNR/ 0748ˆJSR„PDATA 0750ˆLDX„#M30…/YOURSELECTION:/ 0752ˆJSR„PDATA 0754ˆRETURNJOB04 0756* 0758*ENTERHEREAFTERKEYENTRY 0760* 0762JOB04‚JSR„INDEC„CHECKIFITISANUMBER 0764ˆBVS„JOB09„BRANCHIFNOTANUMBER 0766ˆLDX„#RCPTR1‚RECIPEPOINTER 0768ˆDECA 0770ˆBEQ„JOB06„BRANCHIFRECIPE1SELECTED 0772ˆLDX„#RCPTR2‚RECIPEPOINTER 0774ˆDECA 0776ˆBEQ„JOB06„BRANCHIFRECIPE2SELECTED 0778ˆLDX„#RCPTR3‚RECIPEPOINTER 0780ˆDECA 0782ˆBNE„JOB09„BRANCHIFERROR 0784JOB06‚LDABƒ0,X 0786ˆTSTB 0788ˆBEQ„JOB09„BRANCHIFERROR 0790ˆINX 0792ˆLDX„0,X†GETADRESSOFSTARTOFRECIPE 0794ˆSTX„RECIPEƒPOINTERFORTHERECIPEEDITOR 0796ˆLDAAƒR3 0798JOB07‚LDX„#JOBTAB 0799ˆASLA 0800ˆJSR„AXA 0801ˆLDX„0,X†GETSTARTINGADDRESSOFREQUESTEDFUNCTION 0802ˆJMP„X†EXECUTESELECTEDFUNCTION;RETURNISALWAYSTOJOB00 0803* 0804JOB09‚LDX„#M7†INCORRECTENTRY 0805ˆJSR„PDATA 0806ˆJMP„JOB01 0807* 0808JOBTABFDB„DSPTUB 0809ˆFDB„DSPDO 0810ˆFDB„EDITST 0811ˆFDB„COMMND 0812ˆFDB„RCEDIT 0813ˆFDB„LOTNR 0814ˆFDB„RCNAME 1010ˆPAGEƒ 1015INITTAEQU„*ˆINITIALISATIONOFTUBELEVELACCESSVARIABLES 1040ˆLDX„#LINE1ƒINITIATECURSORTOLINE1 1045ˆSTX„TOSCR„INITIATETOPOFSCREENTOLINE1 1050ˆLDX„#LINE25 1055ˆSTX„BOSCR„POINTSATFIRSTLINEPASTTHESCREEN 1056ˆCLR„TUBRDYƒCOMMUNICATIONCOMMANDFLAG 1065ˆJSR„DSPTUBƒDISPLAYSTATUS 1070ˆRTS 1071ˆSPC„3 1072INIT1‚EQU„*ˆSETSTHEPARAMETERSSPECIFIEDBYTHEMACRO 1073ˆLDABƒ0,X†INITINTHECORRECTPOSITIONS 1074ˆSTABƒCOUNT 1075ˆINX 1076ˆINX 1077ˆSTX„POINTR 1078ˆSTAAƒOFFSET 1079ˆRTS 1080ˆSPC„3 1081INIT2‚EQU„*ˆSETSTHEPARAMETERSTODISPLAYVALUESWITH 1082ˆLDAAƒ0,X† 1083ˆINXSYSTAB 1084ˆSTX„POINTR 1085ˆLDABƒ#8 1093ˆSTABƒCOUNT1 1095ˆSTAAƒCOUNT 1096ˆRTS 1097ˆPAGE 1098DSPTUBEQU„*ˆDISPLAYSTHETUBESTATUS;NOTONINTERRUPTBASIS 1099ˆLDAAƒ#1 1100ˆSTAAƒUPDATE 1101ˆJSR„CLRALLƒCLEARDISPLAY 1102ˆCLR„SPFLAGƒNOCHANGESINRECIPEORSTATUS 1103ˆCLR„RFLAG 1104ˆJSR„DSHEAD 1105ˆLDX„SYSTAB+8DIPTR 1106ˆLDAAƒ0,X†NROFDIGITALINPUTS 1110ˆCMPAƒ#40 1115ˆBPL„DSPT02ƒBRANCHIF>40DIENTRIES(NOLF) 1120*DISPLAYTHETCNAMES 1125ˆJSR„PCRLF 1130DSPT02= INITƒSYSTAB,CNST07 1135ˆLDAAƒ#9 1140ˆSTAAƒCOUNT1 1145ˆJSR„NAMDSP 1150ˆJSR„PCRLF3 1155*DISPLAYTHEANALOGINPUTNAMES 1160ˆINITƒSYSTAB+4,CNST15 1165ˆJSR„NAMDSP 1170ˆJSR„PCRLF 1175ˆJSR„PCRLF 1180*ANALOGOUTPUTS+AUX.TC'S 1190ˆJSR„NAMAO 1205ˆINITƒSYSTAB+2,CNST15 1210ˆJSR„NAMDSP 1215ˆJSR„PCRLF3 1220*DIGITALINPUTS 1225ˆINITƒSYSTAB+8,CNST07 1230ˆJSR„NAMDSP 1235*BOTTOMLINE 1240ˆJSR„PCRLF 1245ˆJSR„BLINE„ 1250*DISPLAYTHEVALUES 1255ˆJSR„DSPVAL 1260ˆRETURNJOB00 1265ˆSPC„3 1270DSPVALEQU„*ˆEXISTSOFSUBROUTINECALLSFORTHEDISPLAY 1275*–OFTHEACTUALVALUES 1280ˆCURPOSLINE3,0 1285ˆLDX„SYSTAB+8DIPTR 1290ˆLDAAƒ0,X†NROFDIGITALINPUTS 1295ˆCMPAƒ#40 1300ˆBPL„DSP01„BRANCHIF>40DIGITALINPUTSHAVETOBEDISPLAYED 1305ˆJSR„PCRLF 1310DSP01‚JSR„DSPTC„TCVALUES 1315ˆJSR„PCRLF3 1325ˆJSR„DSPAI„AIVALUES 1330ˆJSR„PCRLF 1335ˆJSR„PCRLF 1340ˆJSR„DSPAO„AOVALUES 1355ˆJSR„DSPAUXƒAUXILIARYTCVALUES 1360ˆJSR„PCRLF3 1365ˆJSR„DSPDI„DIVALUES 1370ˆCURPOSLINE24,50 1375ˆRTS 1380ˆSPCƒ3 1385DSHEADEQU„*ˆDISPLAYHEADER 1390ˆCURPOSLINE1,0 1395ˆLDAAƒACTIV 1400ˆANDAƒ#$03…CHECKIFRECIPESELECTED 1405ˆBNE„DSHEA1ƒBRANCHIFRECIPESELECTED 1410*PUTSPACESINDISPLAY 1415ˆLDABƒ#24 1420ˆJSR„SPACE 1425ˆBRA„DSHEA5 1430DSHEA1LDX„RCPTR1+1ADDRESSOFRECIPE1 1435ˆDECAŒ 1440ˆBEQ„DSHEA4 1445ˆLDX„RCPTR2+1ADDRESSOFRECIPE2 1450ˆDECAƒ 1455ˆBEQ„DSHEA4 1460ˆLDX„RCPTR3+1ADDRESSOFRECIPE3 1465DSHEA4STX„POINTR 1470ˆMOVEƒPOINTR,DSPBUF,24 1475ˆLDAAƒ#4 1480ˆSTAAƒDSPBUF+24 1485ˆLDX„#DSPBUF 1490ˆJSR„PDATA1 1495* 1500DSHEA5LDX„#M2†/STATUS/ 1505ˆJSR„PDATA1 1510ˆJSR„PROCST 1515* 1520ˆJSR„BOAT…DISPLAYBOATPOSITION 1525* 1530ˆLDX„#M4†/STEP/ 1535ˆJSR„PDATA1 1540ˆPARAM‚#0,CURSTP,#DSPBUF 1545ˆJSR„STEPNR 1550* 1555ˆLDX„#M5†/TIME/ 1560ˆJSR„PDATA1 1565ˆLDABƒCURSTP 1570ˆBNE„DSHEA6ƒBRANCHIFNOTSTEP0 1575ˆLDABƒABVEC 1580ˆBNE„DSHEA6ƒBRANCHIFTIMEDISPLAY 1581ˆLDABƒ#8 1582ˆJSR„SPACEƒPUTSPACES,WHENTIMEHASNOMEANING 1583ˆBRA„DSHEA7 1585DSHEA6LDX„TIME+1ƒPUTCURRENTTIMEENTRYINSECOND 1590ˆSTX„SECOND 1595ˆJSR„TIMCVT 1600ˆLDX„#DSPBUF 1605ˆJSR„PDATA1 1610DSHEA7JSR„PCRLF 1615ˆRTS 1620ˆPAGEƒ 1625BLINE‚EQU„*ˆDISPLAYTHEBOTTOMLINE 1630ˆCURPOSLINE24,10 1635ˆLDX„#M6†/PRESSANYKEYETC./ 1640ˆJSR„PDATA1 1645ˆRTS 1650ˆSPC„3 1655BOATƒEQU„*ˆDISPLAYSTHEBOATPOSITION 1660ˆLDX„SYSTAB+4ANALOGOUTPUT16ISDEDICATEDTOBOATPULLERCONTR 1665ˆLDABƒ0,X†NROFA.I.'S 1666ˆINCBŒBOATPULLERISNOTINCLUDEDINTOTALNROFA.I.'S 1675ˆINX 1680ˆLDAAƒ#CNST15 1685ˆJSR„ADDRPTƒADDA(B-1)TIMESTOX 1686ˆSTX„POINTR 1690*FOUNDLASTA.I.ENTRY;CHECKIFITISTHEBOATPULLER 1695BOAT2‚LDABƒ0,X 1700ˆCMPBƒ#16 1705ˆBNE„BOAT9„NOBOAT 1710ˆSTABƒBLOOP 1715ˆLDX„#AIMIRƒPOINTERINAISTATUS 1720ˆLDAAƒ#36 1725ˆJSR„AXA†POINTTODATA 1730ˆJSR„DSPNUMƒRESULTISINDSPBUF,READYFORDISPLAY 1735ˆLDX„#$2025ƒSPACE,% 1740ˆSTX„DSPBUF+2 1745ˆLDAAƒ#4 1750ˆSTAAƒDSPBUF+4 1755ˆLDX„#M3 1760ˆJSR„PDATA1 1765ˆLDX„#DSPBUF 1770ˆJSR„PDATA1 1785BOAT9‚RTS 1825ˆPAGEƒ 1830NAMDSPEQU„* 1835ˆTST„COUNT 1840ˆBEQ„NAMRTSƒBRANCHIFNOTHINGHASTOBEDISPLAYED 1845ˆLDAAƒ#9 1850ˆCMPAƒCOUNT1 1855ˆBEQ„NAM01„COUNT1ISSETTO8,UNLESSITWASALREADY 1860ˆDECAŒTO9 1865ˆSTAAƒCOUNT1 1866NAM01‚TST„SPFLAG 1867ˆBEQ„NAM02„BRANCHIFNOTSETPOINTCHANGEINSTATUSDISPLAY 1868ˆLDAAƒ13,X…DISPLAYONLYTHELINKEDA.I.'S 1869ˆBNE„NAM02 1870ˆDEC„COUNT 1880ˆBEQ„NAMRTS> ƒBRANCHIFDONE 1890ˆBRA„NAM03„CHECKNEXTENTRY 1891NAM02‚MOVEƒPOINTR,DSPBUF,6NAMEINDSPBUF 1892ˆLDAAƒ#4 1893ˆSTAAƒDSPBUF+6 1894ˆLDX„#DSPBUF 1895ˆJSR„PDATA1 1896ˆDEC„COUNT 1900ˆBEQ„NAMRTSƒBRANCHIFDONE 1905ˆLDABƒ#3 1910ˆJSR„SPACE 1915NAM03‚ADDA2XOFFSET,POINTRCOMPUTENEXTENTRYINSYSFILE 1920ˆDEC„COUNT1 1925ˆBNE„NAM01„BRANCHIFTHISLINEISNOTFULL 1930ˆJSR„PCRLF 1935ˆJSR„PCRLF 1940ˆLDAAƒ#8 1945ˆSTAAƒCOUNT1ƒ8ENTRIESONEACHLINE 1950ˆBRA„NAM01 1955NAMRTSRTS 1960ˆSPC„2 1965NAMAO‚EQU„*ˆDISPLAYUNLINKEDA.O.'S 1966ˆCLRA 1967NAMAO1STAAƒR7 1968ˆLDX„SYSTAB+12UNLINKEDA.O.TABLE 1969ˆJSR„AXA†AHASOFFSETINTABLE 1970ˆLDABƒ0,X†GETA.O.NRORZEROIFENDOFENTRY'S 1971ˆBEQ„NAMAO5ƒBRANCHIFDONE 1972ˆSTABƒR2 1973ˆJSR„FNDAO„GETPOSITIONINSYSTABOFTHISA.O. 1974ˆINXƒPOINTTONAME 1975ˆSTX„POINTR 1980ˆMOVEƒPOINTR,DSPBUF,6 2030ˆLDAAƒ#4 2035ˆSTAAƒDSPBUF+6 2040ˆLDX„#DSPBUF 2045ˆJSR„PDATA1ƒDISPLAYNAME 2050ˆLDABƒ#3 2055ˆJSR„SPACE 2056ˆLDAAƒR7‡OFFSETINSYSTAB+12 2057ˆINCA 2075ˆBRA„NAMAO1ƒ 2080NAMAO5RTS 2085ˆPAGEƒ 2090PROCSTEQU„*ˆDISPLAYSPROCESSTATUSINTHREEFIELDS 2095ˆLDAAƒACTIV„CONTAINSTHESTATUSINFO 2100ˆPSHAŒSAVEIT 2105ˆLDX„#M8†/ID/ 2110ˆBITAƒ#$80 2115ˆBNE„PROC05ƒBRANCHIFIDLE 2120ˆLDX„#M9†/RN/ 2125ˆBITAƒ#$40 2130ˆBNE„PROC05ƒBRANCHIFINRUN 2135ˆLDX„#M10…/FN/ 2140ˆBITAƒ#$20 2145ˆBNE„PROC05ƒBRANCHIFFINISHED 2150ˆLDABƒ#3 2155ˆJSR„SPACE„SKIPFIELDIFNONEOFTHEABOVE 2160* 2165PROC01LDX„#M11…/AB/ 2170ˆPULA 2175ˆPSHAŒSAVEACTIVEAGAIN 2180ˆBITAƒ#$08 2185ˆBNE„PROC06ƒBRANCHIFABORTED 2190ˆLDX„#M12…/AL/ 2195ˆBITAƒ#$10 2200ˆBNE„PROC06ƒBRANCHIFALARM 2205ˆLDABƒ#3 2210ˆJSR„SPACE„SKIPTHISDATAFIELD 2215* 2220PROC02LDX„#M13…/HD/ 2225ˆPULA 2230ˆBITAƒ#$04 2235ˆBNE„PROC07ƒBRANCHIFINHOLD 2240ˆLDABƒ#3 2245ˆJSR„SPACE„SKIPTHISDATAFIELD 2250ˆBRA„PROC08 2255* 2260PROC05JSR„PDATA1 2265ˆBRA„PROC01 2270PROC06JSR„PDATA1 2275ˆBRA„PROC02 2280PROC07JSR„PDATA1 2285PROC08RTS 2290ˆSPC„3 2295STEPNREQU„*ˆGETSTEPNRANDCONVERTITTOASCII 2300*ENTEREDWITHSTEPNRINB,DSPBUFINX;A=0 2305ˆSTX„BUFADDƒRESULTOFBINAIRTOBCDCONVERSIONINDSPBUF 2310ˆJSR„BINBCD 2315ˆLDAAƒ#4 2320ˆSTAAƒDSPBUF+5 2325ˆLDX„#DSPBUF+2MAXIMUMISA3DIGITSTEPNR 2330ˆJSR„PDATA1 2335ˆRTS 2340ˆPAGEƒ 2345DSPTC‚EQU„*ˆDISPLAYSTEMPERATURES 2350ˆLDX„SYSTABƒTCPTRISINSYSTAB 2355ˆJSR„INIT2„GETPARAMETERS 2365ˆBEQ„DSPTC9ƒBRANCHIFNOENTRY 2374ˆLDAAƒ#9 2376ˆSTAAƒCOUNT1 2378ˆLDX„#IMTC1ƒPOINTERFORTHETCVALUES 2380ˆSTX„MEMO— 2381*COMPUTEBITNRTOFINDCORRECTBITINALARM/ABORTSTATUS 2382DSPTC1LDX„POINTR 2383ˆCLRA 2384ˆLDABƒ0,X†GETTCNR 2385ˆCMPBƒ#6 2386ˆBGT„DSPTC3ƒNOALARM/ABORTFROMCALIBRATIONT.C. 2387ˆINCA 2388ˆCMPBƒ#2 2389ˆBLEƒDSPTC3ƒT.C'S1,2HAVEPOSITION1INBYTE 2390ˆINCA 2391ˆCMPBƒ#4 2392ˆBLE„DSPTC3ƒT.C'S3,4HAVEPOSITION2INBYTE 2393ˆINCAŒT.C'S5,6HAVEPOSITION3 2410DSPTC3STAAƒBLOOPƒBLOOP=0IFNOALARM/ABORTCHECK 2415ˆLDX„MEMO 2420ˆJSR„TCVAL„CONVERTANDDISPLAYTHISVALUE 2425ˆTST„COUNT„ALREADYDECREMENTEDINTCVAL 2430ˆBEQ„DSPTC9ƒBRANCHIFFINISHED 2435ˆLDX„MEMO 2440ˆINX 2445ˆINX 2450ˆSTX„MEMO 2455ˆADDA2X#CNST07,POINTR 2460ˆBRA„DSPTC1 2465DSPTC9RTS 2470ˆSPC„3 2475TCVAL‚EQU„*ˆCONVERTSANDDISPLAYSAVALUEINXASDEGR.C. 2480ˆLDX„XˆGETTHEVALUE 2485ˆJSR„IPOLR„CONVERTBITCOUNTSTODEGREES 2490ˆLDX„#DSPBUF 2495ˆSTX„BUFADD 2500ˆJSR„BINBCD 2505ˆLDX„? #$2043 2510ˆSTX„DSPBUF+5FILLDISPLAYBUFFER 2515ˆLDX„#$2004 2520ˆSTX„DSPBUF+7 2525ˆLDAAƒ#8 2535ˆJSR„ALAB…TESTFORABORT,ALARMSTATUS 2536ˆBCC„TCVAL1ƒBRANCHIFOK 2537ˆLDX„0,X†GETMESSAGE 2538ˆSTX„DSPBUF+5 2540TCVAL1LDX„#DSPBUF+1 2545ˆJSR„PDATA1 2550ˆDEC„COUNT„NOSPACESAFTERTHELASTENTRY 2555ˆBEQ„TCVAL9 2560ˆLDABƒ#2 2565ˆJSR„SPACE 2570TCVAL9RTS 2575ˆSPC„3 2580DSPAI‚EQU„*ˆDISPLAYSTHEANALOGINPUTVALUES 2585ˆLDX„SYSTAB+4AIPTRISINSYSTAB+4 2586ˆJSR„INIT2„SETINITIALPARAMETERS 2600ˆBEQ„DSPAI9 2625DSPAI1LDX„POINTR 2630ˆLDABƒ0,X†GETA.I.NR 2635ˆSTABƒBLOOP 2636ˆTST„SPFLAG 2637ˆBEQ„DSPAI7ƒBRANCHIFNOTSETPOINTCHANGEINSTATUSDISPLAY 2638ˆLDAAƒ14,X…DISPLAYONLYTHELINKEDA.I.'S 2639ˆBNE„DSPAI6ƒBRANCHFORDISPLAY 2640ˆADDA2X#CNST07,POINTR 2641ˆBRA„DSPAI5ƒNEXTENTRY 2642DSPAI7LDX„#AIMIR+6STATUSDISPLAY 2645ˆTST„RFLAG 2650ˆBEQ„DSPAI2ƒBRANCHIFSTATUSDISPLAY 2660DSPAI6LDX„#BUFFER‚A.I.VALUEPOINTERFORSETPOINTCHANGE 2670DSPAI2LDAAƒ#2‡USEA.I.NRTOFINDTHEVALUEOFTHISA.I. 2675ˆJSR„ADDRPTƒINAI-MIRROR 2680DSPAI3JSR„DSPNUMƒCONVERTSANDDISPLAYSTHEVALUE 2681ˆCLRAŒOFFSETIS0 2690ˆJSR„ALAB…CHECKALARMS,ABORTS;REGA=0FOROFFSET 2695DSPAI4JSR„PRALABƒPRINTINFO 2700DSPAI5DEC„COUNT 2705ˆBEQ„DSPAI9 2710ˆADDA2X#CNST08,POINTRPOINTTONEXTENTRYINSYSFILE 2715ˆDEC„COUNT1 2720ˆBNE„DSPAI1ƒBRANCHIFNOTATENDOFTHELINE 2725ˆJSR„PCRLF 2730ˆJSR„PCRLF„NEXTLINE 2735ˆLDAAƒ#8 2740ˆSTAAƒCOUNT1 2745ˆBRA„DSPAI1 2750DSPAI9RTS 2755ˆSPC„3 2760DSPNUMEQU„*ˆCONVERTSANDDISPLAYSAVALUEPOINTEDTOBYX 2765ˆLDAAƒ0,X†GETFIRSTBYTE 2770ˆCMPAƒ#$7F…CHECKFORDON'TCARE 2775ˆPSHA 2780ˆBEQ„DSPNM1ƒBRANCHIFDON'TCARE 2790ˆANDAƒ#$F†12SIGNIFICANTBITS 2795ˆLDABƒ1,X†2NDDATABYTE 2800ˆJSR„INT2FPƒCONVERTTOFLOATINGPOINT;RESULTINNUMBER 2805DSPNM1ADDA2X#CNST07,POINTR 2810ˆMOVEƒPOINTR,DSPBUF+1,7FACTOR+UNITINDSPBUF 2815ˆPULAŒ 2820ˆCMPAƒ#$7F 2825ˆBEQ„DSPNM2ƒBRANCHIFDON'TCARE 2830ˆJSR„CVTNUMƒ 2835ˆBRA„DSPNM3 2840DSPNM2LDX„#$2020ƒSPACES 2845ˆSTX„DSPBUF+1 2850ˆSTX„DSPBUF+3 2855ˆLDAAƒ#'D 2860ˆSTAAƒDSPBUF 2865DSPNM3LDX„#$2004 2870ˆSTX„DSPBUF+8 2875ˆLDX„#DSPBUF 2880ˆRTS 2885ˆSPC„3 2890DSPAO‚EQU„*ˆDISPLAYTHEANALOGOUTPUTS 2895ˆCLRA 2900DSPAO1STAAƒR7„ 2905ˆLDX„SYSTAB+12UNLINKEDA.O.TABLE 2910ˆJSR„AXA†AHASOFFSETINTABLE 2915ˆLDABƒ0,X†GETA.O.NRORZEROIFENDOFENTRY'S 2920ˆBEQ„DSPAO9ƒBRANCHIFDONE 2921ˆSTABƒR2 2930ˆJSR„FNDAO„GETPOSITIONINSYSTABOFTHISA.O. 2940ˆSTX„POINTR 2941ˆLDABƒR2 2942ˆTST„RFLAG 2943ˆBNE„DSPAO4ƒBRANCHIFRECIPEDISPLAY 2944ˆTST„SPFLAG 2945ˆBNE„DSPAO4ƒBRANCHIFSTATUSCHANGEDISPLAY 2946ˆJSR„AOVAL„FINDVALUEINA.O.STATUS 2947ˆBRA„DSPAO5 3005DSPAO4LDX„TEMPX„POINTTOSTARTOFDATA-2 3010ˆINX 3015ˆINX 3020ˆSTX„TEMPX 3025DSPAO5JSR„DSPNUMƒCONVERTANDDISPLAYTHEVALUE 3030ˆJSR„PDATA1 3031ˆLDAAƒR7‡GETOFFSETINSYSTAB+12 3032ˆINCA 3050ˆBRA„DSPAO1 3055DSPAO9RTS 3095ˆPAGE 3100DSPAUXEQU„*‚DISPLAYSTHEAUXILIARYTCINPUTS 3105ˆLDX„SYSTAB+2AUXPTRISINSYSTAB+2 3106ˆJSR„INIT2 3120ˆBEQ„DSPAU9ƒNONETODISPLAY 3135DSPAU0LDAAƒ14,X…0=TEMPERATURECONV.;1=LINEAIR 3140ˆLDABƒ0,X†AUXTCNR 3145ˆSTABƒBLOOP 3150ˆLDX„#IMTC1 3155ˆPSHA 3160ˆLDAAƒ#2 3165ˆJSR„ADDRPTƒCOMPUTETHEOFFSETINTCMIRROR 3170ˆPULA 3175DSPAU3TSTA 3180ˆBEQ„DSPAU4ƒTEMP.CONVERSION 3185ˆJSR„DSPNUMƒCONVERTSANDDISPLAYSAVALUE 3190ˆLDAAƒ#8ƒINITIALOFFSET@ INABORT/ALARMSTATUS 3200ˆJSR„ALAB…CHECKALARMSANDABORTS 3205ˆJSR„PRALAB 3210ˆDEC„COUNT 3215ˆBRA„DSPAU5 3220DSPAU4JSR„TCVAL„DISPLAYSTEMP.ANDDECREMENTSCOUNT 3225ˆADDA2X#CNST07,POINTR 3230DSPAU5TST„COUNT 3235ˆBEQ„DSPAU9 3240ˆADDA2X#CNST08,POINTR 3245ˆBRA„DSPAU0 3250DSPAU9RTS 3255ˆSPC„3 3260DSPDI‚EQU„*ˆDISPLAYTHEDIGITALINPUTSTATUS 3265ˆLDX„SYSTAB+8DIPTR 3266ˆJSR„INIT2 3280ˆBNE„DSPDI1 3285ˆJMP„DSPD11ƒEXIT 3310DSPDI1LDX„POINTR 3315ˆLDABƒ0,X†GETDIGITALINPUTNR 3320ˆLDX„#DIMIRƒPOINTTODATA 3325ˆJSR„TSTBIT 3330ˆBCC„DSPDI4„BRANCHIFOFF 3335ˆLDX„#M14…/ON/ 3340ˆBRA„DSPDI5 3345DSPDI4LDX„#M15…/OFF/ 3346DSPDI5STABƒBLOOP„BITNR 3350ˆJSR„PDATA1 3360ˆLDAAƒ#2‡INITIALOFFSETINTHEABORT,AL,HLBLOCKS 3361ˆJSR„ALAB…CHECKFORABORTSETC. 3455ˆBCS„DSPDI9ƒBRANCHIFALARM 3460ˆLDABƒ#3 3465ˆJSR„SPACE 3470ˆBRA„DSPD10 3480DSPDI9JSR„PDATA1 3485* 3490DSPD10DEC„COUNT 3495ˆBEQ„DSPD11ƒBRANCHIFDONE 3500ˆLDABƒ#2 3505ˆJSR„SPACE 3510ˆADDA2X#CNST07,POINTR 3515ˆDEC„COUNT1 3520ˆBNE„DSPD1A 3525ˆJSR„PCRLF 3530ˆJSR„PCRLF 3535ˆLDAAƒ#8 3540ˆSTAAƒCOUNT1 3545DSPD1AJMP„DSPDI1 3550DSPD11RTS 3555ˆSPC„3 3560ALABƒEQU„*ˆCHECKSFORABORTANDALARMSTATUS; 3565*PUTSCORRECTLABELINDSPBUF 3570*ENTEREDWITHOFFSETINALARMANDAB.STATUSINREGA 3575*NROFINPUTINBLOOP;IFBLOOP=0,NOALARM/ABORTCHECK 3580* 3586ˆLDABƒBLOOP 3587ˆBEQ„ALAB3„NOABORT/ALARMCHECK 3590ˆLDX„#ABSTAT 3600ˆJSR„FNDBIT 3605ˆBCC„ALAB1„BRANCHIFNOTABORT 3606ˆLDX„#M11…/AB/ 3615ˆBRA„ALAB3 3620ALAB1‚LDX„#ALSTAT 3624ˆJSR„FNDBIT 3628ˆBCC„ALAB2„BRANCHIFOK 3632ˆLDX„#M12…/AL/ 3633ˆBRA„ALAB3 3649ALAB2‚LDX„#HLSTAT 3652ˆJSR„FNDBIT 3655ˆBCC„ALAB3„BRANCHIFOK 3658ˆLDX„#M13…/HL/ 3659ALAB3‚RTS 3660ˆSPC„3 3661PRALABEQU„*ˆPRINTSTHEMESSAGEAL,AB,HDORUNITFORA.I. 3662ˆBCC„PRAL01ƒDSPBUFOK 3663ˆLDX„0,X†GETMESSAGE 3665ˆSTX„DSPBUF+5 3667ˆLDAAƒ#$20 3669ˆSTAAƒDSPBUF+7 3671PRAL01LDX„#DSPBUF 3672ˆJSR„PDATA1 3673ˆRTS 3675ˆPAGE 3680DSPDO‚EQU„*ˆDIGITALOUTPUTDISPLAY 3690ˆJSR„CLRALL 3695ˆJSR„DSHEAD 3700ˆJSR„PCRLF 3705ˆINITƒSYSTAB+10,CNST10 3710ˆJSR„NAMDSP 3715ˆCURPOSLINE4,0 3720ˆLDX„#DOMIRƒSTARTADDRESSOFDATA 3725ˆSTX„OUTPUT 3730ˆJSR„DOVAL„DISPLAYDIGITALOUTPUTVALUES 3735ˆJSR„BLINE„BOTTOMLINE 3740ˆRETURNJOB00„ANYKEYENTRYCHANGESDISPLAYTOJOBSELECTION 3745ˆSPC„2 3750DOVAL‚EQU„*ˆDISPLAYD.O.SETTING;DATAADDRESSISINOUTPUT 3760ˆLDX„SYSTAB+10DOPTR 3761ˆJSR„INIT2„SETPARAMETERS 3775ˆBEQ„DOVAL9ƒBRANCHIFNOD.O.'S 3800DOVAL1LDX„POINTR 3805ˆLDABƒ0,X†GETD.O.NR 3810ˆCLRA 3815DOVAL2STABƒBLOOP„DONRISSTOREDINBLOOPMODULO8 3820ˆSUBBƒ#8 3825ˆBLE„DOVAL3ƒBRANCHIFOFFSETISCORRECT 3830ˆINCA 3835ˆBRA„DOVAL2 3840DOVAL3STAAƒR4 3845ˆLDAAƒ7,X†GETD.O.TYPE 3850ˆSTAAƒR5 3855ˆLDX„OUTPUT 3860ˆLDAAƒR4 3865ˆJSR„AXA 3870ˆJSR„GETBIT 3875ˆBCC„DOVAL4ƒBRANCHIFD.O.=0 3880ˆLDX„#M17…/OPEN/ 3885ˆLDAAƒR5 3890ˆBEQ„DOVAL6ƒBRANCHIFNORMALLYCLOSEDOUTPUT 3895ˆLDX„#M18…/CLOSED/NORMALLYOPENOUTPUT 3900ˆBRA„DOVAL6ƒ 3905DOVAL4LDX„#M18…/CLOSED/ 3910ˆLDAAƒR5 3915ˆBEQ„DOVAL6ƒBRANCHIFN.C.OUTPUT 3920ˆLDX„#M17…/OPEN/N.O.OUTPUT 3925DOVAL6JSR„PDATA1 3935ˆDEC„COUNT 3940ˆBEQ„DOVAL9 3945ˆLDABƒ#3 3950ˆJSR„SPACE 3955ˆADDA2X#CNST10,POINTR 3960ˆDEC„COUNT1 3965ˆBNE„DOVAL1 3970ˆJSR„PCRLF 3975ˆJSR„PCRLF 3980ˆLDAAƒ#8 3985ˆSTAAƒCOUNT1 3990ˆBRA„DOVAL1 3995DOVAL9RTS 4000ˆPAGEƒ 4005EDITSTEQU„*ˆSTATUSEDITOR 4015ˆJSR„A CLRALL 4020ˆLDX„#M19…STATUSCHANGESELECTION 4025ˆJSR„PDATA1 4040ˆRETURNEDIT00 4045* 4050*ENTERHEREAFTERKEYENTRY 4055* 4060EDIT00CMPAƒ#CR 4065ˆBEQ„EDIT02ƒBRANCHIFCR;EXIT 4070ˆPSHA 4075ˆCURPOSLINE2,0 4080ˆJSR„CLRDSP 4085ˆPULA 4090ˆSUBAƒ#$31 4095ˆBLT„EDITSTƒINCORRECTENTRY 4100ˆBNE„EDIT03ƒBRANCHIFDIG.OUTPUTCHANGE 4105*TIMECHANGE 4110EDIT01LDX„TIME+1 4115ˆSTX„SECOND 4120ˆLDX„#EDIT1A 4125ˆSTX„EDVECTƒRETURNVECTOR 4130ˆJMP„CHTIMEƒDISPLAYANDGETTHETIMECHANGE 4131EDIT1ACMPAƒ#$D 4132ˆBEQ„EDIT02ƒEXITWITHOUTTIMECHANGE 4135ˆCMPAƒ#'Y 4140ˆBNE„EDIT01ƒBRANCHIFNOTSURE 4145ˆLDX„NUMBERƒREPLACEOLDTIMEWITHNEWTIME 4150ˆSTX„TIME+1 4151EDIT02CLR„SPFLAGƒENDOFSETPOINTCHANGEINSTATUS 4155ˆJMP„JOB00 4160EDIT03LDX„#EDIT02 4165ˆSTX„EDVECTƒRETURNVECTOR 4170ˆCLR„RFLAG 4175ˆDECA 4180ˆBNE„EDIT04ƒBRANCHFORSETPOINTCHANGE 4185ˆLDX„#DOMIRƒSTARTADDRESSOFTHEDATA 4190ˆSTX„OUTPUT 4195ˆJMP„CHDO…CHANGEDESIREDDIGITALOUTPUTS 4200EDIT04DECA 4205ˆBNE„EDITSTƒINCORRECTENTRY 4206ˆLDX„#AIMIR+6STARTADDRESSOFDATA 4207ˆSTX„OUTPUT 4208ˆINC„SPFLAG 4209ˆJMP„SPSTATƒCHANGEDESIREDSETPOINTS 4210ˆPAGE 4215CHTIMEEQU„*ˆDISPLAYSTHETIMEANDGETSTHENEWVALUE 4216*ENTEREDWITHTHEOLDTIMEINSECOND;NEWTIMEINVAL1,X,NUMBER 4217ˆLDX„#M20…/TIME=/ 4218ˆJSR„PDATA1 4219ˆJSR„TIMCVT‚CONVERTOLDTIMETODISPLAYFORMAT 4220ˆLDX„#DSPBUF 4221ˆJSR„PDATA1 4222CHTM00LDX„#M21…/NEWTIME=/ 4223ˆJSR„PDATA 4224ˆLDX„#NUMBER 4225ˆSTX„TEMP1 4226ˆLDABƒ#3 4227ˆSTABƒR1‡COUNTER 4228ˆRETURNCHTM01 4229* 4230*ENTERHEREAFTERKEYENTRY 4231* 4232CHTM01JSR„INNR…CHECKIFDECIMALCHARCTERORCR 4233ˆBVS„CHTM06ƒINCORRECTENTRY 4234ˆCMPAƒ#$D† 4235ˆBEQ„CHTM11ƒBRANCHTOEXITIFCR 4236ˆBRA„CHTM04 4237* 4238*ENTERHEREAFTERKEYENTRY 4239* 4240CHTM03JSR„INDEC„CHECKIFDECIMALCHARCTER 4241ˆBVS„CHTM06ƒINCORRECTENTRY 4242CHTM04LDX„TEMP1 4243ˆSTAAƒ0,X 4244ˆSTX„TEMP1 4245ˆRETURNCHTM05 4246* 4247*ENTERHEREAFTERKEYENTRY 4248* 4249CHTM05JSR„INDEC 4250CHTM06BVS„CHTM12ƒINCORRECTENTRY 4251ˆLDX„TEMP1 4252ˆSTAAƒ1,X 4253ˆINX 4254ˆINX 4255ˆSTX„TEMP1 4256ˆDEC„R1 4257ˆBEQ„CHTM09ƒBRANCHIFHH.MM.SSAREENTERED 4258ˆRETURNCHTM08ƒSKIPTHE.INTHEENTRY 4259CHTM08JSR„OUTCH„DISPLAY. 4260ˆRETURNCHTM03 4261*TESTIFENTRIESARECORRECT 4262CHTM09LDX„#NUMBER 4263ˆLDAAƒ#1 4264ˆCMPAƒ0,X 4265ˆBLT„CHTM12ƒBRANCHIFTIME>19HOURS 4266ˆBNE„CHTM10ƒBRANCHIFTIME<10HOURS 4267ˆLDAAƒ#7 4268ˆCMPAƒ1,X 4269ˆBLT„CHTM12ƒBRANCHIFTIME>17HOURS 4270CHTM10LDAAƒ#5 4271ˆCMPAƒ2,X 4272ˆBLT„CHTM12ƒBRANCHIF>59MINUTES 4273ˆCMPAƒ4,X 4274ˆBLT„CHTM12ƒBRANCHIF>59SECONDS 4275ˆLDX„#NUMBER 4276ˆJSR„TIMSECƒRESULTINA,BANDINX 4277ˆSTX„NUMBER 4278ˆLDX„#M25…/CHANGESOK?/ 4279ˆJSR„PDATA 4280ˆRETURNCHTM11 4281* 4282*ENTERHEREAFTERKEYENTRY 4283* 4284CHTM11LDX„EDVECTƒRETURNADDRESS 4285ˆJMP„X 4286* 4287CHTM12LDX„#M7†/INCORRECTENTRY/ 4288ˆJSR„PDATA 4289ˆJMP„CHTM00ƒTRYAGAIN 4585ˆPAGE 4590CHDOƒEQU„*ˆCHANGESTHEDIGITALOUTPUTSINTHESTATUS 4595*ENTEREDWITHADDRESSOFOUTPUTDATAINOUTPUT 4600ˆINITƒSYSTAB+10,CNST10 4605ˆJSR„NAMDSPƒDISPLAYDIGITALOUTPUTS 4610CHDOA‚CURPOSLINE3,0 4615ˆJSR„DOVAL 4620ˆLDAAƒ#1¨ 4625ˆSTAAƒDOBYTEƒUSEDASCOUNTER 4630ˆMOVEƒOUTPUT,DIGOUT,6 4635ˆCURPOSLINE15,0 4640ˆJSR„CLRDSP 4645CHDO1‚INITƒSYSTAB+10,CNST10 4650ˆLDABƒDOBYTE 4655ˆCMPBƒ#7‡ B 4660ˆBEQ„CHDO3AƒBRANCHIFDONE 4665CHDO2‚DECB 4670ˆBEQ„CHDO3 4675ˆADDA2X#CNST80,POINTRPOINTXTOCORRECTENTRY 4680ˆLDAAƒCOUNT 4685ˆSUBAƒ#8 4690ˆSTAAƒCOUNT 4695ˆBRA„CHDO2 4700CHDO3‚LDAAƒCOUNT 4705ˆBGT„CHDO4 4710CHDO3AJMP„CHDO19ƒALLDO'SDONE 4715CHDO4‚CMPAƒ#8 4720ˆBLT„CHDO5„NROFDO'STOBEDISPLAYEDYET 4725ˆLDAAƒ#8 4730CHDO5‚STAAƒR6‡USEDASCOUNTER 4735ˆSTAAƒCOUNT„MAXIMUMIS8 4740ˆSTX„TEMPX 4745ˆJSR„NAMDSP 4750ˆJSR„PCRLF 4755ˆLDX„TEMPX 4760ˆDEX 4765ˆSTX„POINTRƒPOINTTODONR 4770CHDO6‚RETURNCHDO8 4775* 4780*ENTERHEREAFTERKEYENTRY 4785* 4790CHDO8‚CMPAƒ#$D†CR? 4795ˆBNE„CHDO7„ 4800ˆJMP„CHDO18ƒJMPFORNEXT8D.O.'SOREXIT 4805CHDO7‚LDABƒ#9 4810ˆCMPAƒ#$20…SPACE 4815ˆBEQ„CHDO17ƒBRANCHFORNEXTDO 4820ˆPSHA 4825ˆLDX„POINTR 4830ˆLDABƒ0,X 4835ˆSTABƒSAVE1„DONR 4840ˆLDABƒ7,X†DOTYPE 4845ˆSTABƒR0 4850ˆPULA 4855ˆLDX„#M18…/CLOSED/ 4860ˆCMPAƒ#'C 4865ˆBEQ„CHDO10ƒDISPLAYCLOSED 4870ˆLDX„#M17…/OPEN/ 4875ˆLDABƒR0 4880ˆCOMBŒCOMPLEMENTR0,BIT0 4885ˆANDBƒ#$01… 4890ˆSTABƒR0 4895ˆCMPAƒ#'O 4900ˆBEQ„CHDO10 4905ˆJMP„CHDO23ƒBRANCHIFERROR 4910CHDO10JSR„PDATA1 4915ˆLDX„#DIGOUT 4920ˆSTX„BUFPTRƒDATAPOINTER 4925ˆLDX„POINTR 4930ˆTST„R0 4935ˆBEQ„CHDO11ƒBRANCHIF1TO0TRANSITIONFORTHED.O. 4940ˆJSR„LOCK…CHECKTHEINTERLOCK 4945ˆBRA„CHDO12 4950CHDO11JSR„CONLCKƒCHECKTHECONDITIONALINTERLOCKS 4955CHDO12BCC„CHDO13ƒBRANCHIFNOERRORS 4960ˆJMP„CHDO24ƒINTERLOCKERROR 4965CHDO13LDABƒSAVE1„DONR. 4970ˆLDX„#DIGOUT‚POINTTODATA 4975ˆJSR„TSTBITƒGETTHED.O.BITINTHECARRY 4980ˆJSR„SETBITƒSETCORRECTDIGITALOUTPUTBIT 4985ˆLDABƒ#3 4990CHDO17JSR„SPACE 4995ˆDEC„R6‚ 5000ˆBEQ„CHDO18ƒBRANCHIFDONEWITHTHISLINE 5005ˆADDA2X#CNST10,POINTR 5010ˆJMP„CHDO6„NEXTOUTPUT 5015CHDO18INC„DOBYTE 5020ˆJSR„PCRLF 5025ˆJMP„CHDO1„NEXTOUTPUTS 5030CHDO19LDX„#M25…/ALLCHANGESOK?/ 5035ˆJSR„PDATA 5040ˆRETURNCHDO20 5045* 5050*ENTERHEREAFTERKEYENTRY 5055* 5060CHDO20CMPAƒ#'Y 5065ˆBEQ„CHDO21ƒBRANCHIFOK 5070ˆJMP„CHDOA…TRYAGAIN 5075CHDO21LDX„#DIGOUT‚NEWVALUESINTHEOUTPUTFIELD 5080ˆSTX„SOURCE 5085ˆLDX„OUTPUT 5090ˆSTX„DESTIN 5095ˆLDX„#6‡LENGTHOFDATARECORD 5100ˆSTX„LENGTH 5105ˆJSR„BUFBUFƒMOVEDATATOCORRECTMEMORY 5110CHDO22LDX„EDVECT 5115ˆJMP„XˆRETURNTONEXTLEVELSUBROUTINE 5120*ERROR 5125CHDO23LDAAƒ#'? 5130ˆJSR„OUTCH 5135ˆLDABƒ#1 5140ˆJSR„LEFT…CURSOR1POSITIONLEFT 5145ˆJMP„CHDO6„TRYAGAIN 5150CHDO24LDABƒ#6 5155ˆJSR„LEFT 5160ˆLDX„#M24…/INTERLOCKERROR/ 5165ˆJSR„PDATA1 5170ˆJSR„PCRLF 5175ˆJMP„CHDO1 5180ˆSPC3ƒ 5185LOCKƒEQU„*ˆCHECKSTHEINTERLOCKANDCONDIT.INTERLOCK 5190*XPOINTSTODONRINSYSTEMFILE 5195ˆSTX„SAVEX 5200ˆCLC 5205ˆLDABƒ8,X†GETINTERLOCKNR 5210ˆBEQ„LOCK2„NOINTERLOCK 5215ˆLDX„BUFPTR 5220ˆJSR„TSTBITƒTESTOTHERD.O. 5225ˆBCS„LOCK4„BRANCHIFCARRYSETDUETOINTERLOCKERROR 5230ˆLDX„SAVEX„POINTERTOSYSTABENTRY 5235LOCK2‚LDABƒ9,X†GETCOND.INTERLOCKNR 5240ˆBEQ„LOCK4„NOCONDIT.INTERLOCK 5245ˆLDX„BUFPTR 5250ˆJSR„TSTBITƒTESTOTHERD.O. 5255ˆBCC„LOCK3„COMPLEMENTTHECARRYBIT 5260ˆCLC 5265ˆRTS 5270LOCK3‚SECINTERLOCKERROR 5275LOCK4‚RTS 5280ˆSPC„3 5285CONLCKEQU„*ˆCHECKSTHECONDITIONALINTERLOCKSOFTHEOTHER 5290*D.O.'SWHENAD.O.ISDEACTIVATED 5295ˆLDX„SYSTAB+10THECONDITIONALINTERLOCKAREINTHESYSTEMFILE 5300ˆLDABƒ0,X 5305ˆSTABƒR1‡TOTALNR.OFD.O.'S 5310ˆINX 5315ˆSTX„TEMPX„POINTSTOD.O.NR 5320CONLC1LDABƒ9,X†COND.INTERLC .NR 5325ˆCMPBƒSAVE1„D.O.NROFDOTOBECHANGED 5330ˆBNE„CONLC2ƒBRANCHIFNOTCOND.INTERLOCK 5335ˆLDABƒ0,X†GETD.O.NRTOCHECKITSVALUE 5340ˆLDX„BUFPTRƒPOINTTODATA 5345ˆJSR„TSTBIT 5350ˆBCS„CONLC3ƒBRANCHIFCOND.INTERLOCKERROR 5355CONLC2ADDA2X#CNST10,TEMPX 5360ˆDEC„R1‡ 5365ˆBNE„CONLC1ƒBRANCHFORNEXTD.O. 5370ˆCLCNOERRORS 5375CONLC3RTS 5380ˆPAGE 5385RCEDITEQU„*ˆRECIPEEDITOR 5395ˆJSR„CLRALL 5400RCP1ƒLDX„#M27…/ENTERSTEPNR/ 5405ˆJSR„PDATA1 5420ˆJMP„INSTEPƒGETSTEPNR 5425RCP1A‚BVS„RCP3…ERROR 5430ˆLDAAƒVAL1 5435ˆCMPAƒ#CR 5440ˆBNE„RCP2…BRANCHIFNOEXITREQUESTED 5445ˆJMP„JOB00„EXITTOJOBSELECTION 5450RCP2ƒLDABƒVAL1+1 5455ˆJSR„BCDBINƒCHANGEENTRYTOBINARY 5460ˆTSTA 5465ˆBNE„RCP3…ERROR 5470ˆSTABƒSTEPNO 5475ˆLDX„RECIPE‚ 5480ˆLDAAƒ#TOTSTP‚OFFSETTOTOTALSTEPNRBYTEINTHEHEADER 5485ˆJSR„AXA 5490ˆLDAAƒ0,X†GETTOTALNROFSTEPS 5495ˆSBA 5500ˆBGT„RCP4…BRANCHIFSTEPNRISOK 5505ˆLDX„#M23…/TOOLARGEANR/ 5510ˆBRA„RCP3A 5515RCP3ƒLDX„#M7†/INCORRECTENTRY/ 5520RCP3A‚JSR„PDATA 5530ˆJMP„RCP1…TRYAGAIN 5535*COMPUTESTARTADDRESSOFTHESTEP 5540RCP4ƒINX 5545ˆLDABƒSTEPNO 5546ˆINCBŒADJUSTSTEPNOFORADDRPTROUTINE 5550ˆLDAAƒ#STPLEN 5555ˆJSR„ADDRPTƒADDB-1TIMESATOXREG 5560ˆSTX„STEPPT 5565* 5570RCP6ƒCURPOSLINE1,0 5575ˆJSR„CLRDSP 5580ˆLDX„#M4†/‚STEP/ 5585ˆJSR„PDATA1 5590ˆPARAM‚#0,STEPNO,#DSPBUF 5595ˆJSR„STEPNRƒDISPLAYSTEPNR 5600ˆLDX„#M16…/(1)TIMEETC./ 5605ˆJSR„PDATA 5620ˆRETURNRCP6A 5625* 5630*ENTERHEREAFTERKEYENTRY 5635* 5640RCP6A‚CMPAƒ#CR 5645ˆBNE„RCP6B 5650ˆJMP„RCEDITƒEXITFROMTHISSTEP 5655RCP6B‚SUBAƒ#$30 5660ˆBLT„RCP6…TRYAGAIN 5665ˆPSHA 5670ˆCURPOSLINE2,0 5675ˆJSR„CLRDSP 5680ˆPULA 5685ˆDECA 5690ˆBEQ„STTIMEƒBRANCHIFTIMECHANGE 5695ˆJMP„RCP7…CHECKFORD.O.CHANGE 5700*CHANGETHETIMEINASTEP 5705STTIMELDX„STEPPT 5710ˆLDX„1,X†GETTIMEENTRY 5715ˆSTX„SECOND 5720ˆLDX„#RCP6CƒRETURNADDRESS 5725ˆSTX„EDVECT 5730ˆJMP„CHTIMEƒGETNEWENTRY 5735RCP6C‚CMPAƒ#$D 5736ˆBEQ„RCP10„EXITWITHOUTTIMECHANGE 5737ˆCMPAƒ#'Y 5740ˆBNE„STTIMEƒBRANCHIFTIMENOTOK 5745ˆLDX„STEPPT 5750ˆLDAAƒNUMBER 5755ˆSTAAƒ1,X†ANDSTOREIT 5760ˆLDAAƒNUMBER+1 5765ˆSTAAƒ2,X 5770RCP10‚JMP„RCEDITƒEXITFROMTHISSTEP 5775RCP7ƒDECA 5780ˆBNE„RCP8‚ 5785*DIGITALOUTPUTS 5790ˆLDX„STEPPT 5795ˆLDAAƒ#DOMSK1‚OFFSETINSTEPOFD.O.'S 5800ˆJSR„AXA 5805ˆSTX„OUTPUTƒADDRESSOFDATA 5810ˆLDX„#RCEDIT‚RETURNADDRESS 5815ˆSTX„EDVECT 5820ˆJMP„CHDO…CHANGETHEDIGITALOUTPUTS 5825RCP8ƒDECA 5830ˆBNE„RCP10„TRYAGAIN 5835*SETPOINTCHANGE 5840ˆLDX„STEPPT 5845ˆLDAAƒ#AIN04ƒOFFSETINSTEP 5850ˆJSR„AXA 5855ˆSTX„OUTPUTƒADDRESSOFDATA 5860ˆLDAAƒ#1 5865ˆSTAAƒRFLAG„SETFLAGFORRECIPECHANGE 5870ˆLDX„#RCEDIT‚RETURNADDRESS 5875ˆSTX„EDVECT 5880ˆJMP„SPRECPƒCHANGETHESETPOINTS 5885ˆPAGE 5890LOTNR‚EQU„*ˆCHANGESTHELOTNR 5900ˆJSR„CLRALL 5905ˆLDX„#M32…/LOTNUMBER:/ 5910ˆJSR„PDATA1 5915ˆLDX„RECIPE 5920ˆLDAAƒ#9‡SKIPFIRST9BYTESINRECIPEHEADER 5925ˆJSR„AXA 5930ˆSTX„RECIPE 5935ˆMOVEƒRECIPE,DSPBUF,15 5940ˆLDAAƒ#4 5945ˆSTAAƒDSPBUF+15 5950ˆLDX„#DSPBUF 5955ˆJSR„PDATA1 5960ˆLDX„#M33…/NEWNUMBER:/ 5965ˆJSR„PDATA 5970ˆLDABƒ#$20 5975ˆLDX„RECIPE 5980ˆDEX 5985ˆSTABƒ0,X†PUTSPACEBEFORETHELOTNR 5990ˆINX 5995ˆLDABƒ#15†MAX15CHAR. 6000LOTNR1STX„OUTPUT 6005ˆSTABƒR3 6010ˆRETURNLOTNR5 6015* 6020*ENTERHEREAFTERKEYENTRY 6025* 6030LOTNR5CMPAƒ#CR 6035ˆBEQ„LOTNR4ƒBRANCHIFDONE 6040LOTNR2CMPAƒ#CD R 6045ˆBEQ„LOTNR3ƒBRANCHIFCR 6050ˆJSR„OUTCH 6055ˆLDX„OUTPUT 6060ˆSTAAƒ0,X 6065ˆINX 6070ˆSTX„OUTPUT 6075ˆDEC„R3 6080ˆBEQ„LOTNR4ƒBRANCHIFMAX.NUMBERLENGTHISENTERED 6085ˆRETURNLOTNR2 6090* 6095LOTNR3LDAAƒ#$20…FILLREMAINDERWITHCHARACTERS 6100ˆLDX„OUTPUT 6105ˆSTAAƒ0,X 6110ˆINX 6115ˆSTX„OUTPUT 6120ˆDEC„R3 6125ˆBNE„LOTNR3 6130LOTNR4JMP„JOB00„RETURNTOJOBSELECTION 6135ˆPAGEƒ 6140RCNAMEEQU„*ˆCHANGESTHERECIPENAME 6150ˆJSR„CLRALL 6155ˆLDX„#M34…/RECIPENAME:/ 6160ˆJSR„PDATA1 6165ˆMOVEƒRECIPE,DSPBUF,8 6170ˆLDAAƒ#4 6175ˆSTAAƒDSPBUF+8 6180ˆLDX„#DSPBUF 6185ˆJSR„PDATA1ƒDISPLAYOLDNAME 6190ˆLDX„#M35…/NEWNAME:/ 6195ˆJSR„PDATA 6200ˆLDABƒ#8‡MAX8CHARACTERS 6205ˆLDX„RECIPE 6210ˆJMP„LOTNR1ƒ 6215ˆSPC„3 6220TSTBITEQU„*ˆBITNRTOBECHECKEDINB-REG 6225*XPOINTSTOSTARTOFTHEDATA;EXITSWITHBITVALUEINTHECARRYAND 6226ˆPSHBŒBITNRINBREG 6230ˆCLRA 6235TSTB1‚STABƒBLOOP 6240ˆSUBBƒ#8 6245ˆBLE„TSTB2„BRANCHIFOFFSETISCORRECTFORTHISINPUT 6250ˆINCAŒBLOOPHAS(BITNR+1)MODULO8 6255ˆBRA„TSTB1„CHECKTHENEXTBYTE 6260TSTB2‚STAAƒR4‡KEEPTHEOFFSET 6265ˆJSR„AXA 6270ˆJSR„GETBIT 6271ˆPULB 6275ˆRTS 6280ˆSPC„3 6285GETBITEQU„* 6290*ENTEREDWITH(BITNR+1)INBLOOP 6295*SELECTSTHECORRESPONDINGBITOUTOFABYTEPOINTEDTOBYXAND 6300*PUTSITINTHECARRY 6305* 6310ˆLDABƒBLOOP 6315ˆLDAAƒ0,X 6320GET01‚RORAŒROTATERIGHT;BITINCARRY 6325ˆDECB® 6330ˆBNE„GET01„ROTATETILLREQUESTEDBITISINTHECARRY 6335ˆRTS 6340ˆPAGEƒ 6345SETBITEQU„*ˆSETSORCLEARSTHED.O.BITINTHECARRY 6350*R0=0CLEARBIT;R0=1SETBIT;MOVESBITBACKINTOBYTE 6355* 6360ˆLDABƒBLOOP„BITPOSITIONINABYTE 6365ˆLSR„R0‡BIT0OFR0INTHECARRY 6370SETB1‚ROLAŒMOVEBITBACK 6375ˆDECB 6380ˆBNE„SETB1 6385ˆSTAAƒ0,X„RETURNTHEBYTE 6390ˆRTSDONE 6392ˆSPC„3 6394FNDBITEQU„* 6396*ENTEREDWITH(BITNR+1)INB-REG 6398*SELECTSTHECORRESPONDINGBITOUTOFABYTEPOINTEDTOBYXBY 6400*SHIFTINGLEFTANDPUTSITINTHECARRY 6402* 6403ˆPSHA 6404ˆJSR„AXA†ADDOFFSETTOPOINTER 6405ˆJSR„TSTBITƒFINDBIT 6406ˆPSHBŒBITNR 6407ˆLDABƒBLOOP 6408ˆLDAAƒ0,X†GETBYTE 6409FND01‚ROLAŒROTATELEFT;BITINCARRY 6410ˆDECB® 6412ˆBNE„FND01„ROTATETILLREQUESTEDBITISINTHECARRY 6413ˆPULB 6414ˆPULA 6415ˆRTS 6416ˆPAGE 6417INSTEPEQU„*ˆGETSA1-3DIGITDECIMALNRANDSTORESITINVAL1 6418*ONERRORTHEOVERFLOWBITISSET 6419ˆCLR„VAL1+1 6420ˆRETURNINSTP0 6421* 6425*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6430* 6435INSTP0JSR„INNR 6440ˆBVS„INSTP3ƒBRANCHIFERROR 6445ˆSTAAƒVAL1 6450ˆCMPAƒ#CR 6455ˆBEQ„INSTP3ƒBRANCHIFCR 6460ˆRETURNINSTP4 6465* 6470*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6475* 6480INSTP4JSR„INNR…GETDECIMALCHAR. 6485ˆBVS„INSTP3 6490ˆLDABƒVAL1…GETFIRSTENTRY 6495ˆCMPAƒ#CR 6500ˆBEQ„INSTP1ƒBRANCHIFCR 6505ˆASLB 6510ˆASLB 6515ˆASLB 6520ˆASLB 6525ˆABA 6530ˆSTAAƒVAL1+1ƒTWOHEXCHARACTERSINABYTE 6535ˆRETURNINSTP5 6540* 6545*ENTERHEREAFTERINTERRUPTFROMKEYBOARD 6550* 6555INSTP5JSR„INNR…NEXTCHAR. 6560ˆBVS„INSTP3ƒBRANCHIFERROR 6565ˆCMPAƒ#CR 6570ˆBEQ„INSTP2ƒBRANCHIFCR 6575ˆLDABƒVAL1+1 6580ˆASLB 6585ˆASLB 6590ˆASLB 6595ˆASLB 6600ˆABA 6605ˆSTAAƒVAL1+1 6610ˆBRA„INSTP3 6615INSTP1STABƒVAL1+1 6620INSTP2CLR„VAL1 6625INSTP3JMP„RCP1A 6630ˆSPC„2 6635INNRƒEQU„*ˆINPUTSDECIMALNUMBERORCR 6640ˆCMPAƒ#CR 6645ˆBEQ„INOK…BRANCHIFCR 6650INDEC‚JSR„OUTCH 6655ˆSUBAE ƒ#$30…CHANGETODECIMAL 6660ˆBLT„INERR„BRANCHIFERROR 6665ˆCMPAƒ#9 6670ˆBLE„INOK…BRANCHIFOK 6675INERR‚SEV 6680INOKƒRTS 6685ˆPAGEƒ 6690***************************** 6695*‚STRINGS‚AND‚CONSTANTS‚* 6700***************************** 6705M1…FCC„/TUBELEVELJOBSELECTION/ 6710ˆFCB„CR,LF 6715ˆFCC„/(1)‚TUBESTATUSDISPLAY/ 6720ˆFCB„CR,LF 6725ˆFCC„/(2)‚DIGITALOUTPUTSTATUSDISPLAY/ 6730ˆFCB„CR,LF 6735ˆFCC„'(3)‚STATUSCHANGE' 6740ˆFCB„CR,LF 6741ˆFCC„/(4)‚MAINTENANCECOMMANDS/ 6742ˆFCB„CR,LF 6745ˆFCC„'(5)‚RECIPECHANGE' 6750ˆFCB„CR,LF 6755ˆFCC„'(6)‚LOTNUMBERCHANGE' 6760ˆFCB„CR,LF 6765ˆFCC„'(7)‚RECIPENAMECHANGE' 6770ˆFCB„LF,EOF 6775M2…FCC„/‚STATUS/ 6780ˆFCB„EOF 6785M3…FCC„/‚BOAT/ 6790ˆFCB„EOF 6795M4…FCC„/‚STEP/ 6800ˆFCB„EOF 6805M5…FCC„/‚TIME/ 6810ˆFCB„EOF 6815M6…FCC„/PRESSANYKEYFORJOBSELECTION/ 6820ˆFCB„EOF 6825M7…FCC„/INCORRECTENTRY/ 6830ˆFCB„CR,LF,EOF 6835M8…FCC„/ID/ 6840ˆFCB„EOF 6845M9…FCC„/RN/ 6850ˆFCB„EOF 6855M10„FCC„/FN/… 6860ˆFCB„EOF 6865M11„FCB„$C1,$C2,$20,EOF/AB/ 6870M12„FCB„$C1,$CC,$20,EOF/AL/ 6875M13„FCB„$C8,$CC,$20,EOF/HD/ 6885M14„FCC„/ON/„ 6890ˆFCB„EOF 6895M15„FCC„/OFF/… 6900ˆFCB„EOF 6905M17„FCC„/OPEN‚/„ 6910ˆFCB„EOF 6915M18„FCC„/CLOSED/… 6920ˆFCB„EOF 6925M19„FCC„/STATUSCHANGE/ 6930ˆFCB„CR,LF 6935M16„FCC„/(1)‚TIME/ 6940ˆFCB„CR,LF 6945ˆFCC„/(2)‚DIGITALOUTPUTS/ 6950ˆFCB„CR,LF 6955ˆFCC„/(3)‚SETPOINTS/ 6960ˆFCB„CR,LF 6962M30„FCC„/…YOURSELECTION:/ 6964ˆFCB„EOF 6970M20„FCC„/„TIME=/ 6975ˆFCB„EOF 6980M21„FCC„/NEWTIME=/ 6985ˆFCB„EOF 6990M23„FCC„/NUMBERTOOLARGE/ 6995ˆFCB„EOF 7000M24„FCC„/INTERLOCKERROR/ 7005ˆFCB„EOF 7010M25„FCC„/CHANGESOK?/… 7015ˆFCB„EOF 7030M27„FCC„/ENTERTHESTEPNUMBERORCRTOEXIT/ 7031ˆFCB„CR,LF,EOF 7060M31„FCC„/RATIOERROR/ 7065ˆFCB„EOF 7070M32„FCC„/LOTNUMBER:/ 7075ˆFCB„EOF 7080M33„FCC„/NEWNUMBER:/ 7085ˆFCB„EOF 7090M34„FCC„/RECIPENAME:/ 7095ˆFCB„EOF 7100M35„FCC„/ƒNEWNAME:/ 7105ˆFCB„EOF 7110M36„FCC„/ENTERTHERECIPENUMBER(1-3)/ 7115ˆFCB„CR,LF,EOF 7116M38„FCC„/COMMANDMODE;LEAVETHISFUNCTIONBYTYPINGCTRL-A/ 7117ˆFCB„CR,LF,EOF 7120ˆPAGE 7125ˆEND åååååååååF ååååååååååååååååååååååååååG ååååååååååååååååååååååååååH ååååååååååååååååååååååååååI ååååååååååååååååååååååååååJ ååååååååååååååååååååååååååK ååååååååååååååååååååååååååL åååååååååååååååååååååååååå