IMD 1.16: 5/06/2007 17:19:13 64813-12007 Rev. 2410A 6809 Pascal Compiler 2 of 2  D #?DGC} �;4#'#'#'#'#'#'#'#'#'#'#'#'#'#'#'#'#'#'#'#'N64813-12007 PASC_COMP_6809 SRS ABSOLUTE S-64813-12007-1 RVA 0202 DESIGNER IZAGMA ALONSO 2410 HEWLETT PACKARD     ‡n›€\€e¨Å€e€e€˾€Œ&H"ö矾0£L}¹ Æç„öý„LÌý€ü€àaRcreat СÐ9  AcreataEcreat жF ÑÞ  &XUOPENIO6809MIO Œ&Hl68XXHP6809 co P+ ³û&XdCA_INFOÄCA_PTR_ARRAY „FD_ARRAY DerrnoäRS232_RECV_OPENäRS232_READ_INDE¤PARSE_NAME ¤SET_RS_ADDRdFIND_FDäFIND_A_DISC_CA „SIO_WAIT ¤SIOF_CHANGE Dcreat ¿ =?>@ ?A@B ACBBÿÿ ˆdatabase HP GG �A �AHl68XXHP HH �% �%xRealLIBC6809 aq �% �%xDerrorsC6809 __ �$ �$xZerrorsC6809 `` �$ �$˜LIB_6809 C6809 T^ �$ �$xPIOLIB C6809 rƒ �% �%xSIMLIB C6809 „ �% �%ˆssmmtmp4 HP(hp)„ �A �A˜DLIB_6809C6809 IS �$ �$ C6}ÿÿAD PASCAL_LIBS_6809 24 Jan 1984 70  l68XX:HP :0004H  DLIB_6809:C6809 :0003H  LIB_6809 :C6809 :0003H  Derrors:C6809 :000CH  Zerrors:C6809 :000CH  RealLIB:C6809 :0003H  PIOLIB :C6809 :0003H  SIMLIB :C6809 :0003H ÿÿÿÿ ÿÿnÖÿÿJ&)D[b …V ‡Œ€ÿÿ€6Rÿ€H!/-ùAddress out of range  …6Œÿ Address out of range  ‡Œ€ÿþ€V …6ÿÀ!�ùnÿÿÿÿÿÿÿÿ&xHEAPS2 C6809 A6½Hl68XXHP6809 co “Ð ­&¤MASTERLINK dMEMERR dDISPOSE²Ý"ý€Y€X_Oý€L2üý€V®Ÿ€VŒ@¤GDZequ ò~ȃ¶€Xˆ·€[ô”€€[''¾€V0®@„Œ& Æ÷€Ä€X†ƒ ¾€€V0®„¿€V Àö€XÈ'{®!QŸ€VŒ'WŽ ˆ¿€P®Ÿ€V¿€R®!RŸ€RŒ'¿€R !¿€P í¾€LŒR"&ü€Rý€Lü€Pýãh~}™„€€N¾€R0þ€€L3B®„¬Ä#Hˆ ü€Rý€Lü€Pýˆ€N¾€V0®„¿…@€VŒ&Æ÷„…€Xÿ|¾€LŒ'@l0®„Œ %Lˆ\üý€T¾€L¿Â0¯Ÿ€Y¾0 !ü€T턾€NŒP& _OퟀT@kÆ};Œ_OퟀNüÃC2퟾¿€\_Oí”®„0 þ€\3BîÄ0ƒí„†0ƒ»¹;ARMARKKâ+K9ˆAEMARK]â0^#"ý€ºüý€¶¾€¶ ¼€ºQëDZneq #çJnÈL÷€¼Œô”€¼' 0®„¿€…€¶ Þ¾€¶Œ'@ 0®„¿üˆ@€ºý€¸Ã®Ä„ü€¸† ƒÿãJ�RRELEASE µ¨µ9òAMARK aRELEASE^�ERELEASE ¼¶AARK Œ{&xHEAPS1 C6809 A6gHl68XXHP6809 co “Ð ¯+&¤MASTERLINK dMEMERR a°]"ý€W¿€YŒ $ _Oý˜ƒ0<ü€Wý!¿€[Ãí„0 ü€Y턾€[0_Oí„_O®Ÿ€ €[í„®Ÿ€[0 þ€[3BîÄ0ƒí„[]�RINITHEAPV�áV9“�EINITHEAP\�Ú$]"0ý€Ë¿€Íüퟂ€Í®Ÿ€Í0ìŸ�€€Íㄳ€ËGZ$DZugeq8{È‚÷€Ï¾€Ë¬Ÿ€ÍÑDZugtr.:ˆÈ‚ƒô€Ï÷€Ï®Ÿ€ÍŒâWDZequ ó6˜Èú€ÏÈ''0T®„Œ&† ƒ_OퟀÍ€ ®Ÿ€Í0®„¯Ÿ€Í  9p6 Ð"ý€t¿€v®„¿€o"_Oý€q€s¾€oŒGÜ DZneq #è}êȃ¶€sˆ·€xô”€€x'K¾€t0þ€€o3B®„¬Ä#H€ü€oý€qìH„ý€o'¾€qŒT‚& ü€tퟀvü€tíJ IŸ€qü‚€oퟀtÆ÷€s �ö€sÈ'‰Ž¯Ÿ€t¼€q&H! ¾€t¯Ÿ€v á} g €ü€tퟀq9(‘ Ay"ý€¸¿€ºì„e³€º& 쟀ºí!Ÿ€¸쟀¸ý‚%€¶®Ÿ€¶¼€º' ¿€¶ ð쟀ºí Ÿ€¶9Ç´A}¼"ý€|¿€~®„¿€y!P¾€yŒ'§0 Iü€yã„£Ÿ€|&HB€{!®Ÿ€|�0쟀|ㄳ”€y&Æ÷€{@ˆÆ÷€{ö€{Á']Á&#¾€�€y0þ€y3B® Ÿ€|1"îÄ0 ã¤í„ü€yퟄ€|“g}F:®Ÿ€|0|3B¾€y1"îÄ0ã¤í„¾€y""ü€~ƒy¾€~ü€| !ƒ¼_Oý€y„쟀yý€yÿO9ž,FH€"ý€È¿€ÊŒ$Ìý€Ê_O퟈€Ⱦ€È0ü€Êíˆ„Ž€Æü€Èƒ]¾…H€ÆŒ'̀Ȉˆƒ¼¾€Æü€ÈƒÐ0zH�RDISPOSE Ű%Å9�EDISPOSE ˰cÌ"1ý€`¿€b¾ŒP0& †ƒÆ! ÷€_}®ŸŒT & †ƒÆH÷€_e¾€bŒTH$Ìý€b_2Oý€ZìŸý€\" €^€_¾€\0®„¼€bõcDZulesC}.ȶ€_ˆ·€dô”!€d''®Ÿ€\ŒP0& †ƒÆ!"÷€_ ü€\ý€Z ì„ý€\ ½"ö€^ú€_È'ç ¾€\0®„¼€bR&,ü€\ퟀ`Æ…÷€^¾€ZŒ&B 쟀\íŸB쟀\ퟀZÁ²}}ªHª¾€\0ü€bÃ@‰®„ý€e¼€e%H mü€\ퟀ`Æ"÷€^¾€ZŒ&+" ü€\ó€bíŸì ÀŸ€\®Ÿí„®0 Ÿ0þ€\3B îÄ0³€bí„‚)쟀\ퟀZ" ü€\ó€bý€\®Ÿ€€`0®„³¾}; ˆ€bý€bü€\„ˆƒ€&ü€\ý€ZT섃& † ƒÆ÷€_B!쟀\ý€\ÿ µu;ARNEW YëY9–�INITHEAP aDISPOSE€!NEWÌAENEW f^iNITH¢š&xMASTER C6809 A6Hl68XXHP�¶‘�ñ “Ñ •ƒ& ¡MASTERLINK ¡ €€ &xARRAY_ C6809 A6fHl68XXHP�¶‘�ñ “À  Þ&dZintmul·¥aARRAY_ Tv42|«d‹ §a€KJ§äîgì„çcàdçb�D¦aìæãøíg�9®ø¦äìæjäjä0ãgígjd&ÿèæb'æcëcOãeíeìøãgíg� jb&ÿó®g¦aïæ2æ9ìgÃ@íg9¥v &XMBequC6809 A6 Hl68XXHP�¶‘�ñ “Á A¦&dCOMPB_ DTRUE_dFALSE_ –øAMBequõ) 4&ÀƒÅ1 &XSTequC6809 A6.Hl68XXHP�¶‘�ñ “Á SÎ&dCOMPB_ DTRUE_dFALSE_ –ø ACHequASTequ[ 84†540ä�2b94¦€4OæÀÀáà&Á3 'ƒ&ÀƒT8 &XMBgeqC6809 A6 Hl68XXHP�¶‘�ñ “Á 5¤&dCOMPB_ DTRUE_dFALSE_ –øAMBgeqé' 4%ÀƒÅ0 &XSTgeqC6809 A6?Hl68XXHP�¶‘�ñ “Á GÝ&dCOMPB_ DTRUE_dFALSE_ –ø ACHgeqASTgeqêW J4†540ä�2b94¦À4Oæ€4áa/æ aÁ''3 2b%ƒ æàáà-ÀƒÓ}J &XMBgtrC6809 A6 Hl68XXHP�¶‘�ñ “Á D¥&dCOMPB_ DTRUE_dFALSE_ –øAMBgtrø( 4#ÀƒÅ. &XSTgtrC6809 A6?Hl68XXHP�¶‘�ñ “ Vß&dCOMPB_ DTRUE_dFALSE_ –ø ACHgtrASTgtrY J4†540ä�2b94¦À4Oæ€4áa/æ aÁ''3 2b#ƒ æàáà/ÀƒÓ}J &XMBleqC6809 A6 Hl68XXHP�¶‘�ñ “ 5ª&dCOMPB_ DTRUE_dFALSE_ –øAMBleqé, 4"ÀƒÅ- &XSTleqC6809 A6AHl68XXHP�¶‘�ñ “ Gå&dCOMPB_ DTRUE_dFALSE_ –ø ACHleqASTleqêa K4†540ä�2b94¦À4Oæ€4áa/æ aÁ' ' 2b"Àƒæàáà.L K0ƒ]K &XMBlesC6809 A6 Hl68XXHP�¶‘�ñ “ 5¬&dCOMPB_ DTRUE_dFALSE_ –øAMBlesé. 4$ÀƒÅ/ &XSTlesC6809 A6AHl68XXHP�¶‘�ñ “à Gè&dCOMPB_ DTRUE_dFALSE_ –ø ACHlesASTlesêe K4†540ä�2b94¦À4Oæ€4áa/æ aÁ' ' 2b$Àƒæàáà,0ƒ]K &XMBneqC6809 A6 Hl68XXHP�¶‘�ñ “Ä 5®&dCOMPB_ DTRUE_dFALSE_ –øAMBneqé. 4'ÀƒÅ2 &XSTneqC6809 A6.Hl68XXHP�¶‘�ñ “Ä GÖ&dCOMPB_ DTRUE_dFALSE_ –ø ACHneqASTneqêe 84†540ä�2b94¦€4OæÀÀáà&ƒÁ3 ''ÀƒU8 &xPARAM_ C6809 A6Hl68XXHP�¶‘�ñ “Ä �›&aPARAM_ C$41f4¦ §€5Ãÿÿ&ÿó5®á®á2ë409 Å$ &xRENTRY_C6809 A6XHl68XXHP�¶‘�ñ “Ä ¡&aRENTRY_TSe4oäŒ'0Á& 0†§ä®e¯ë1ë 1e52a0CSÃîá2ë4ëàP2å�'2b4@3b1"Z'®¡¯ÁZ&ÿù0b¯Ä9…e &xVPARAM_C6809 A6Hl68XXHP�¶‘�ñ “Å �¹&aVPARAM_Q9ìd1f4¦ §€5Ãÿÿ&ÿó9ñ &˜VRENTRY_ C6809 Hl68XXHP�¶‘�ñ “Å Þ±&�VRENTRY_ ÓjîáCSÃ2ë0ä45 &˜SETmbLEQ C6809 Hl68XXHP�¶‘�ñ “Å ÜÊ& DTRUE_dFALSE_ 4 �SETmbLEQ Ñp'44P4¦ÀC¤€& 5ƒ@' ÿî5VÀÀƒ5Pp' &˜SETmbDIF C6809 Hl68XXHP�¶‘�ñ “Å MLÉÂ&�SETmbDIF ¾t4q4¦ÀC¤€§ 5ƒ' ÿî5ñ &˜SETmbINT C6809 Hl68XXHP�¶‘�ñ “Å ÜÄ&�SETmbINT Ñy4q4¦€¤À§ 5ƒ&ÿñ5ñÀ &˜SETmbUNI C6809 Hl68XXHP�¶‘�ñ “Å ÝÆ&�SETmbUNI Òy4q4¦€ªÀ§ 5ƒ' ÿï5ñç &xSTACK_ C6809 A6Hl68XXHP�¶‘�ñ “Ð ¦z&aSTACK_ ÿZ &xINSETmbC6809 A67Hl68XXHP�¶‘�ñ “Æ ®û&„Zbtoset8 óÙaINSETmbbT>44ÃDVDVDVƒ0‹@ìáƒ/ƒ@À ÿõä„Á&_55�Æ5û5�Ow> &xTOSETmbC6809 A64Hl68XXHP�¶‘�ñ “Æ °&„Zbtoset8 dMBmove ¤EMPTY_SET_ ¸áaTOSETmbc_:04Žƒìcƒ/ƒ ÿõ˜_ìcÃDVDVDV£a.ƒ@¯Ë5—b±: &˜EMPTY_SETC6809 Hl68XXHP�¶‘�ñ “À Òê& ¡EMPTY_SET_ F· &ªªªªUX& &XENTRYC6809 A6Hl68XXHP�¶‘�ñ “À .s&DMAIN ÄZ_END_PROGRAMdSTACK_ ÚÝ @ÎŽ4̃ۨ aEENTRY AENTRY6 &XEntryC6809 A6Hl68XXHP�¶‘�ñ “À  nµ&Dmain ÄZ_END_PROGRAMdSTACK_  @ÎŽ4̃ۨaEEntry AEntryAentryØê&xMBmove C6809 A6Hl68XXHP�¶‘�ñ “à ÄÏ&aMBmove xR4Q4¦€§À5ƒ&ÿó5Ñ. &xSTmove C6809 A6Hl68XXHP�¶‘�ñ “à Öä& dMBmove „STR_ERRORTã aSTmove ŠX$4Qƒ4æ„O£á#2a5PÃ5Ñ f$ &N M˜ZBtoIadd C6809 Hl68XXHP�¶‘�ñ “Æ æ&�ZBtoIadd ø�4Q44æbãä2c5ÑÝ &˜ZBtoIsub C6809 Hl68XXHP�¶‘�ñ “Æ ÷&�ZBtoIsub ®444æb£ä2c5�ý &˜ZuBtoIaddC6809 Hl68XXHP�¶‘�ñ “Æ $&�ZuBtoIaddÒ4Q4O4æbãä2c5Ñò &˜ZuBtoIsubC6809 Hl68XXHP�¶‘�ñ “Ç 5+&�ZuBtoIsub)â44O4æb£ä2c5� &˜Zbbounds C6809 Hl68XXHP�¶‘�ñ “Ç @ & ¤RANGE_ERROR-Ò �Zbbounds 4·4áä,2a¡ä/2a5„ + &˜Zbinset16C6809 Hl68XXHP�¶‘�ñ “Ç ô;&„Zbtoset16ìï�Zbinset16èâ%4¤bäcƒ&_5 Æ5û5’&% &˜Zbinset8 C6809 Hl68XXHP�¶‘�ñ “Ç û!&„Zbtoset8 óÙ�Zbinset8 ïÌ"04‰äa&_5 Æ5û5‚E" &˜Zwinset16C6809 Hl68XXHP�¶‘�ñ “Ì  @&„Zwtoset16ï�Zwinset16ýâ%4¤aäbƒ&_55�Æ5û5�¿% &˜Zwtoset16C6809 Hl68XXHP�¶‘�ñ “Í I&„Zbtoset8 óÙ�Zwtoset16þí @4ƒ. À˜Æ5�ƒL†5�x  &˜Zbtoset16C6809 Hl68XXHP�¶‘�ñ “Ç õ4&dZwshiftª®�Zbtoset16éí04މ5‘� &˜Zbtoset8 C6809 Hl68XXHP�¶‘�ñ “È ü&dZbshift•®�Zbtoset8 ð×04†5ƒÄ &xZbshiftC6809 A6Hl68XXHP�¶‘�ñ “Ç ß4&aZbshift’¬4ONÁ-' HZ' ÿúD\' ÿú‰5ƒ’ &˜Zbrotate C6809 Hl68XXHP�¶‘�ñ “Ç %.&�Zbrotate Ö&4Á. 'D$Š€\' ÿöH‰Z' ÿø‰5ƒR& &˜Zbyteadd C6809 Hl68XXHP�¶‘�ñ “Ñ )&„OVERFLOW ÐM�Zbyteadd ¾44ëà(2a5�É &˜Zbytediv C6809 œHl68XXHP�¶‘�ñ “Ñ >¦&ÄOVERFLOWPULL4äUNDERFLOWPULL2 äDIV_BY_ZERO_BYTÙ´�Zbytediv 2Ã|42|oéoAéoéoéjé�'w*A @léléÀÁ'*PléléX% ÿ÷Vçé é% æéX@Ëçé «@éæéXçéAæéTçéjé&ÿѧé¦éFæé-­º|"€À%P¦éF¦é$@ Æ2d52b9ËW" &˜Zbytemul C6809 <Hl68XXHP�¶‘�ñ “Ñ =Q&ÄOVERFLOWPULL3äUNDERFLOWPULL1 �L�Zbytemul 1ÏC4Žÿÿ4„ÿÿ*@läÄÿÿ*Plä=5F%CSCÃ.0ƒÿ€-ƒ2a52b5�"8C &˜Zbyteneg C6809 Hl68XXHP�¶‘�ñ “Ñ 9&„OVERFLOW ÐM�Zbyteneg �Zbyteabs Z}Á,P(2 a9[ &˜Zbytesub C6809 Hl68XXHP�¶‘�ñ “Ñ 9%&„OVERFLOW ÐM�Zbytesub -Ï4‰4àà0(2a5�• &8ZccC6809 A6ƒÖ Hl68XXHP�¶‘�ñ “È U& DTRUE_dFALSE_ 4 !Zcc„¿Ì4%ƒÖ &XZequ C6809 A6 Hl68XXHP�¶‘�ñ “É hn& DTRUE_dFALSE_ 4 AZequ íÌ4'ƒØ &XZgeq C6809 A6 Hl68XXHP�¶‘�ñ “É fb& DTRUE_dFALSE_ 4 AZgeq áÌ4-ƒÞ &XZgtr C6809 A6 P OHl68XXHP�¶‘�ñ “É gq& DTRUE_dFALSE_ 4 AZgtr ðÌ4/ƒà &xZintaddC6809 A6Hl68XXHP�¶‘�ñ “Ò ð&„OVERFLOW ÐMaZintadd£�44ãá(2a5�Ð &xZintdivC6809 A6½Hl68XXHP�¶‘�ñ “Ò õÞ&ÄOVERFLOWPULL1äDIV_BY_ZERO_INTògaZintdiv¨¤}42{oéoAéoéoéjéoéìéA'�,lé@�íéìéC'� �,leCSÃ9léXI% ÿöFVíéAìé£é%íéìéXIÃíé ìéXIíéìé]À}=�@DVíéjé@&ÿɦéFìé$ÿ¥¦éFìé0-ƒ%ÿ‘ Ì2e52d9ã= &xZintmulC6809 A6ÁHl68XXHP�¶‘�ñ “Ò á&ÄOVERFLOWPULL2äUNDERFLOWPULL3 �KaZintmul´£}42|†ÿÿ4oboaìh'@˜�íhìf'Ž�íf „ÿÿ*lbCSÃ9¦é æé@=íc¦éæé=ãbíb$la¦é æé@=ãbíb$Ala¦éæé=ãaíaìa¦éFìc%#ÿ°"E}Mx%CS ÿ£Ã&-ƒÃ.Àƒ Ã&CÃ- ÌŽ2e52d9ÀÀƒžÃM &xZintnegC6809 A6Hl68XXHP�¶‘�ñ “Ò ñ.&„OVERFLOW ÐM aZintnegaZintabsFA ƒ, CSÃ@ (2a9GG &xZintsubC6809 A6Hl68XXHP�¶‘�ñ “Ó -&„OVERFLOW ÐMaZintsub´Ÿ44£á0(2a5�å &XZleq C6809 A6 Hl68XXHP�¶‘�ñ “Ê  kc& DTRUE_dFALSE_ 4 AZleq áÌ4/ƒà &XZles C6809 A6 Hl68XXHP�¶‘�ñ “Ê mc& DTRUE_dFALSE_ 4 AZles áÌ4-ƒÞQP &XZneq C6809 A6 Hl68XXHP�¶‘�ñ “Ê mc& DTRUE_dFALSE_ 4 AZneq áÌ4&ƒ× &˜ZubboundsC6809 Hl68XXHP�¶‘�ñ “Ê >d& ¤RANGE_ERROR-Ò �Zubbounds34áä$2a¡ä#2a5„  &˜ZubyteaddC6809 Hl68XXHP�¶‘�ñ “Ñ EK&„OVERFLOW ÐM�Zubyteadd9÷44ëà$2a5�Å &˜ZubytedivC6809 eHl68XXHP�¶‘�ñ “Ñ J¶& äDIV_BY_ZERO_BYTKi �Zubytediv? d42|oéo@é§é'MÁ'léX% ÿ÷Vçé é% æéXËçé «éæéXç@éæéTçéAjé&ÿÑæéA¦é Æ2d5�Ïkd &˜ZubytemulC6809 Hl68XXHP�¶‘�ñ “Ò Va&„OVERFLOW ÐM�ZubytemulK 4=ƒÿ#2a5�¢ &˜ZubytesubC6809 Hl68XXHP�¶‘�ñ “Ò V\&„OVERFLOW ÐM�ZubytesubK44 à$2a5�| &XZugeqC6809 A6 Hl68XXHP�¶‘�ñ “Ë h·& DTRUE_dFALSE_ 4 AZugeq4Ì4%ƒÖ &XZugtrC6809 A6 Hl68XXHP�¶‘�ñ “Ë w¸& DTRUE_dFALSE_ 4 AZugtr+5Ì4#ƒÔ &˜Zuintadd C6809 Hl68XXHP�¶‘�ñ “Ó 6&„OVERFLOW ÐM�Zuintadd *½44ãá$2a5�Ì &˜Zuintdiv C6809 {Hl68XXHP�¶‘�ñ “Ó K„& äDIV_BY_ZERO_INT@p �Zuintdiv ?Âv42{oéoAéoé¯é'Yƒ'ÁléXI% ÿöFVíéì@é£é%í@éìéXIÃAíé ìé@XIíéìé@DVíéjé@&ÿÉ®éìé@@ Ì2e52b9^uvR Q &˜Zuintmul C6809 iHl68XXHP�¶‘�ñ “Ó J~& ÄOVERFLOWPULL2±û �Zuintmul >Îk42zocob¯é'LƒA'D¦éæé=íd¦éæé=ãcíc$lb¦éæé=ãcíc$lb¦éæé@=ãbíbìdÀ®b& ÌDŽ2f52b9Ùk &˜Zuintsub C6809 Hl68XXHP�¶‘�ñ “Ó F&&„OVERFLOW ÐM�Zuintsub :Î44£á0$2a5�á &XZuleqC6809 A6 Hl68XXHP�¶‘�ñ “Ì h½& DTRUE_dFALSE_ 4 AZuleq9Ì4#ƒÔ &XZulesC6809 A6 Hl68XXHP�¶‘�ñ “Ì h¿& DTRUE_dFALSE_ 4 AZules;Ì4%ƒÖ &˜ZuwboundsC6809 Hl68XXHP�¶‘�ñ “Ì >t& ¤RANGE_ERROR-Ò �Zuwbounds3# 4¬á"40@¬á%9® &˜Zwbounds C6809 Hl68XXHP�¶‘�ñ “Ì U& ¤RANGE_ERROR-Ò �Zwbounds I· 4¬á.40@¬á-9 &˜ZstchbounC6809 %Hl68XXHP�¶‘�ñ “Ì ;{&¤RANGE_ERROR„STR_ERRORa ¡Zstchbounds´ˆ .4�&ÀƒO4£á#À2b4@£á$2b5�É. &xZwshiftC6809 A6Hl68XXHP�¶‘�ñ “Í ô>&aZwshift§¬#4Œ'*DV0&ÿú'XI0&ÿú5‘{# &˜Zwrotate C6809 $Hl68XXHP�¶‘�ñ “Í ::&�Zwrotate .Ö,4Œ'* DV$Š€0' ÿôXIÉ0' ÿö5‘Š, &xDerrorsC6809 A6±Hl68XXHP�¶‘�ñ “Ð øÄ&waDerrors�OVERFLOW -ÁOVERFLOWPULL1ÁOVERFLOWPULL2ÁOVERFLOWPULL3#ÁOVERFLOWPULL4)�UNDERFLOWáUNDERFLOWPULL1 áUNDERFLOWPULL2 áUSRNDERFLOWPULL3 áDIV_BY_ZERO_INTRáDIV_BY_ZERO_BYTX¡CASE_ERROR jáCOMPB_RANGE_ERRu¡RANGE_ERRORzJ±w#aMEMERR �áSET_CONVERSION_•¡GET_ADDRESS4�LOAD_REGSE�STR_ERROR£ ˆ#~2b5 2d5 2f5€�"�1A ÿý2e5 2f5 2b5 2d5��  ÿý4ìeƒý€¯5·€®"5†·€¨÷€©¿€ª ÿ€¬92e5 2d5�ÿÖ¿ˆ €ª·€¨÷€© ÿý�ÿm~Lk ÿÈ·€¨÷€© ÿýÃ5P�ÿ¸�ÿÇ€ ÿý�ÿ±4ü€€¯¦˜·€¨5 ÿý�ÿ�·ˆ €¨÷€©¿€ª8 ÿý�ÿ�B ÿýÄýL±µ &xFALSE_ C6809 A6Hl68XXHP�¶‘�ñ “Á ¡i&aFALSE_ Tù _59ð  &XTRUE_C6809 A6Hl68XXHP�¶‘�ñ “Æ %„&ATRUE_Ù  Æ5û9Q  &xCOMPB_ C6809 A6Hl68XXHP�¶‘�ñ “À ¬t&aCOMPB_ _ô4P4¦€¡À& 5ƒ&ÿñ 2b5Ð &˜Z_END_PROC6809 Hl68XXHP�¶‘�ñ “Í ëÆ& ÁZ_END_PROGRAM©#  ÿþ" *XSWI_1C6809 A6Hl68XXHP�¶‘�ñ “Í ÿúÿûD?*DSWI_1úÑÿúÀ¿ý *XSWI_2C6809 A6Hl68XXHP�¶‘�ñ “Í ÿôÿõD4*DSWI_2úÒÿôÀ¿÷ *XSWI_3C6809 A6Hl68XXHP�¶‘�ñ “Í ÿòÿóD1*DSWI_3úÓÿòÀ¿õ &˜END_DATA_C6809 Hl68XXHP�¶‘�ñ “Í ¼Â&�END_DATA_±‚ Rÿÿ ÿÿ&xHEAPS2 C6809 A6¤Hl68XXHP6809 co “¿ ­n&¤MASTERLINK dMEMERR dDISPOSE²Ý"ý  _Oý2üý ®Ÿ Œ@ KDZequ ò~ȃ¶ ˆ·ô”€''¾ 0®@„Œ& Æ÷€Ä †ƒ ¾€ 0®„¿ Àö È'{®!QŸ Œ'WŽ ˆ¿®Ÿ ¿®!RŸŒ'¿ !¿ í¾ŒR"&üýüýÔD~}™„€¾0þ€3B®„¬Ä#Hˆ üýüýˆ¾ 0®„¿…@ Œ&Æ÷„… ÿ|¾Œ'@l0®„Œ %Lˆ\üý¾¿Â0¯Ÿ ¾0 !ü턾ŒP& _OíŸ@^:};Œ_OíŸüÃC2퟾¿_Oí”®„0 þ3BîÄ0ƒí„†0ƒ¹U;ARMARKKâ+K9ˆAEMARKKâL#"ýüý¾ ¼MIDZneq #çJ\ÈL÷Œô”' 0®„¿€… Þ¾Œ'@ 0®„¿üˆ@ýîĄü† ƒ÷ÕJ�RRELEASE £§ô£9àAMARK aRELEASEL�ERELEASE £¶ARK Œ{&xHEAPS1 C6809 A625Hl68XXHP6809 co “¾ ¯&¤MASTERLINK dMEMERR a°]"ý¿Œ $ _Oý˜ƒ0<üý!¿Ãí„0 ü턾0_Oí„_O®Ÿ€ í„®Ÿ0 þ3BîÄ0ƒí„\�]�RINITHEAPV�áV9“�EINITHEAPV�Ô$W"0ý¿üퟂ®Ÿ0ìŸ�€ã„³E¶$DZugeq8uÈ‚÷ ¾¬ŸÐ-DZugtr.:‚È‚ƒô ÷ ®ŸŒá‚DZequ ó6’Èú È''0T®„Œ&† ƒ_Oퟀ ®Ÿ0®„¯Ÿ  9V6 Å"ý¿®„¿ "_Oý ¾ ŒBy DZneq #è}ßȃ¶ˆ·ô”€'K¾0þ€ 3B®„¬Ä#H€ü ý ìH„ý '¾ ŒT‚& üíŸüíUTŸ ü‚ íŸÆ÷ �öÈ'‰Ž¯Ÿ¼ &H! ¾¯Ÿú"} \ €üíŸ 9&¾ Ad"ý¿ì„e³& ìŸí!ŸìŸý‚%®Ÿ¼' ¿ ðìŸí Ÿ9ºA}¡"ý¿ ®„¿!P¾Œ'§0 Iüã„£Ÿ&HB!®Ÿ�0ìŸã„³”&Æ÷@ˆÆ÷öÁ']Á&#¾€�0þ3B® Ÿ1"îÄ0 ã¤í„üퟄq°}F®Ÿ0îŸ3B¾1"îÄ0ã¤í„¾""ü ƒd¾ ü !ƒ¡_Oý„ìŸýÿO9‹5FH^"ý$¿&Œ$Ìý&_O퟈$¾$0ü&툄Ž"ü$ƒW¾…H"Œ'Ì$ˆˆƒ¡¾"ü$ƒÅ|H�RDISPOSE £°£9à�EDISPOSE £¯öc¤"1ý.¿0¾ŒP0& †ƒÆ! ÷-}®ŸŒT & †ƒÆH÷-e¾0ŒTH$Ìý0_2Oý(ìŸý*" ,-¾*0®„¼0È�cDZulesC}ȶ-ˆ·2ô”!2''®Ÿ*ŒP0& †ƒÆ!"÷- ü*ý( ì„ý* ½"ö,ú-È'ç ¾*0®„¼0R&,ü*íŸ.Æ…÷,¾(Œ&B ìŸ*íŸBìŸ*íŸ({T}}‚Hª¾*0ü0Ã@‰®„ý3¼3%H mü*íŸ.Æ"÷,¾(Œ&+" ü*ó0íŸì ÀŸ*®Ÿí„®0 Ÿ0þ*3B îÄ0³0í„‚)ìŸ*íŸ(" ü*ó0ý*®Ÿ€.0®„³w³};øˆ0ý0ü*„ˆƒ^&ü*ý(T섃& † ƒÆ÷-B!ìŸ*ý*ÿ —›;ARNEW 1êê19n�INITHEAP aDISPOSE^!NEW¤AENEW 1]êNITH¢š&xMASTER C6809 A6Hl68XXHP�¶‘�ñ “¿ •q& ¢MASTERLINK ¡ €€ &xARRAY_ C6809 A6fHl68XXHP�¶‘�ñ “À  Þ&dZintmul·¥aARRAY_ Tv42|«d‹ §a€V U§äîgì„çcàdçb�D¦aìæãøíg�9®ø¦äìæjäjä0ãgígjd&ÿèæb'æcëcOãeíeìøãgíg� jb&ÿó®g¦aïæ2æ9ìgÃ@íg9¥v &XMBequC6809 A6 Hl68XXHP�¶‘�ñ “Á A¦&dCOMPB_ DTRUE_dFALSE_ –øAMBequõ) 4&ÀƒÅ1 &XSTequC6809 A6.Hl68XXHP�¶‘�ñ “Á SÎ&dCOMPB_ DTRUE_dFALSE_ –ø ACHequASTequ[ 84†540ä�2b94¦€4OæÀÀáà&Á3 'ƒ&ÀƒT8 &XMBgeqC6809 A6 Hl68XXHP�¶‘�ñ “Á 5¤&dCOMPB_ DTRUE_dFALSE_ –øAMBgeqé' 4%ÀƒÅ0 &XSTgeqC6809 A6?Hl68XXHP�¶‘�ñ “Á GÝ&dCOMPB_ DTRUE_dFALSE_ –ø ACHgeqASTgeqêW J4†540ä�2b94¦À4Oæ€4áa/æ aÁ''3 2b%ƒ æàáà-ÀƒÓ}J &XMBgtrC6809 A6 Hl68XXHP�¶‘�ñ “Á D¥&dCOMPB_ DTRUE_dFALSE_ –øAMBgtrø( 4#ÀƒÅ. &XSTgtrC6809 A6?Hl68XXHP�¶‘�ñ “ Vß&dCOMPB_ DTRUE_dFALSE_ –ø ACHgtrASTgtrY J4†540ä�2b94¦À4Oæ€4áa/æ aÁ''3 2b#ƒ æàáà/ÀƒÓ}J &XMBleqC6809 A6 Hl68XXHP�¶‘�ñ “ 5ª&dCOMPB_ DTRUE_dFALSE_ –øAMBleqé, 4"ÀƒÅ- &XSTleqC6809 A6AHl68XXHP�¶‘�ñ “ Gå&dCOMPB_ DTRUE_dFALSE_ –ø ACHleqASTleqêa K4†540ä�2b94¦À4Oæ€4áa/æ aÁ' ' 2b"Àƒæàáà.WV0ƒ]K &XMBlesC6809 A6 Hl68XXHP�¶‘�ñ “ 5¬&dCOMPB_ DTRUE_dFALSE_ –øAMBlesé. 4$ÀƒÅ/ &XSTlesC6809 A6AHl68XXHP�¶‘�ñ “à Gè&dCOMPB_ DTRUE_dFALSE_ –ø ACHlesASTlesêe K4†540ä�2b94¦À4Oæ€4áa/æ aÁ' ' 2b$Àƒæàáà,0ƒ]K &XMBneqC6809 A6 Hl68XXHP�¶‘�ñ “Ä 5®&dCOMPB_ DTRUE_dFALSE_ –øAMBneqé. 4'ÀƒÅ2 &XSTneqC6809 A6.Hl68XXHP�¶‘�ñ “Ä GÖ&dCOMPB_ DTRUE_dFALSE_ –ø ACHneqASTneqêe 84†540ä�2b94¦€4OæÀÀáà&ƒÁ3 ''ÀƒU8 &xPARAM_ C6809 A6Hl68XXHP�¶‘�ñ “Ä �›&aPARAM_ C$41f4¦ §€5Ãÿÿ&ÿó5®á®á2ë409 Å$ &xRENTRY_C6809 A6XHl68XXHP�¶‘�ñ “Ä ¡&aRENTRY_TSe4oäŒ'0Á& 0†§ä®e¯ë1ë 1e52a0CSÃîá2ë4ëàP2å�'2b4@3b1"Z'®¡¯ÁZ&ÿù0b¯Ä9…e &xVPARAM_C6809 A6Hl68XXHP�¶‘�ñ “Å �¹&aVPARAM_Q9ìd1f4¦ §€5Ãÿÿ&ÿó9ñ &˜VRENTRY_ C6809 Hl68XXHP�¶‘�ñ “Å Þ±&�VRENTRY_ ÓjîáCSÃ2ë0ä45 &˜SETmbLEQ C6809 Hl68XXHP�¶‘�ñ “Å ÜÊ& DTRUE_dFALSE_ 4 �SETmbLEQ Ñp'44P4¦ÀC¤€& 5ƒ@' ÿî5VÀÀƒ5Pp' &˜SETmbDIF C6809 Hl68XXHP�¶‘�ñ “Å X WÉÂ&�SETmbDIF ¾t4q4¦ÀC¤€§ 5ƒ' ÿî5ñ &˜SETmbINT C6809 Hl68XXHP�¶‘�ñ “Å ÜÄ&�SETmbINT Ñy4q4¦€¤À§ 5ƒ&ÿñ5ñÀ &˜SETmbUNI C6809 Hl68XXHP�¶‘�ñ “Å ÝÆ&�SETmbUNI Òy4q4¦€ªÀ§ 5ƒ' ÿï5ñç &xSTACK_ C6809 A6Hl68XXHP�¶‘�ñ “Æ ¦p&bSTACK_ ÿ[ &xINSETmbC6809 A67Hl68XXHP�¶‘�ñ “Æ ®û&„Zbtoset8 óÙaINSETmbbT>44ÃDVDVDVƒ0‹@ìáƒ/ƒ@À ÿõä„Á&_55�Æ5û5�Ow> &xTOSETmbC6809 A64Hl68XXHP�¶‘�ñ “Æ °&„Zbtoset8 dMBmove ¤EMPTY_SET_ ¸áaTOSETmbc_:04Žƒìcƒ/ƒ ÿõ˜_ìcÃDVDVDV£a.ƒ@¯Ë5—b±: &˜EMPTY_SETC6809 Hl68XXHP�¶‘�ñ “À Òê& ¡EMPTY_SET_ F· &ªªªªUX& &XENTRYC6809 A6Hl68XXHP�¶‘�ñ “À .s&DMAIN ÄZ_END_PROGRAMdSTACK_ ÚÝ @ÎŽ4̃ۨ aEENTRY AENTRY6 &XEntryC6809 A6Hl68XXHP�¶‘�ñ “À  nµ&Dmain ÄZ_END_PROGRAMdSTACK_  @ÎŽ4̃ۨaEEntry AEntryAentryØê&xMBmove C6809 A6Hl68XXHP�¶‘�ñ “à ÄÏ&aMBmove xR4Q4¦€§À5ƒ&ÿó5Ñ. &xSTmove C6809 A6Hl68XXHP�¶‘�ñ “à Öä& dMBmove „STR_ERRORTã aSTmove ŠX$4Qƒ4æ„O£á#2a5PÃ5Ñ f$ &YX˜ZBtoIadd C6809 Hl68XXHP�¶‘�ñ “Æ æ&�ZBtoIadd ø�4Q44æbãä2c5ÑÝ &˜ZBtoIsub C6809 Hl68XXHP�¶‘�ñ “Æ ÷&�ZBtoIsub ®444æb£ä2c5�ý &˜ZuBtoIaddC6809 Hl68XXHP�¶‘�ñ “Æ $&�ZuBtoIaddÒ4Q4O4æbãä2c5Ñò &˜ZuBtoIsubC6809 Hl68XXHP�¶‘�ñ “Ç 5+&�ZuBtoIsub)â44O4æb£ä2c5� &˜Zbbounds C6809 Hl68XXHP�¶‘�ñ “Ç @ & ¤RANGE_ERROR-Ò �Zbbounds 4·4áä,2a¡ä/2a5„ + &˜Zbinset16C6809 Hl68XXHP�¶‘�ñ “Ç ô;&„Zbtoset16ìï�Zbinset16èâ%4¤bäcƒ&_5 Æ5û5’&% &˜Zbinset8 C6809 Hl68XXHP�¶‘�ñ “Ç û!&„Zbtoset8 óÙ�Zbinset8 ïÌ"04‰äa&_5 Æ5û5‚E" &˜Zwinset16C6809 Hl68XXHP�¶‘�ñ “Ì  @&„Zwtoset16ï�Zwinset16ýâ%4¤aäbƒ&_55�Æ5û5�¿% &˜Zwtoset16C6809 Hl68XXHP�¶‘�ñ “Í I&„Zbtoset8 óÙ�Zwtoset16þí @4ƒ. À˜Æ5�ƒL†5�x  &˜Zbtoset16C6809 Hl68XXHP�¶‘�ñ “Ç õ4&dZwshiftª®�Zbtoset16éí04މ5‘� &˜Zbtoset8 C6809 Hl68XXHP�¶‘�ñ “È ü&dZbshift•®�Zbtoset8 ð×04†5ƒÄ &xZbshiftC6809 A6Hl68XXHP�¶‘�ñ “Ç ß4&aZbshift’¬4Z YÁ-' HZ' ÿúD\' ÿú‰5ƒ’ &˜Zbrotate C6809 Hl68XXHP�¶‘�ñ “Ç %.&�Zbrotate Ö&4Á. 'D$Š€\' ÿöH‰Z' ÿø‰5ƒR& &˜Zbyteadd C6809 Hl68XXHP�¶‘�ñ “È )&�Zbyteadd ¾ 44ëà5�ð  &˜Zbytediv C6809 —Hl68XXHP�¶‘�ñ “È >•&�Zbytediv 2Ã}42zoéoAéoéjéoé�'u.A @lélé§éÁ'd.APléléX% ÿ÷VçéA é% æé@XËçé  «éæéXçéæéTç@éjé&ÿѧ@é¦éFæé@%*ú}‚P¦éF¦é$@ Æ2f5�à &˜Zbytemul C6809 1Hl68XXHP�¶‘�ñ “È =;&�Zbytemul 1Ï84Žÿÿ4„ÿÿ'*@läÄÿÿ'*Plä=¦äF% CSà Ì2b5‘«8 &˜Zbyteneg C6809 Hl68XXHP�¶‘�ñ “È 9&�Zbyteneg �Zbyteabs Z} Á,P9{  &˜Zbytesub C6809 Hl68XXHP�¶‘�ñ “È 9&�Zbytesub -Ï4˜4àà5�› &8ZccC6809 A6ƒÖ Hl68XXHP�¶‘�ñ “È U& DTRUE_dFALSE_ 4 !Zcc„¿Ì4%ƒÖ &XZequ C6809 A6 Hl68XXHP�¶‘�ñ “É hn& DTRUE_dFALSE_ 4 AZequ íÌ4'ƒØ &XZgeq C6809 A6 Hl68XXHP�¶‘�ñ “É fb& DTRUE_dFALSE_ 4 AZgeq áÌ4-ƒÞ &XZgtr C6809 A6 Hl68XXHP�¶‘�ñ “É gq& DTRUE_dFALSE_ 4 AZgtr ðÌ4/ƒà &xZintaddC6809 A6Hl68XXHP�¶‘�ñ “É [Z ð &aZintadd£� 44ãá5�÷  &xZintdivC6809 A6ÂHl68XXHP�¶‘�ñ “É õØ&aZintdiv¨¤}42yoéoAéoéoé@†ÿÿ§éƒ,lé�íé'…ìé� íé'} ƒ,`gCSÃ9léXI% ÿöFVíéìéA£é%íéAìéXIÃíé ìéXIíô¿}?‚@éìéDVí@éjé&ÿɦéFìé$ÿ¥¦éHìé% ÿ• @ÌŽ2g52b9ZN? &xZintmulC6809 A6”Hl68XXHP�¶‘�ñ “Ê ª&aZintmul´£}42y†ÿÿ§bodoc�íé'oìé@� íé'@a ƒ.`dCSÃ9¦@éæé =íe¦éæé =ãdíd$lc¦@éæé=ãdíd$lc¦éAæé=ãcíc¦éHìe®c%x}{ÿ°ÿ« ÌŽ2g52b9‘ &xZintnegC6809 A6 Hl68XXHP�¶‘�ñ “Ê ñ& aZintnegaZintabsFA ƒ,CSÃ@9F[ &xZintsubC6809 A6 Hl68XXHP�¶‘�ñ “Ê &aZintsub´Ÿ44£á5�Ü &XZleq C6809 A6 Hl68XXHP�¶‘�ñ “Ê kc& DTRUE_dFALSE_ 4 AZleq áÌ4/ƒà &XZles C6809 A6 Hl68XXHP�¶‘�ñ “Ê mc& DTRUE_dFALSE_ 4 AZles áÌ4-ƒÞ &XZneq C6809 A6 Hl68XXHP�¶‘�ñ “Ê mc& DTRUE_dFALSE_ 4 AZneq áÌ4&ƒ× &˜ZubboundsC6809 Hl68XXHP�¶‘�ñ “Ê >d& ¤RANGE_ERROR-Ò �Zubbounds34áä$2a¡ä#2a5„  &˜ZubyteaddC6809 Hl68XXHP�¶‘�ñ “Ê E<&�Zubyt\ [eadd9÷ 44ëà5�ð  &˜ZubytedivC6809 _Hl68XXHP�¶‘�ñ “Ë J©&�Zubytediv? ^42|oéo@é§é'GÄÿÿ'EléX% ÿ÷Vçé é% æéX@Ëçé «@éæéXçéAæéTçéjé&ÿÑæé Æ2d5�–=^ &˜ZubytemulC6809 Hl68XXHP�¶‘�ñ “Ë VN&�ZubytemulK  4=5�,  &˜ZubytesubC6809 Hl68XXHP�¶‘�ñ “Ë VM&�ZubytesubK 44 à5�§  &XZugeqC6809 A6 Hl68XXHP�¶‘�ñ “Ë h·& DTRUE_dFALSE_ 4 AZugeq4Ì4%ƒÖ &XZugtrC6809 A6 Hl68XXHP�¶‘�ñ “Ë w¸& DTRUE_dFALSE_ 4 AZugtr+5Ì4#ƒÔ &˜Zuintadd C6809 Hl68XXHP�¶‘�ñ “Ë 6&�Zuintadd *½ 44ãá5�÷  &˜Zuintdiv C6809 {Hl68XXHP�¶‘�ñ “Ë K{&�Zuintdiv ?Ât42yoéoAéoé¯é'Yíé'AWléXI% ÿöFVíéì@é£é%í@éìéXIÃAíé ìé@XIíéìé@DVíéjé@&ÿÉ®éìé@D ÌŽ2g5�àOt &˜Zuintmul C6809 bHl68XXHP�¶‘�ñ “Ë Jn&�Zuintmul >Îc42xoboc¯é'HíéA'@¦éæé=íd¦éæé=ãcíc$lb¦éæé=ãcíc$lb¦éæé@=ãbíbìd®b ÌŽ2h5�ÎÛc &˜Zuintsub C6809 Hl68XXHP�¶‘�ñ “Ì F&�Zuintsub :Î44£á5�Ü &XZuleqC6809 A6 Hl68XXHP�¶‘�ñ “Ì h½& DTRUE_dFALSE_ 4 AZuleq9Ì4#ƒÔ]\ &XZulesC6809 A6 Hl68XXHP�¶‘�ñ “Ì h¿& DTRUE_dFALSE_ 4 AZules;Ì4%ƒÖ &˜ZuwboundsC6809 Hl68XXHP�¶‘�ñ “Ì >t& ¤RANGE_ERROR-Ò �Zuwbounds3# 4¬á"40@¬á%9® &˜Zwbounds C6809 Hl68XXHP�¶‘�ñ “Ì U& ¤RANGE_ERROR-Ò �Zwbounds I· 4¬á.40@¬á-9 &˜ZstchbounC6809 %Hl68XXHP�¶‘�ñ “Ì ;{&¤RANGE_ERROR„STR_ERRORa ¡Zstchbounds´ˆ .4�&ÀƒO4£á#À2b4@£á$2b5�É. &xZwshiftC6809 A6Hl68XXHP�¶‘�ñ “Í ô>&aZwshift§¬#4Œ'*DV0&ÿú'XI0&ÿú5‘{# &˜Zwrotate C6809 $Hl68XXHP�¶‘�ñ “Í ::&�Zwrotate .Ö,4Œ'* DV$Š€0' ÿôXIÉ0' ÿö5‘Š, &xZerrorsC6809 A6UHl68XXHP�¶‘�ñ “É øw& aZerrors¡CASE_ERROR !aMEMERR 3¡RANGE_ERROR,�STR_ERRORGý• [4ìeƒ·€S ÷€T5·€R5†""·€L÷€M¿€Nÿ€PŠ9�ÿÝ·€L÷€M ÿý�ÿÒ�ÿä ÿý�ÿË4ü€S ¦˜·€L5€  ÿý�ÿ·B ÿýÝ5[UY &xFALSE_ C6809 A6Hl68XXHP�¶‘�ñ “Á ¡i&aFALSE_ Tù _59ð  &XTRUE_C6809 A6Hl68XXHP�¶‘�ñ “Æ %„&ATRUE_Ù  Æ5û9Q  &xCOMPB_ C6809 A6Hl68XXHP�¶‘�ñ “À ¬t&aCOMPB_ _ô4P4¦€¡À& 5ƒ&ÿñ 2b5Ð &˜Z_END_PROC6809 Hl68XXHP�¶‘�ñ “Í ëÆ& ÁZ_END_PRO^ ]GRAM©#  ÿþ" *XSWI_1C6809 A6Hl68XXHP�¶‘�ñ “Í ÿúÿûD?*DSWI_1úÑÿúÀ¿ý *XSWI_2C6809 A6Hl68XXHP�¶‘�ñ “Í ÿôÿõD4*DSWI_2úÒÿôÀ¿÷ *XSWI_3C6809 A6Hl68XXHP�¶‘�ñ “Í ÿòÿóD1*DSWI_3úÓÿòÀ¿õ &˜END_DATA_C6809 Hl68XXHP�¶‘�ñ “Í ¼Â&�END_DATA_±‚ ]ÿÿÿÿváUNDERFLOWPULL1 aDerrorsáUNDERFLOWPULL2 áUNDERFLOWPULL3 �UNDERFLOWáZ_ERR_UNDERFLOWÁOVERFLOWPULL1ÁOVERFLOWPULL2ÁOVERFLOWPULL3#ÁOVERFLOWPULL4)�OVERFLOW -áZ_ERR_OVERFLOW 1¡GET_ADDRESS4�LOAD_REGSEáDIV_BY_ZERO_INTRâ€vváDIV_BY_ZERO_BYTX¡DIV_BY_ZERO\áZ_ERR_DIV_BY_0 g¡CASE_ERROR j¡Z_ERR_CASE ráCOMPB_RANGE_ERRu¡RANGE_ERRORz¡Z_ERR_RANGE~aMEMERR �¡Z_ERR_HEAP ’áSET_CONVERSION_•áZ_ERR_SET_CONV  �STR_ERROR£ÁZ_ERR_STRING ¥aZ_ACC_A¨aZ_ACC_B©ºXv$aZ_REG_XªaZ_REG_U¬¡Z_CC_FLAGS ®¡Z_CALLER_H ¯¡Z_CALLER_L °!END±²?$ÿÿÿÿ ÿÿv¡GET_ADDRESSaZerrors�LOAD_REGS¡CASE_ERROR !¡Z_ERR_CASE )¡RANGE_ERROR,¡Z_ERR_RANGE0aMEMERR 3¡Z_ERR_HEAP D�STR_ERRORGÁZ_ERR_STRING IaZ_ACC_ALaZ_ACC_BMaZ_REG_XNaZ_REG_UP¡Z_CC_FLAGS R¡Z_CALLER_H S¡Z_CALLER_L T!ENDUÅÓvÿÿÿÿÿÿÿÿ&XCABS FL6809A6 Hl68XXHP�¶‘�ñ ž ¦& ÄLONGREAL_ABS €ò !ABSc–0f®d91 &xCARCTANFL6809A6 Hl68XXHP�¶‘�ñ … l& ¤LONGREAL_AT ä aARCTAN Uç0f®d91 &XCCOS FL6809A6 Hl68XXHP�¶‘�ñ … š& ÄLONGREAL_COS ‚ÿ !COSp˜0f®d91 &XCEXP FL6809A6 Hl68XXHP�¶‘�ñ † ¤& ÄLONGREAL_EXP ‚ !EXPy—0f®d91 &XCLOG FL6809A6 Hl68XXHP�¶‘�ñ Î ã& ¤LONGREAL_LNÞ !LN on0f®d91 &XCSIN FL6809A6 Hl68XXHP�¶‘�ñ † '•& ÄLONGREAL_SIN �ù !SINj£0f®d91 &XCSQRTFL6809A6 Hl68XXHP�¶‘�ñ †  +Ñ& ÄLONGREAL_SQRT’5 ASQRT æÇ0f®d91 &XLATANFL6809A6Hl68XXHP�¶‘�ñ òÿLong real arctan(X) í£&<¤LONGREAL_NOÄLONG_UN_PARS äPACK_LONGresultÄSZERO_UPmant dATAN_NOÄSADDC_UPmant „REAL__AT ¤SCLEARmant U™< ¡LONGREAL_AT â 0Ìþ€3Ƀ̃2ˆg9 ò &XLCOS FL6809A6Hl68XXHP�¶‘�ñ L�Long real cos(X) øŒ&<¤LONGREAL_NOÄLONG_UN_PARS dCOS_NO äPACK_LONGresultÄSZERO_UPmant ÄSADDC_UPmant ¤SCLEARmant „REAL__COS]¢< ÁLONGREAL_COS ý 0Ìþ€3Ƀ̃2ˆg9 ò &XLSIN FL6809A6Hl68XXHP�¶‘�ñ òÿLong real sin(X) ˜&<¤LONGREAL_NOÄLONG_UN_PARS dSIN_NO äPACK_LONGresultÄSZERO_UPmant ÄSADDC_UPmant ¤SCLEARmant „REAL__SINQ¸< ÁLONGREAL_SIN Š÷ 0Ìþ€3Ƀ̃2ˆg9 ò &XLLOG FL6809A6Hl68XXHP�¶‘�ñ òÿLong real ln(X) b a „Ê&;¤LONGREAL_NOÄLONG_UN_PARS „REAL__LN äPACK_LONGresultÄSZERO_UPmant DLN_NOÄSADDC_UPmant ¤SCLEARmant Ûn; ¡LONGREAL_LNÜ 0Ìþ€3Ƀ̃2ˆg9 ò &XLEXP FL6809A6Hl68XXHP�¶‘�ñ òÿLong real e to the x �&<¤LONGREAL_NOÄLONG_UN_PARS dEXP_NO äPACK_LONGresultÄSZERO_UPmant ÄSADDC_UPmant ¤SCLEARmant „REAL__EXPo < ÁLONGREAL_EXP  0Ìþ€3Ƀ̃2ˆg9 ò &XLSQRTFL6809A6 Hl68XXHP�¶‘�ñ òLong real squareroot Õø&O¤LONGREAL_NO ÄLONG_UN_PARS „SLSRmant „SCOPYrealdSQRT_NO äPACK_LONGresultÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ¤SCLEARmant ¤REAL__SQRT ¡IO ÁLONGREAL_SQRT�3 0Ìþ3ɀ̃2ˆg9r &XLDIV FL6809A6Hl68XXHP�¶‘�ñ òLong real divide &<¤LONGREAL_NO„REAL__DIVäPACK_LONGresultÄSZERO_UPmant ÄLONG_BIN_PARSÄSADDC_UPmant ¤SCLEARmant dDIV_NO ;Ö< ÁLONGREAL_DIV ƒ÷ 0Ìþ€3ɃÌ2ˆg9r &XLMUL FL6809A6Hl68XXHP�¶‘�ñ òLong real multiply \�&<¤LONGREAL_NOdMUL_NO äPACK_LONGresultÄSZERO_UPmant ÄLONG_BIN_PARSÄSADDC_UPmant ¤SCLEARmant „REAL__MULSÔ< ÁLONGREAL_MUL ƒ 0Ìþ€3É̃ƒ2ˆg9 ò &XLADD FL6809A6+ Hl68XXHP�¶‘�ñ òLong real add/subtractÉë&S¤LONGREAL_NO „SLSRmant dSUB_NO „SCOPYrealäPACK_LONGresultÄSZERO_UPmant dADD_NO „SLSLmant ÄLONG_BIN_PARSÄSADDC_UPmant ¤SCLEARmant „REAL__ADDpãS ÁLONGREAL_ADD nò 0Ìþ3É€O ?ß ÁLONGREAL_SUB  & 0Ìþ€3É€†€'¨ˆ§ˆ Àƒ2ˆg9Y{& &XLABS FL6809A6+ Hl68XXHP�¶‘�ñ òLong real absolute ]�&@¤LONGREAL_NO„SLSRmant „SCOPYrealdABS_NO ÄSZERO_UPmant äLONG_NO_UNPACK „SLSLmant ÄSADDC_UPmant ¤SCLEARmant dŸ@ ÁLONGREAL_ABcbS }ð 40Ìþ3É€îˆ%®ˆ!¦Ä„æA§¤ç!ìBí"ìDí$ìFí&2ˆg9Nj4 &XLNEG FL6809A6+ Hl68XXHP�¶‘�ñ òLong real negate $&@¤LONGREAL_NO„SLSRmant „SCOPYrealdNEG_NO ÄSZERO_UPmant äLONG_NO_UNPACK „SLSLmant ÄSADDC_UPmant ¤SCLEARmant g @ ÁLONGREAL_NEG ~ó 40Ìþ3É€îˆ%¦Äˆ€æA®ˆ!§¤ç!ìBí"ìDí$ìFí&2ˆg9No4 &XLCOMPFL6809A6oHl68XXHP�¶‘�ñ I>Long real compare ;^&f¤LONGREAL_NO „SLSRmant dEQU_NO „SCOPYreal¤INVALID_OP ¤REAL__COMP dGTR_NO ÄSZERO_UPmant dLES_NO „SLSLmant ÄLONG_BIN_PARSÄSADDC_UPmant ¤SCLEARmant dNEQ_NO dGEQ_NO dLEQ_NO 'Pf ÁLONGREAL_COMPz- 3Á€'À] ƒ2ˆg9A× ÁLONGREAL_EQU „ 0Äþ3É€ÿâ'_9Æ9> ÁLONGREAL_NEQ %‰ %0Äþ€3É€ÿÑ&ÿñ ÿí<ó ÁLONGREAL_LEQ 3‡& 30Äþ3É€ÿÃ'ÿã+ÿá ÿÝ=b ÁLONGREAL_LES C‰6 C0Äþ€3É€ÿ³+ÿÓ ÿÏ=¼ ÁLONGREAL_GEQ Q‚D Q0Äþ3É€ÿ¥*ÿÅ ÿÁ> ÁLONGREAL_GTR _ƒa _0Äþ€3É€ÿ—Á'ÿµ ÿ±?> &xLFLOAT FL6809A63 Hl68XXHP�¶‘�ñ òLong real float ‡4&Q„FLOAT_NO ¤LONGREAL_NO „SLSRmant „SCOPYreal¤REAL__FLOATäPACK_LONGresultÄSZERO_UPmant äLONG_NO_UNPACK „SLSLmant ÄSADDC_UPmant ¤SCLEARmant P¸Q áLONGREAL_FLOAT ó; =0Ìþ3É€îˆ%ìÄ&M&îˆ!oÄoAoBoCoDoEoFoG 0ƒ2ˆg9„[= &xLROUND FL6809A6 Hl68XXHP�¶‘�ñ òLong real round ‹@&Q¤LONGREAL_NO äUNPACK_LONGREAL„SLSRmant „ROUND_NO „SCOPYrealÄSZERO_UPmant äLONG_NO_UNPACK „SLSLmant ÄSADDC_UPmant ¤SCLEARmant ¤REAL__ROUNDTQ áLONGREAL_ROUND õK '0Ìþ3É€î ˆ%1ˆƒÀîˆ!íÄ2ˆg90' &xLTRUNC FL6809A6 Hl68XXHP�¶‘�ñ òd cLong real trunc �G&Q¤LONGREAL_NO äUNPACK_LONGREAL„SLSRmant „SCOPYrealÄSZERO_UPmant äLONG_NO_UNPACK „SLSLmant ÄSADDC_UPmant ¤SCLEARmant ¤REAL__TRUNC„TRUNC_NO VQ áLONGREAL_TRUNC öN '0Ìþ3É€î ˆ%1ˆƒÀîˆ!íÄ2ˆg90' &˜CONTRACT FL68090 Hl68XXHP�¶‘�ñ JtLong real->Short real ö&JÄLONG_UN_PARS „SLSRmant äPACK_ONLYresult„SCOPYrealÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ¤SCLEARmant ¤CONTRACT_NO ¤PACK_result£J ÁREAL_CONTRACTz, 63þ€Ì€íˆ)Ìÿ�íˆ'1ˆÀ3„ƒì„ƒ& ƒ 2ˆg9jã6 &xEXTEND FL6809A60 Hl68XXHP�¶‘�ñ JuShort real->Long real Á&K„SLSRmant „SCOPYrealäPACK_LONGresultÄSZERO_UPmant äPACK_ONLYlongre„SLSLmant ÄSADDC_UPmant ÄSHORT_UN_PARS¤SCLEARmant „EXTEND_NO øK ¡REAL_EXTENDÕ 63þ€Ìíˆ)Ìüíˆ'1ˆÀ3„ƒì„ƒ€& ƒ 2ˆg9gc6 &XLSUBSFL6809A6ôHl68XXHP�¶‘�ñ JvLong real pack/unpack § &9„SLSRmant „SCOPYrealÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant „NORMALIZE¤SCLEARmant ÄREAL_OVERFLOW99ÁPACK_LONGREALáONLY_PACK_LONGRŽ�~ Vìă@À,Fƒ'F¦H‹§H$,lG&(lF&$lE& lD&lC&lB&fBfCfDfEfFfGfHlA&lĦH„ø§ÀHoI Ì@íĦB* „§BìÄÃÿ O_XIXIXI¸ø~1oXI„ªJ4 31BƒƒƒêB5 §¤ç!ìCí"ìEí$ìGí&9¦1 áUNPACK_LONGREAL—ë i—¦Ä„€§*¦ÄæA„GVGVGVGVí¤ìBí#ìDí%ìFí'¦A§"o)3#1B0¦B„§Bìăÿíă@ü&lA&lÄ ƒ'¦BŠ€§B9žEi &xLUTILS FL6809A6� Hl68XXHP�¶‘�ñ JvLong real parameter paŒ&NÄPACK_LONGREALäUNPACK_LONGREAL „SLSRmant „SCOPYrealÄSZERO_UPmant äOedNLY_PACK_SHORT„SLSLmant ÄSADDC_UPmant ¤SCLEARmant äONLY_PACK_LONGRŒðN'4@2èÿŸÎïè)Îüïè'îèe4@îècïègîèe5…' ÁLONG_BIN_PARS!‹X (!ÿÜíè'¯è%¯è#0bîˆ0%1ˆƒîˆÀ#1 ƒ9$È( ÁLONG_UN_PARS B¡M Bÿ»íè'¯è#0bîˆ%1ˆ0ƒ9K� áLONG_NO_UNPACK W© Wÿ¦íè'¯è#0b9™ áPACK_LONGresultc[; c®ˆ!3„9Û áPACK_ONLYlongremWC m®ˆ!3„9å áPACK_ONLYresultw\` w®ˆ!3„ƒ9o &XSATANFL6809A6§Hl68XXHP�¶‘�ñ òôShort real arctan(X) £ô&t„SLSRmant ¤REAL__TEST „SCOPYreal$ONEäRESULT_IS_ZERO „REAL__DIV¤IS_INVALID ÄSZERO_UPmant „PI_HALVESdATAN_NO äTWO_POINT_FOUR ¤POINT_FOUR „SLSLmant ÄSADDC_UPmant ÄSHORT_UN_PARS¤SCLEARmant „REAL__ADDkFt]ÄRESULT_IS_NaN „REAL__MUL¤PI_FOURTHS ¤PACK_result¤ATAN_CONST1¤ATAN_CONST2¤ATAN_CONST3¤ATAN_CONST4¤ATAN_CONST5¤ATAN_CONST6¤ATAN_CONST7¤ATAN_CONST8¤ATAN_CONST9ÏR]ÁSHORTREAL_AT aREAL_AT×03þƒ2ˆg9AA�REAL__AT Æe{À3ˆ&ÀÀƒM'+Àƒoˆcoˆaì@ˆƒ,*ƒ/0ìˆ0³&ìˆ0³&ìˆ0³&ìˆ0³#lˆc :'ÿùlˆa 3숃ÿÿ,ÿòƒÿý/$숳¡{}~À€&숳À€&숳À€&숳À€"ÿȦˆ 4oˆ mˆc'@1ˆ3 ƒ Ž 3ˆƒ1ƒ7mˆa&07Ž 3 3ƒƒ1„3ˆ Kƒ†€§ˆ 0ƒ1„3ˆSç}{îÀƒ1ˆK3 ƒ0ƒ1„3ˆÀƒ1ˆ3ˆVÀƒ1ˆ3 ƒ01„3ˆKÀƒ1ˆK3ˆÃƒŽ €3 ƒ01„3ˆÃƒŽ 3 ƒ0ƒ1ˆK3ˆ0ƒ1„3 ƒÒl{zYÀ1„3ˆƒ Ž €3 ƒÀƒ1ˆK3ˆÀ ƒ1„3 ƒÀ1„3ˆƒf e Ž 3 ƒÀƒ1ˆK3ˆÀ ƒ1„3 ƒÀ1„3ˆƒ Ž €3 ƒÀƒ1ˆV3ˆ”Xz{ÄÀ ƒ1„3 ƒÀ1„3ˆVƒ1ˆK3ˆƒ Ž€3 ƒÀ ƒ1„3 ƒÀ1„3ˆƒ Ž3 ƒÀƒ1ˆK3ˆÀ ƒ1„3 ƒÀ1„3ˆƒ Ž €3 ƒØ¿{}0Àƒ1ˆK3ˆÀ ƒ1„3 ƒÀ1„3ˆƒ Ž 3 ƒÀƒ1ˆV3ˆÀ ƒ1„3 ƒÀƒmˆc' ŽÀ0 3ˆƒ mˆa'ŽÀ0 €3ˆƒ1„3 ƒ†€¨ˆ§ˆr_}žÀƒ5¨ § 9Ëø &XATANCFL6809A6�Hl68XXHP�¶‘�ñ òôArctan constants & ¡POINT_FOUR ?ª ª ÿþÔÌÏçy’Å áTWO_POINT_FOUR 6X  ª š‚y™üï2Bíþ ¡PI_FOURTHS -Ð ª ÿÿÉÚ¢!hÂ42�PI_HALVES!¤¼!ª ÉÚ¢!hÂ42 ¡ATAN_CONST1,)â ,ª ².RÄ©’C¬� ¡ATAN_CONST27)î 7ª š÷pzLü58g ¡ATAN_CONST3B)ú Bª £â®\w,Ëí@D ¡ATAN_CONST4M* Mª Õ$¤ˆ¹IÜ' ¡ATAN_CONST5X* Xª ÿý¢Éù¯k—.±V ¡ATAN_CONST6c* cª ².RÄ©’CÈ�Z ¡ATAN_CONST7n** nª ¸©Ó›é¤7ï~ ¡ATAN_CONST8y*6 yª û[³iQÕFñÑ ¡ATAN_CONST9„*B „ª øuú§±ï@°* &XSCOS FL6809A6zHl68XXHP�¶‘�ñ L‘Short real cos(X) éw&v„SLSRmant ¤REAL__TEST „SCOPYrealÄRESULT_IS_ONE dCOS_NO ¤IS_INVALID dREDUCE ÄSZERO_UPmant ¤SIN_APPROX ¤COS_APPROX „SLSLmant ¤FOUR_PITHS ÄSADDC_UPmant ÄSHORT_UN_PARS¤SCLEARmant ÄRESULT_IS_NaN „REAL__MUL ¢Wv ¤PACK_resultƒK ÁSHORTREAL_COS�REAL_COS G€3þƒ2ˆg9@A�REAL__COSÁšyÀ3ˆ&ÀÀƒM'+Àƒìˆƒ@0,ƒoˆ Ž€03 ƒ1„gfÌ3ˆƒƒoˆc\˜„'†€§ˆc¦ˆc41„3ˆ0ƒZÄ'ÀÀƒ 5¨ § 9ÿây &XSSIN FL6809A6vHl68XXHP�¶‘�ñ òóShort real sin(X) î€&w„SLSRmant dSIN_NO ¤REAL__TEST „SCOPYrealäRESULT_IS_ZERO ¤IS_INVALID dREDUCE ÄSZERO_UPmant ¤SIN_APPROX ¤COS_APPROX „SLSLmant ¤FOUR_PITHS ÄSADDC_UPmant ÄSHORT_UN_PARS¤SCLEARmant ÄRESULT_IS_NaN„REAL__MUL ˜w ¤PACK_result ƒM ÁSHORTREAL_SIN�REAL_SIN L…3þƒ2ˆg9CA�REAL__SIN»¥tÀ3ˆ&ÀÀƒM'+Àƒìˆƒ@0,ƒ¦ˆ 4oÀˆ Ž€3 ̃1„3ˆ3ƒƒ˜„'5ˆ€4 1„3ˆƒÄÀ' Àƒ5¨ § 9½:t &xSINCOS FL6809A6Hl68XXHP�¶‘�ñ N SIN and COS common ¥y&u„SLSRmant „SCOPYreal„REAL__DIV¤SIN_CONST1 ¤SIN_CONST2 ¤SIN_CONST3 ¤SIN_CONST4 ¤SIN_CONST5 ¤SIN_CONST6 ¤SIN_CONST7 ÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ¤SCLEARmant „REAL__ADD„REAL__MUL¤COS_CONST1 T‰u,¤COS_CONST2 ¤COS_CONST3 ¤COS_CONST4 ¤COS_CONST5 ¤COS_CONST6 ¤COS_CONST7 ý, ¡SIN_APPROX D£ }1ˆ3ˆVƒ 1ˆ3 ƒÀƒ1„3ˆKƒ1ˆK3ˆƒ Ž3 ƒÀƒ1„3ˆƒ Ž€3 ƒÀ1ˆK3 ƒ 1„3ˆƒÃƒŽ3 ƒ 1„3ˆƒÀ1ˆ}}mÀ„3 ƒ1ˆKÌ3ˆƒƒ00Ž€3 ƒ1„Ì3ˆƒ1À„3 ƒ1ˆVÌ3ˆƒƒ10„3ˆVƒ1ˆ0K3ˆƒŽÀÌ€3 ƒ1Ì„3 ƒƒ10„3ˆƒŽÀ3ûÚ}MÚ À ƒ1„3 ƒ1ˆK3ˆ Àƒƒ1„3 ˆƒŽ€3 À ƒ1„3 ƒ1ˆV3ˆ Àƒ9vÉM ¡COS_APPROX K´ } 1ˆ3 ƒÀƒ1„3ˆKƒ1ˆK3ˆƒ Ž €3 ƒÀƒ1„3ˆƒ h gŽ 3 ƒÀ1ˆK3 ƒ 1„3ˆƒÃƒŽ€3 ƒ 1„3ˆƒÀ 1„3 ƒ1ˆK)}}‰Ì3ˆƒƒ00Ž3 ƒ1„Ì3ˆƒ10„3ˆVƒ1ˆ0K3ˆƒŽÀÌ 3 ƒ1Ì„3 ƒƒ10„3ˆƒŽÀÌ €3 ƒ1À„3 ƒ1ˆKÌ3ˆƒƒ1„ ‹}.öÃ3ˆƒŽ 03 ƒ1„3 ƒ1ˆV30ˆƒ9(r. &xSINCOSCFL6809A6¥Hl68XXHP�¶‘�ñ òóSin and cos constants ¬)& ¡FOUR_PITHS :­ ª ¢ùƒnND)4z ¡SIN_CONST1 ³  ª ü@ì±Ñw˜àZ ¡SIN_CONST2 ¾ ª ±Xý@¬_Ÿ¢€¥æ ¡SIN_CONST3 !É !ª  àþám2C̸; ¡SIN_CONST4 , Ô ,ª  ÜõÎÿ„€:ª ¡SIN_CONST5 7!ß 7ª  –e例¹ƒ° ¡SIN_CONST6 B"ê Bª ™f<¹u–ËŒó ¡SIN_CONST7 M#õ Mª ‹@åu“™ð†r ¡COS_CONST1 X#õ Xª �‰e‹í”„Î! ¡COS_CONST2 c% cª ¶äì3óh©€ÆN ¡COS_CONST3 n& nª  ÑáAm ·@m “ ¡COS_CONST4 y' yª à¡8°$8Ú€Œ| ¡COS_CONST5 „(! „ª �‰e‹í”„ÎM ¡COS_CONST6 �), �ª ·W•c`°æ­C ¡COS_CONST7 š*7 šª ѱÿ<ÿLJñÆq &XSLOG FL6809A6ÔHl68XXHP�¶‘�ñ ò Short real ln(X) †&u„SLSRmant ¤REAL__TEST „SCOPYrealdLOG_TWO$ONE¤REAL__FLOAT„REAL__DIV ¤IS_INVALID ÄSZERO_UPmant DLN_NO¤LOG_CONST1 ¤LOG_CONST2 ¤LOG_CONST3 ¤LOG_CONST4 ¤LOG_CONST5 ¤LOG_CONST6 „SLSLmant ÄSADDC_UPmant ‰lu2ÄSHORT_UN_PARS„ROOT_TWO ¤SCLEARmant „REAL__ADD ÄRESULT_IS_NaN „REAL__MUL ¤PACK_result”\2ÁSHORTREAL_LN aREAL_LNÜ53þƒ2ˆg9@A�REAL__LN Àp}À3ˆƒ&ÀÀƒM'+À mˆ +ƒìˆíˆcìˆ ³ &ìihˆ ³ &ìˆ ³ &ìˆ ³ #lˆd&lˆc숣ˆc툎ÀÌ 3 ƒƒ10„3ˆKƒ¦ˆí}}} ˆ€§ˆ ƒ 1„3ˆƒ13ˆK3 ƒ 1„3ˆVƒ10„3ˆƒ1„03 ƒƒ1„À3ˆKƒ1ˆKÃ3ˆƒŽ 03 ƒƒ1„Ã3ˆƒŽ€03 ƒƒ1ˆK3 ^€}}êÀƒ1„3ˆƒ0ÀƒŽ3 Àƒ1„3ˆƒ0ƒ1„3 ƒ1ˆV3ˆƒ0ƒ1„3ˆVÀƒ1ˆK3ˆÃƒŽ €3 ƒ0ƒ1„3 ƒ0ƒ1„3ˆÃƒŽ 3 ƒ}}WÀ ƒ1„3 ƒ1 ˆK3ˆƒÀƒ1„3ˆƒ Ž €3 ƒÀ ƒ1„3 ƒ1 ˆV3ˆƒÀìˆc&]&51„3ˆV0 ƒ¦ˆc10„3ˆƒŽÀÌ €3 ƒƒ1„3ˆ]¡}Å0ƒ1ˆV3 ̃ƒ9 &XSEXP FL6809A6rHl68XXHP�¶‘�ñ òôShort real e to the x Éœ&x„SLSRmant dEXP_NO ¤REAL__TEST „SCOPYrealÄRESULT_IS_INFdLOG_TWOÄRESULT_IS_ONE äRESULT_IS_ZERO „REAL__DIV¤IS_INVALID dREDUCE „P_CONST0 „P_CONST1 ÄSZERO_UPmant „P_CONST2 „ONE_HALF „SLSLmant ÄSADDC_UPmant ‡x6ÄSHORT_UN_PARS„NORMALIZE ¤SCLEARmant „Q_CONST0 „Q_CONST1 „REAL__ADD„REAL__MUL¤PACK_result@á6ÁSHORTREAL_EXP�REAL_EXP Oˆ3þ€ƒ2ˆg9AÁ�REAL__EXPÊ™}À3ˆ &ÀÀƒM'ƒ+Àƒìˆƒ/ mˆ +ÃŽ €3 01„3ˆÀlˆ&lˆ çˆd§ˆc1„3ˆ1ˆ3ˆV 1ˆ3 Àƒ1„3ˆKd}|~01„3ˆÃŽ €3 0ƒ1„3ˆÃŽ 3 0ƒ1ˆK3 À1„3ˆ0ÀƒŽ €3 À1„3ˆ0ƒ1„3ˆÀ1ˆV3 0ƒ1ˆK3ˆT|{êÀ1„3ˆK Ž €3 À ƒj i1„3 Àƒ1„3ˆ Ž 3 À ƒ1„3 1 ˆK3ˆ¦ˆ ˆ€§ˆ À ƒ1„3 ¦ˆ ˆ€§ˆ À1„3ˆŽÿC{%UÀÌ 3 ƒì„ãˆcí„l&l„3„9äX% &xREDUCE FL6809A6¦Hl68XXHP�¶‘�ñ òòReduce real ÓL&9„SLSRmant „SCOPYrealÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ¤SCLEARmant „REAL__ADDÄREAL_OVERFLOW+9aREDUCE @û~ 1ˆ3 Ì@?£ 턃1/1 ƒƒ,ÿò¦ˆ‹§ˆ¦ˆ‰§ˆ¦ˆ‰§ˆ¦ˆ‰§ˆ¦ˆ‰§ˆ¦‰§¦‰§¦ ‰§ 1 ìˆmˆ *CP&L4xY~=p섃/1 ƒƒƒ@,ÿòm *l &l 1 ƒ¦ˆˆ€À§ˆƒ59c= &xRCONST FL6809A6¦Hl68XXHP�¶‘�ñ òóReal Constants 9å&�ONE_HALF ¶Jª ÿÿ€*¥�P_CONST0 ³b ª  ½;§N;ž�öÛÙ�P_CONST1 ´nª ¡�ä«»²Z¿X�P_CONST2 "µy"ª ÿù½0MRæ£kžQ�Q_CONST0 -³…-ª ˆ€µ˜¦ý…ïç�Q_CONST1 8´�8ª  é- �Ÿþ˹ haLOG_TWOCg{Cª ÿÿ±r÷ÑÏy«¿Ë!ONENoäNª €*ô�ROOT_TWO YÈÒYª µó3ùÞd„±˜ ¡LOG_CONST1 d#þ dª ´¯åÁ}ÏÒd ¡LOG_CONST2 o% oª »17PèËìÏ€s¶ ¡LOG_CONST3 z& zª ’·c§k=²)¾è ¡LOG_CONST4 …' …ª ´¯åÁ}Ï€€Ùo ¡LOG_CONST5 �(* �ª ÷kÙ<ù䟿 ¡LOG_CONST6 ›)5 ›ª ¦æÀ)~UÙ€·ã &XSSQRTFL6809A6ñHl68XXHP�¶‘�ñ òôShort real squareroot ÷&h„SLSRmant ¤REAL__TEST „SCOPYrealdSQRT_NO äRESULT_IS_ZERO „REAL__DIV ¤IS_INVALID ÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ÄSHORT_UN_PARS„NORMALIZE ¤SCLEARmankjt „REAL__ADD ¤PACK_result"ÂháSHORTREAL_SQRT �REAL_SQRTÌå3þ€ƒ2ˆg9@Á ¡REAL__SQRT 7É }À3ˆ&ÀÀƒM'+À ƒmˆ +ƒ1 ˆ3ˆ6ƒìˆíˆìˆíˆìˆíìˆí ¦ˆG§ ¦ˆF§ ¦ˆ §ˆ† §ˆAjˆA10 3ˆ+ƒ1ˆ363ˆƒ1„3ÉÏ}~|0ˆƒƒìíˆìíˆìíìí ¦„§ ¦&j J§ ¦ §0ˆ3 mˆA'7ìˆ+£ &,ìˆ-£ &$ìˆ/£&ìˆ1£ˆ&ìˆ3£ˆ& ¦ˆ5¡ˆ& @ÿyrB~ é01 3„ƒ9ã  &XSDIV FL6809A61Hl68XXHP�¶‘�ñ òñShort real divide e;&l„SLSRmant ¤REAL__TEST „SCOPYrealÄRESULT_IS_INF äSHORT_BIN_PARS ¤INVALID_OP äRESULT_IS_ZERO ¤IS_INVALID ÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant „NORMALIZE¤SCLEARmant dDIV_NO ¤PACK_resultñNlÁSHORTREAL_DIV�REAL_DIV E~3þ€2ˆg9¦ˆ ¨ˆ§ 9CÇ�REAL__DIV»§~À3ˆ&À 43 5'M' +3Á'ƒ0]'ƒ]0'ƒÁ' 1ˆ3„ƒ9ÿ²ìˆ£ í„m + 1 Àl&l„ Àÿï1_4æäÁ?/¢1$~~ˆ 숣 &"숣&숣ˆ&숣ˆ&%l f"ÿömˆ*_æäÁ?, Ylä1l0 1ˆ� ÿ⦈ ˆ§ˆ¦ˆ¢ˆ§ˆ¦ˆ¢ˆ§ˆ¦ˆ¢=^~D÷ˆ§ˆ¦ˆ¢ˆ§ˆ¦ˆ¢§ˆ¦ˆ¢§ˆ¦ˆ¢ §ˆ91ˆläÿU053„9!¼D &XSMUL FL6809A6 Hl68XXHP�¶‘�ñ S€Short real multiply Þ`&d„SLSRmant ¤REAL__TEST „SCOPYrealäSHORT_BIN_PARS ¤INVALID_OP äRESULT_IS_ZERO dMUL_NO ¤IS_INVALID ÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant „NORMALIZE ¤SCLEARmant ¤PACK_resultS dÁSHORTREAL_Ml kUL�REAL_MUL P‰3þ€2ˆg9¦ˆ ¨ˆ§ 9CÇ�REAL__MULǦ}À3ˆ&À 43 5'M' +0Á' ÌÁ'ƒ] 'ƒÁ'@À]'Á0'1 3„ƒ91ˆ3„ƒÄ91ÿ™ìˆã í„þ4Æ@5f†ð}}ˆfffffff †¥ˆ'<¦ˆ« § ¦ˆ©§¦ˆ©§¦ˆ©§¦ˆ©§¦ˆ©§¦ˆ©§¦ˆ©§4 þ41 0ƒZ&ÿ›5$ffffWÍ}öffff l&l„3 „ƒ9Ä &XSADD FL6809A6qHl68XXHP�¶‘�ñ òñShort real add/subtrac·G&i„SLSRmant  dSUB_NO ¤REAL__TEST „SCOPYrealäSHORT_BIN_PARS ¤INVALID_OP äRESULT_IS_ZERO ¤IS_INVALID ÄSZERO_UPmant dADD_NO „SLSLmant ÄSADDC_UPmant „NORMALIZE¤SCLEARmant ¤PACK_resultª iÁSHORTREAL_ADD�REAL_ADD +d3þ€O ?�REAL_SUB ¨r  3þ†€'¨ˆ§ˆ02ˆg9tt �REAL__ADD#¶œ}#À3ˆ&À ƒ43 5'ƒM' +0 Á'ƒ ]' Á'Á'ƒ01 3„ƒ910ˆ3„ƒ9숣 .'%lˆ&lˆ01ˆƒ ÿæì £ˆ' l &g}}� l 1 ƒ ÿëìˆ턦ˆ ¡ˆ&]§ ¦ˆ«ˆ§ ¦ˆ©ˆ§¦ˆ©ˆ§¦ˆ©ˆ§¦ˆ©ˆ§¦ˆ©§¦ˆ©§¦ˆ© §%@€l&l„ffffffi˜}}üff g숣 &숣&숣ˆ& 숣ˆ& ƒ#1ˆ3 1 3ˆ¦) I§ ¦(¢H§¦'¢G§¦&¢F§¦%¢E§¦$¢D§¦#¢C§¦"¢B§¦18}h *§ 3„9 ] &XSABS FL6809A6Hl68XXHP�¶‘�ñ òòShort real absolute ²r&9„SLSRmant „SCOPYrealdABS_NO mlÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant äSHORT_NO_UNPACK¤SCLEARmant \é9ÁSHORTREAL_ABS�REAL_ABS 8q'3þ€îˆ%®ˆ!¦Ä„æA§¤ç!ìBí"2ˆg9G' &XSNEG FL6809A6Hl68XXHP�¶‘�ñ òòShort real negate S*&9„SLSRmant „SCOPYrealdNEG_NO ÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant äSHORT_NO_UNPACK¤SCLEARmant _ê9ÁSHORTREAL_NEG�REAL_NEG mˆ&9mˆ&4mˆ&/mˆ&*mˆ*숃@€/&mˆ 'ìˆmˆ 'CP&LmÀˆ&ƒ9lˆ ÿæÙèZ &XSUBS FL6809¤Hl68XXHP�¶‘�ñ L(Generic real subroutinÓ×&3„SLSRmant „SCOPYrealÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ¤SCLEARmant ÄREAL_OVERFLOWq 3 ¡REAL__TEST +» MìÄ£ˆ)&*¦B„&"mC&mD&mE&mF&mG&mH& mI&†‰ rO_&OÆ †ÿÿÆ9{M�NORMALIZEAIJqA4 &ìÄ£ˆ),  Kìˆ'ÃíÄ5 mB+ìăíÄ1BÀƒ ÿîìÄ£ˆ), ìˆ)0íÄ1Bƒ ìÄ£ˆ'/ lA&lÄ1B ÿé 05 Þq &XSSUBSFL6809A6°Hl68XXHP�¶‘�ñ NShort real pack/unpacký&9„SLSRmant „SCOPYrealÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant „NORMALIZE¤SCLEARmant ÄREAL_OVERFLOW99áPACK_SHORTREAL áONLY_PACK_SHORT ¿~ Mƒìă@À€,<'=¦E‹€§E¦D‰§D¦C‰§C¦B‰§B$fBfCfDfElA&lÄoEoFoGoHo Iƒ oĆ€§A¦B* „§BìÄà O_TFêJ„€ªB礧!ìCÅ~ní"9º áUNPACK_SHORTREAqøç Jq¦Ä„€§*¦ÄæAXI§!o¤Tç"ìBí#o%o&o'o(o@)줃í¤Áÿ�&l!&l¤ Á€'¦"Š€§"9NJ &XCOMP FL6809€Hl68XXHP�¶‘�ñ I8Generic real compare vL&9„SLSRmant ¤REAL__TEST „SCOPYreal¤IS_onINVALID ÄSZERO_UPmant „SLSLmant ÄSADDC_UPmant ¤SCLEARmant GÃ9 ¡REAL__COMP 1¤ }À3ˆƒ&À 43 ƒ5'M' +0Á& C ]'ÿû+ Á'1 3ˆ¦J¡*&6줡Ä' $áA' "ì"£B&ì$£D&ì&£F&ì(£H& _9-õ}l # "Æ ÆÿÿmJ'P9# &XSCOMPFL6809A6WHl68XXHP�¶‘�ñ I±4¦ «à§ ¦‰§¦‰§¦‰§¦‰§¦‰§¦‰§¦‰§9.> &xRERRORSFL6809A6Hl68XXHP�¶‘�ñ øÏ “}&5„SLSRmant „SCOPYrealdSTmove ÄSZERO_UPmant dMBmove „SLSLmant ÄSADDC_UPmant ¤SCLEARmant ú5aINVALIDÁREAL_OVERFLOW¡INVALID_OP á}4pŽ€ 4p!Ž€5»®äìˆe³€/ƒˆíˆeÌ,ý€ÔŽˆ€¦ü€¤ Ì(ýˆˆ€ÔŽ€Ÿü€�Î#À®äìˆe€1©€¯þ€Ô®¤¯Ä®"¯B³€ÿ€'³€' ³€á' ³€ã'\�}jo ³€ý&æ$çD ì$íDì&"íFŽ€fÎ3ö€e O®äìˆg Žc�5ð4DDDD�§„5„�§˜DDDD� §˜„�§9� #‹79‹09t:jABREAKÊÕžÊ!2ÎÌÿƒ9&pzaSQRT_NOÕaSIN_NO ×aCOS_NO ÙaATAN_NOÛALN_NOÝaEXP_NO ß�TRUNC_NO á�ROUND_NO ãaADD_NO åaNEG_NO çaSUB_NO éaMUL_NO ëaDIV_NO íaEQU_NO ïaNEQ_NO ñaLEQ_NO óaGEQ_NO õaLES_NO ÷aGTR_NO ùaABS_NO û�FLOAT_NO ý�EXTEND_NOÿ¡CONTRACT_NO'iz  LONGREAL_NOÝ }Õªª ªª"&*.26:>ªªBFJNRW__€/Real error INVALID  €/Real err“}~Aor OVERFLOW € 7routine called by user from qpaddress xxx€xH. REAL_ LONGRE%À~|¬AL_SQRTSIN COS AT LN EXP TRUNCROUNDADD NEG SUB MUL DIV EQU NEQ LEQ GEQ LES GTR ABS FLOATEXTEND CONTRACT´| âMONITOR_MESSAGEÂERROR_MESSAGEÂERROR_STATUS bMESSAGE­˜ } ÿNo error  °ï}}j  Ï}8Õ š8 &xSTACK_ CC6809A6 Hl68XXHP�¶‘�ñ ¥ø ¸ã&bSTACK_ y   pÿÿ ÿÿ&xPAPPENDIO6809´Hl68XXHP6809 co P& �×&MäBACK_PTR_ARRAY $IOR„Piocheck „LINESIZE äPAD_ODD_RECORDSDopen Dcreat„seek_rec ¤Passociate dPerror äFIRST_WORD_EQUA ¤Psavereturn åíM !ŽÌ #� dPARAM_ FgÌŒƒö ÷¾ˆˆ¿ ¾üÌö€Á&€¾€ 0 Æ¿_ü2Uƒýƒ, ¾ 0 _¿2üý!¾Œ€]gDZles #ð hÈ@ƒ÷ŒÑí DZgeq ñ}qÉ@ú'†Ä‚ƒ(öçŸ 0üXIŽ0‹ ü턾 0o„¾ 0o„ ¾ 0Æç„ ¾ 0o„¾ 0Æ焾 0ü턾 0Ì턾 0ˆ<o„¾ 0ˆ=¿a"}∎€«2v3äÌ@ ÏYdMBmove {cnïÈ ƒþ4@ç"Ÿ¾ 0ˆ>ö€€ 焾 0ˆ?o„¾ 0ˆ@_€O턾 0ˆBPo„ö ')ÆÿÿÀ¾€ÆƒæŸ ƒ%Pýƒ,†1 ƒXüWD²n$Zcc‡ÑVWÍHô' ÷ü„ˆÃý¾ 0ˆ=Æÿÿ¿ ¾æŸ æŸ ƒý•@ƒ,†Ä€ƒ ¾ 0ü€í„¶ïV�RPappend ª ]ª9ç aPappend�EPappend ª®Ù «VARIABLEý &xPBUFVARIO6809KHl68XXHP6809 co P' j~&$IOR„Piocheck ÄFIB_IS_VALID DPlook¤PsavereturnCµ'"#¿·÷# ö÷€öÈ#÷öÁyÙ'DZequ ô. ÉLƒú'÷ˆÔü'üŒ€ƒ¾0ˆJ ¿1�.�RPbufvar J/çJ9‡ aPbufvar�EPbufvar J»‡ bufvÈô&xPCLOSE IO6809¸ Hl68XXHP6809 co P( x·&?äBACK_PTR_ARRAY $IOR„Piocheck ÄFIB_IS_VALID äFIRST_WORD_EQUAdPerror Dclosedunlink dPputln ¤Psavereturn cÆ?K&#¿¿·ƒ#"ö÷¾¿25€üƒ'sr‹ ¾0ˆ>þ3Eæ„äľ0!ˆ@®„÷ Œá(KDZgtr üIDÉHô ' ÷ üŒ æŸÉTýƒ'† ƒæŸX IŽ0‹_O턎€²2v3äÌ@ ÕIdMBmove {_*‰È ƒþ4@'H¾0 ÉTƒýƒ'† ƒ+×*aRPclose±’<±9î aPclose aEPclose±+~ ²PURGE>  &XPEOF IO6809O NHl68XXHP6809 co P) [&$IOR„Piocheck ÄFIB_IS_VALID DPlook¤PsavereturnCµS"2¿·ö2#÷€¾¿#Rü'#¾0æ„È' "2÷üƒ¾!0æ„÷ Æ÷öàšSARPeofMlM9Š APeof AEPeofM> eof ˘&XPEOLNIO6809O UHl68XXHP6809 co P* aJ&#$IOR„Piocheck ÄFIB_IS_VALID DPlookdPerror ¤Psavereturnò #Z"2¿·ƒ#"ö÷€¾¿25ü'' ¾0æ„'# üƒ¾0ˆ„?æ„÷† @†ÈöÖœZaRPeoln T�™T9‘ APeolnaEPeoln T¢¹ eolnÑæ&XPGET IO6809O 09‘Hl68XXHP6809 co P- ›Œ&#$IOR„Piocheck ÄFIB_IS_VALID DPlookdPerror ¤Psavereturnò #'"#¿·÷ƒ# ö÷€öÈ#÷öÁzM'DZequ õr ÉHú'g¾¿Œˆ÷üÔ€'L¾0æ@„È'†Ä€4¾0æ „'†H!¾0æ„'HÈüƒ¾0Æ焾0@o„†ÀÓrARPget�÷¿�9Í APget AEPget�‡ get ÛŽ&xPINPUT IO6809QHl68XXHP6809 co P-  ŽC&BINPUTåïNPUT£­&˜PLINEPOS IO6809i Hl68XXHP6809 co P/ þ¥&$IOR„Piocheck ÄFIB_IS_VALID dPerror ¤PsavereturnÑÜp"0¿·_O"2ýö÷€¾##¿t süR'9¾0ˆ@þ€3AæÄý"®„³ý ¾0æ„È ¾0ˆ?ä„'D„Ž¿† €ƒüðp�RPlineposhyh9¥�Plinepos �EPlineposhPlineÚ×&xPMAXPOSIO6809NHl68XXHP6809 co P1 •r&$$IORdPbound „Piocheck dPerror ÄFIB_IS_VALID ¤Psavereturnr.$R"3¿·ƒü€"2ýö÷¾##¿üR'¾0þ3Eæ„äÄ'1†ƒ †ƒüèR�RPmaxpos MM9Š aPmaxpos�EPmaxpos MÍœ maxpåÚ&XPOPENIO6809O \Hl68XXHP6809 co P2 em&<äBACK_PTR_ARRAY $IOR„Piocheck Dopen DcreatDclose¤Passociate dPerror äFIRST_WORD_EQUA¤Psavereturn <‹< !ŽÌ #� dPARAM_ F}ÌŒƒö ÷¾ˆˆ¿ ¾üÌö€Á&(¾€ 0 Æ¿_ü2Uƒýƒ,E ¾ 0 _¿2üýU2ƒ-(ƒýU ƒ-¾ 0 €Æ¿Mµ}ƒ_üÈ„ƒý¾ŒѳDZles #î ˜È@ƒ÷ŒÑ DZgeq ï}¡É@ú'†Ä‚ƒ öçŸ  0üXIŽ0‹ ü턾 0o„¾ 0o„ ¾ 0o„¾ 0Æ焾 0Æ焾 0ü턾 0Ì턾 0ˆ<o„¾ 0ˆ=¿>Ì}ˆŽ€S2v3äÌ@ Ï1dMBmove {a=È ƒþ4@ç"Ÿ¾ 0ˆ>ö€€ 焾 0ˆ?o„¾ 0ˆ@_€O턾 0ˆBo„�O=aRPopen R‘šR9� APopenaEPopen R§» SVARIABLE¥ &xPOUTPUTIO6809QHl68XXHP6809 co P3 ™&bOUTPUT \UTPU¥²&˜POVERPRINIO6809ZHl68XXHP6809 co P4 îã&%$IOR„Piocheck ÄFIB_IS_VALID dPerror „overprint¤Psavereturn %["2¿·ƒöut3#÷€üR '8¾¿0æ„'"æŸ5Pƒ'†2ƒ¾0ˆ@_@Oí„†Ä ƒ†ƒ;Ü[ ¡RPoverprintY»Î Y9–¡Poverprint ¡EPoverprintYùoverÔñ&XPPAGEIO6809O 09ZHl68XXHP6809 co P5 —{&#$IOR„Piocheck ÄFIB_IS_VALID dPerror Dpage ¤PsavereturnÜØ#["2¿·ƒö3#÷€üR '8¾¿0æ„'"æŸ5Pƒ'†2ƒ¾0ˆ@_@Oí„†Ä ƒ†ƒ;Ü[aRPpage Yx¤Y9– APpageaEPpage Y‘­ page×Ï&˜PPOSITIONIO6809M Hl68XXHP6809 co P6 Â&$IOR„Piocheck dPerror ÄFIB_IS_VALID ¤PsavereturnÑÜT"0¿·_O"2ýö÷€¾##¿üƒR'¾0þ3AæÄý®ˆ„³ý@Ȇü/‚T ¡RPposition L¢† L9‰�Pposition¡EPposition Lëxposiãá&xPPROMPTIO680909PHl68XXHP6809 co P7 ÀÀ&$$IOR„Piocheck ÄFIB_IS_VALID dPerror dprompt ¤PsavereturnŠP$P"2¿·ƒö3#÷€üR '.¾¿0æ„'æŸ5Pƒ'†1ƒ†ƒ0†ƒ�×P�RPprompt O&O9Œ aPprompt�EPprompt Oר promßè&XPPUT IO6809O % Hl68XXHP6809 co P8 u &?dPbound ÄWRITE_REC_LEN$IOR„Piocheck äPAD_ODD_RECORDSÄFIB_IS_VALID dPerror „Pputtext Dwrite¤Psavereturn •×?'"#¿·÷ƒ# ö÷€öÈ#÷öÁ~Y'DZequ ùe ÉHú'û¾¿Œˆ÷üÔ€ƒ'à¾0怄';0ˆ>#æ„' üƒµ¾0®„5¼-†Ÿ¾0ˆ=¿Œ@ ¾€Œ¬eDZgtr ý#…ÂRƒäŸ '¿ ¾0®„"¿üWL#$Zcc ‡Í|¤ÍHô'¾0v uˆJü0‹Æ ç„üÃý _Oý€¾0ˆ€J0‹¾ÆƒæŸe ³&¾0 þ3HîÄ0Ã턆2¾0o„ ¾0o„†88|Ä †ËêARPput$\$9a APput AEPput$.4 put äž&˜PRD_CHAR IO6809\Hl68XXHP6809 co P9 Œ&,$IOR„Piocheck ÄFIB_IS_VALID dPerror ¤Plook_text „Pget_text¤PsavereturnØ ,_"2¿·ö2"÷€¾¿25ü'. ¾0æ„'##ü÷ö#Á&üƒ1†ƒ †ƒö;´_ ¡RPread_char[€» [9˜¡Pread_char ¡EPread_char[/«readÓÒ&xPRD_INTIO680909’Hl68XXHP6809 co P: Ò &/$IOR„Piocheck ÄFIB_IS_VALID dPerror ¤Plook_text äPget_look_text ¤Psavereturn`/J"2¿· ö 0#÷€_Oý""ý¾¿ ü5 '_¾ 0#æ„'Lü"÷öÁ JDZequ öeDÈÀƒ÷ öÁÉHƒô '÷ üŒ€ƒ÷ ØöÁHÁ&öÁ ˆ-ƒ÷öÁ ”+ƒú' ÷ˆÈüƒ÷öÁHÁ&àöÁ0¼jeDZugeq>¤È€÷öÁ9Ò>DZuleq DU¯ÉHƒô'Áö€ÈÁ0÷ö€ÈÁ9ƒô÷Œ öÁƒô”€'n¶€0·€ˆ†»÷öˆ€·ñHøUDZgtr  üýÈ„÷¾Œó4È„ƒô÷Œó4ŠDZles #îÈ”ƒúú'†H·üŽ@ 0ÐdZintmul ·±E0È‚ýöý""ü³ýü2ƒ÷ÿjöP2'†ƒöR!' üý ü% EdZintneg §®$qÈ@ƒý†Ä ƒ†ƒ@ȆƒüßÀ$ áRPread_integer ‘´o ‘9ÎÁPread_integeráEPread_integer ‘â1readÓÒ&˜PRD_LONG IO6809 Hlwv68XXHP6809 co P; e&$IOR„Piocheck dPerror ¤Psavereturn„Prd_floatNÿ%&#¿¿·ƒ#2ö÷€¾#üŒô% áRPread_longrealªL 9\áPread_longreal áEPread_longrealg%readÓÒ&˜PRD_REAL IO68095Hl68XXHP6809 co P< ‚&$IOR„Piocheck dPerror ¤Psavereturn„Prd_floatNÿ-&#¿¿·ƒ#2ö÷€Ž#"üŽ Ì�l- ÄREAL_CONTRACT}3 &È„ƒŽ þÌϳdMBmove {Z2ÀÃ9 ¡RPread_real4�‹ 49q¡Pread_real ¡EPread_real45ŠreadÓÒ&xPRD_STRIO680909¦ Hl68XXHP6809 co P= ×&/$IOR„Piocheck ÄFIB_IS_VALID dPerror ¤Plook_text äPget_look_text ¤Psavereturn`/]&"¿¿ÿ· 23ö ÷€"#¾¿ üR'w¾ 0æ„P"'d_Oýü2 ÷¾ 0ˆ?æ„È÷ ¾ˆ¼3�]DZles #êVÈŒƒô ÷ öÁÒ:DZequ ÷GdÉ@ô ' 0¿ˆˆ¾÷ ü0‹öç„üȃ÷ µ¾ö€@ç„†Ä ƒ†ƒ™­G ÁRPread_string¥0o ¥9âÁPread_string ÁEPread_string¥iîreadÓÒ&xPRD_UNSIO680909] Hl68XXHP6809 co P> Ñà&/$IOR„Piocheck ÄFIB_IS_VALID dPerror ¤Plook_text äPget_look_text ¤Psavereturn`/M"2¿· ö 0#÷€_Oý"_Oý¾¿ #Rü'(¾ R0æ„'ü2 ÷öÁ ïÔMDZequ öOFÈÀƒ÷ öÁÉHƒô '÷ üŒ€ƒ÷ ØöÁHÁ&ØöÁŒ+& üƒ÷ŒöÁ&½ö€Á0i[ODZugeq>’È€÷ öÁ9Ò)DZuleq DK�ÉHƒô 'žö€ÈÁ0÷ ö€ÈÁ9ƒô ÷Œ  öÁƒô”€ '^¶€0·ˆ„÷ ¾Œ™x wÛòKDZugtr .A5ãÈ„ú÷Œ™Èƒ÷‰ÁÈ”ôú'†H·üŽ@ êï5„Zuintmul AÛMÈ‚ƒýöOó"2ýüƒ÷Pÿzö'†2!ƒüý†ƒ†1ƒ†ƒ ü¹TM áRPread_unsigned\²‹ \9™áPread_unsigned áEPread_unsigned\qkreadÓÒ&xPREADLNIO6809€ Hl68XXHP6809 co P? €¨&5$IOR„Piocheck ÄFIB_IS_VALID dPerror ¤Plook_text äPget_look_text „Pget_text¤Psavereturn­ 5P"2¿·ƒö2#÷€¾¿#Rü'X¾R0æ„'Eü2 ÷¾0ˆ?æ„È÷öÀÁ®ÑPDZequ ÷9IÉHô'÷üŒ€ƒ÷ ÖöÁHÁ&üÄ †ƒ@À†ƒWQ9�RPreadln  29¼ aPreadln�EPreadln «¬ readÓÒ&xPRESET IO6809 Hl68XXHP6809 co P? ›&4äBACK_PTR_ARRAY $IOR„Piocheck Dopen ¤Passociate dPerror äFIRST_WORD_EQUA¤Psavereturn4 !ŽÌ #� dPARAM_ FGÌŒƒö ÷¾ˆˆ¿ ¾üÌö€Á&Û¾€ 0 _¿_üÉ@ƒýƒ­úGDZles #ìHÈ„ƒ÷¾ŒÑÏDZgeq í}TÉ@ú'†Ä‚ƒ öçŸ 0üXIŽ0‹ ü턾 0o„¾ 0Æ焾 0o„ ¾ 0Æç„ ¾ 0o„¾ 0ü턾 0Ì턾 0ˆ<o„¾ 0ˆ=¿^{}ÅˆŽ€2v3äÌ@ ΗdMBmove {_=ÒÈ ƒþ4@ç"Ÿ¾ 0ˆ>ö€€ 焾 0ˆ?o„¾ 0ˆ@_€O턾 0ˆBo„Ž=aRPreset}²9B aPreset aEPreset8ß VARIABLEX &˜PREWRITE IO6809  Hl68XXHP6809 co P@ ùu&4äBACK_PTR_ARRAY $IOR„Piocheck Dcreat¤Passociate dPyxerror äFIRST_WORD_EQUA¤PsavereturnõO4 !ŽÌ #� dPARAM_ FCÌŒƒö ÷¾ˆˆ¿ ¾üÌö€Á&×¾€ 0 _¿Éüƒýƒ@,ÚCDZles #ìDÈ„ƒ÷¾ŒÑËDZgeq í}PÉ@ú'†Ä‚ƒ öçŸ 0üXIŽ0‹ ü턾 0o„¾ 0o„ ¾ 0Æç„ ¾ 0o„¾ 0Æ焾 0ü턾 0Ì턾 0ˆ<o„¾ 0ˆ=¿\y}ÁˆŽ€2v3äÌ@ Î�dMBmove {_=ÎÈ ƒþ4@ç"Ÿ¾ 0ˆ>ö€€ 焾 0ˆ?o„¾ 0ˆ@_€O턾 0ˆBo„�þ=�RPrewrite 9>�Prewrite �EPrewriteXºVARIABLET &XPSEEKIO6809O 09Î Hl68XXHP6809 co PA ™&*$IOR„Piocheck dPbound dPerror ¤PsavereturnÄFIB_IS_VALID „seek_rec œð*C&#¿¿·#2ö÷€ü5"ƒ'¨¾¿0þ3Eæ„"äÄ'‹÷ ¾Œä±CDZleq !ê?ÈÀƒ÷ ¼ÐZDZgeq ë}HÉ@ú '† Ä€ƒd¾0o„¾0þ3$È=¿ ¾®Ÿ€ æÄ柃%ýƒP1,†ƒ' ¾0üí„ ¾0o„¾"0o„¾¼P1'† ƒ†T}Á @ƒ†ÀƒÐßaRPseek ̓Í9  APseekaEPseek Í�, seekØÙ&˜PSTROPEN IO6809ˆWHl68XXHP6809 co PA ,& äBACK_PTR_ARRAY N !ŽÌ #~ dPARAM_ F{ȈƒŽ ¿ Ì ýÀ(Æç„0Æ€焾 0o„¾ 0o„¾€ 0Æ焾€ 0Æ焾€ 0ˆ<o„¾ 0ˆ>Æ焾€  0ˆ@üí„ ¾ 0ˆBÆç„¾ 0ˆDü턾í£{r€  0ˆFüí„ ¾ 0ˆHü턬L ÁRPstringopen ‡6" ‡9Ä¡PstringopenbSTRfile ÁEPsz ytringopen ‡Šstriåæ&˜PWRITELN IO6809DHl68XXHP6809 co PC ô¦&$$IOR„Piocheck ÄFIB_IS_VALID dPerror dPputln ¤Psavereturn‰2$G"2¿·ƒö2#÷€¾¿#Rü'¾R0æ„' ü1†ƒ0†ƒö*G�RPwritelnC%JC9€�Pwriteln �EPwritelnCZÿwritàï&˜PWR_CHAR IO6809‘ Hl68XXHP6809 co PC ß&2$IOR„Piocheck ÄFIB_IS_VALID dPerror „Pputtext „Plinefit ¤Pputblanks ¤Psavereturn%y2^"b¿·¿÷22ƒö÷€¾##¿üR'b¾0æ„R#'O¾üƒ0RöÁ&:ü#ƒü0öÁø^DZequ ÷ZÈ„÷¾ŒÑHDZneq #ì.fÉHƒô'¾0ˆJöç„ü1†ƒ0†ƒ2X. ÁRPwrite_char �3 �9Í¡Pwrite_charÁEPwrite_char �ßowritàï&xPWR_INTIO6809093 Hl68XXHP6809 co PE ÖË&2$IOR„Piocheck ÄFIB_IS_VALID dPerror „Pputtext „Plinefit ¤Pputblanks ¤Psavereturn%y2C&"¿¿ÿ·23ƒö÷€"#¾¿üR'¾0æ„R'ñ¾Œ, |ýCdZintneg§©,AÈHýüýˆˆ|Žö€ˆ0…¿¾Ì@ '¤,„Zuintdiv BÍAgÀƒË0çŸ!2¾Ì ƒýP!ƒ&ϾŒR",|Žö0…Æ-ç„ö³í–ADZgtr ü¥È„÷¾ŒÒµDZgeq îR±ÉHƒô' ÷ö‚"ý¾ü3ƒöÁ&L ˆöýü³€Œüö€ÈÁ÷öÀÁ°·RDZequ û;üÉHô'¾0 ˆJÎö3Å#æÄç„ü z Ɇ1ƒ†ƒK»; áRPwrite_integer2²� 29oáPwrite_integer áEPwrite_integer2‘awritàï&˜PWR_LON{zG IO6809=Hl68XXHP6809 co PF §&$IOR„Piocheck dPerror ¤PsavereturnÄPwrite_float „ !ŽÌ#„ dPARAM_ F3ÌŒƒƒö÷€ÀÆÆˆ¾ ü 4vŽ2x3äÌ@è 3dMBmove {Z2È þ4@ÏÑ áRPwrite_longrea<´‚ <9yáPwrite_longrealáEPwrite_longrea<бwritàï&˜PWR_REAL IO6809FHl68XXHP6809 co PG ¯&$IOR„Piocheck dPerror ¤PsavereturnÄPwrite_float „ !ŽÌ #€ dPARAM_ FÌŒƒƒö ÷€È€Ž Ì ¨ ¤REAL_EXTENDÝ &ÀÆÆˆ¾ü4vŽ 2x3äÌ@u&dMBmove {[;È ƒþ4@ÐZ ÁRPwrite_real E)Ñ E9‚¡Pwrite_realÁEPwrite_real Eå*writàï&xPWR_STRIO680909Ì Hl68XXHP6809 co PG Ü]&2$IOR„Piocheck ÄFIB_IS_VALID dPerror „Pputtext „Plinefit ¤Pputblanks ¤Psavereturn%y2}&"¿¿ÿ· 23ƒö ÷€"#¾¿ üR'�¾ 0æ„R'оæ„OýˆT¾ŒØñ&ýˆŒ¾üƒ¾‰H¼,¿öÁHÁ&Rü³€ŒüÌ@ý°€}{ˆ€¾¼�”DZleq !ë„ÈÀ÷ öÁÑDZequ øA�ÉHƒô '#¾ 0 ˆJþü3Ë#æÄç„ü! üÃý Â1†ƒ†ƒ0UA áRPwrite_string Ë½× Ë9ÁPwrite_stringáEPwrite_string Ë£writàï&xPWR_UNSIO680909ÿ Hl68XXHP6809 co PI Ö£&2$IOR„Piocheck ÄFIB_IS_VALID dPerror „Pputtext „Plinefit ¤Pputblanks ¤Psavereturn%y2Q&"¿ ¿ÿ·23ƒö÷€"#¾ ¿ü R'о0æ„R"'½ | Žÿÿ "ö 0…¿¾Ì ¥ÀQ„Zuintdiv BÌ)LÀË0çŸ!2¾Ì ý| {P!ƒ&Ïö ³€ç©)DZgtr ûqÈ„ƒ÷¾ŒÑýDZgeq íR}ÉHô' ÷ö‚" ý¾ü 3ƒöÁ&L ˆö ýü³€Œü ö€È Áƒ÷öÀÁ¯iRDZequ ú;ÈÉHƒô'¾0 ˆJÎÿÿö 3Å#æÄç„ü  z Ɇ1ƒ†ƒJû; áRPwrite_unsigneþ¿K þ9;áPwrite_unsignedáEPwrite_unsigneþœ|writàï&˜ASSOCIATEIO6809Ý Hl68XXHP6809 co P"  &äBACK_PTR_ARRAY $IORÄFIB_IS_VALID Dclose?X"3ý¿€Pƒ'柃 €ýæŸXI0Ž0‹_O턾0 o„ Æ÷¾æ„HOýÌý¾ˆ¼œaXDZleq !çPÉHô' ¾÷ˆ ü0‹æ„Á n¾DZequ ôsiÈ„ƒ÷üÃý€� ÐöÈ'HTZ¾Œ1/ŽH‰1¿üý ƒTH-0Ìýü„€ƒ¾0 0€‹þü3Ëæ˜Äç„ü³ ,€Ãý Ö¾€€0 ü0‹o„Æs ¡RPassociateܳ- Ü9¡Passociate ¡EPassociateÜSOassoÔë&˜FIRST_EQ IO6809Ý Hl68XXHP6809 co P# +& !ŽÌ #“ dPARAM_ F*Ⱦæ„OýÌý_Oý"¾ü0‹æ„Á *DZequ ð*Ȉƒ÷¾¼ÎåDZleq !å66É@ô'0¿€ˆ ×¾ü0ˆ‹æ„÷¾¼Œˆ÷¾Œ@ >[6DZles #æfȈƒô÷öÁ Ñ›DZneq #çtÉHô'M÷ö€ÁacžDZugeq;†È€ƒ÷öÁzÐüDZuleqAM‘ÉHô'¶€„ ·üÃýˆŽ0‹öçH„üÃý¾€0‹æ„÷ ˆ‰ö÷Ž΀¢-MDSTequ 8 ×ȃ÷ÎU áRFIRST_WORD_EQUÜ)X Ü9áFIRST_WORD_EQUAáEFIRST_WORD_EQUÜ4ÑIRSTœ¯&˜PRD}|_FLOATIO6809’Hl68XXHP6809 co P: &"$IORdPerror ÄFIB_IS_VALID ¤Plook_text äPget_look_text W"  ö>Á0#@ DZugeq;È€ƒ÷ö>Á9ÐIDZuleqAÈŒô÷öÁÑ]DZequ öÉHƒô'Œ:÷ˆ@¾6ŒnDZneq #ë05È€÷ö>Á0É@ú'0¿ˆT6¾6Œ.PŽ˜€€²ŽÌ,ÿÂ0 ÄLONGREAL_MUL † cÈ"ƒö>ýŽ Ìôù äLONGREAL_FLOAT öG "sÀ"Æ0ýŽ#&ÌŽŽ Ì )·" ÄLONGREAL_SUB ‚ �ɈƒŽŽ,Ìäç ÄLONGREAL_ADD r œÉHö;'|8üŒ„‡÷>ÿL9vëµ""ý‡¿‰Ž€´Î$Ì?FdMBmove {a|ÅÈ„ƒŽ€´Î,ÌÀˆƒ_Oý48ýˆ6;Æ÷:ŽˆL€²Î?ÌƒŽˆL€¼ÎGÌƒŽˆL€ÄÎOÌƒŽˆL€ÌÎWÌƒŽˆL€ÔÎ_ÌƒŽˆL€ÜÎgÌƒŽˆL€äÎõŽQ¤||;ˆL€ìÎwÌƒŽˆL€ôÎ̃ü�H‡'D¾‡0Hæ„'1ü‡È€ƒ÷>ö>Á ÈÀƒ÷‹öÁÉHƒô‹'÷‹üŒ€‡÷> ØöÁHÁ&ôö>Á ˆ-ƒ÷<ö>Á+ð)|}²ÉHƒú<' ÷ŒüŒˆ‡÷>ƒö�@>Á.&Æ÷ˆÈ;ü‡÷>ˆ ƒö>ÁEƒ÷ˆ �ö>ÁLƒúˆ€�÷�ö>ÁeȈƒú�÷�ö>Á ”lƒú�'•÷ˆÈ�ü‡÷>ÁÛ6}g' ˆ-ƒ÷=ö>Á ”+ƒú=' ÷ˆÈŽü‡÷>ö€È>Á0ƒ÷�ö€È>Á9ô�÷Œ �öÁƒô”…�'.¾4Œô.H‚÷�ö>Oý�Ì �#gdZintmul·³%‰ÈHó�ƒ0ý4üŒ€‡÷> ªö”€=' ü4…%dZintneg§°.ªÈÁƒý4öÁ&HÝö:Á&Ïö‚"8ý�ü4³�%ý4ƒ.DZles #óÖÈ€÷=ü4רdZintabs¤±!ßȃý~ }4_Á.ƒÆ÷9Ìý6ö9óë!dZwshiftªÀ(üÉ” ý6³4.Yö”ˆ='&Î?ö94`†Ž€ü«ø(dARRAY_ W#!Ș ƒ¿�¾�Ž,Ì€,m¦ ÄLONGREAL_DIV ‡ R1Ĉ #Î?ö94`†Ž€ü2& ƒ¿�¾�Ž,#"Ì,ƒü4³6"ý4ö9Á/ %z9 ‚ö<' "Ž$Ì,ÞsR ÄLONGREAL_NEG ‚ 8|Ĉ ƒ Ž,Î$ÌL@ƒ†Ä ƒ†ƒ@ȆƒŽ$þ„À‰ÌƒÂý8 ¡RPrd_float ±£Ã ±9î�Prd_floatµ¡EPrd_float ±Åh^²@$@Y@ÈA—ׄCAÃy7à€F“¸µµnM8Oé?ùõZ‚wHù02uOÝs¿<ù^ &˜PWR_FLOATIO6809 žHl68XXHP6809 co PE C&%$IORdPerror „Pputtext „Plinefit ¤Pputblanks ÄFIB_IS_VALID d%!"eý¿³,!"ýüý ü9‘�!!"eý¿ ³ /!"ýü ý ü9‘Ì!<"· ¾w0ˆJ§À„üw94ë N!ŽwÌ$L dPARAM_ F UÈÔüwƒ'>¾€w0æ„'+¾„�Œ¾ DZles #ê'sÈ„ƒ÷‰¾ƒŒÉ@ƒú‰'†ĈƒŽ€¥Ìyƒ/' ÄLONGREAL_LES ‹ý —Ȉ÷,Ž ÌyÓ@ ÄLONGREAL_ABS €û £È€ƒŽ€¥Ì ÕM ÄLONGREAL_EQU ‡ /¬È÷.È÷‰ŽˆÈ€­Ì ô‰÷€ˆ+_OýŽ€µÎ„/Ì|9/dMBmove {_}ÔÈ„ƒŽ€½Î7ÌÈ„ƒŽ€ÅÎ?ÌÈ„ƒŽ€ÍÎGÌÈ„ƒŽ€ÕÎOÌÈ„ƒŽ€ÝÎWÌÈ„ƒŽ€åÎ_ÌÈ„ƒŽ€íÎgÌÈ„ƒŽ€õÎoÌÀQƒ_Á.¹Ì""ý%üóýö¼Ü}M”˜+'FÎ/¾%4€`†Ž€ýÃdARRAY_ WbȘ¿оŠŽÌ€ h% ÄLONGREAL_MUL † FrÈ�ƒŽ€µÌ'H„ŽÎ ÌÈHƒüƒý~I€KÎ/¾%4`†ÈŽ€ý¿оˆŠÌ 9F ÄLONGREAL_GEQ … (´Ô˜'*Î/¾%4Œ`†Ž€ý¿‰ˆоŠŽ Ì °ô( ÄLONGREAL_DIV ‡ %ÙÈHƒüÃýü”%ƒ/ Ãÿÿý„„%ÿM¾ƒŒ'.=%DZequ ÿýÈ÷-È' ¾ˆ¼…qkDZgeq ô}È”ƒ÷-ö-'Jüˆˆ�³‡ýŠö,"!ýŒüгŒƒ ýŒÆüˆˆŒƒýŒü…ƒ@ˆüŒƒý„ˆƒÃýü‡ý„!<_üˆHƒÃý)üˆ…³)üƒ€ƒýN�}|„ˆ€ƒó)ý_Oý‰H!ö+' Ž ÌŒ…yƒ¾ƒŒ.D„ Ìÿÿýƒ ü„ˆ!Ãý!Ž€΄È̃üý€ˆ)_Oý%¾)ŒT/9W$!&Î/¾%4`†#"Ž€ý¿Œ¾Œ`ŽÌT|&Œ„ƒü%Ãýˆ€%t)v* ½Ž˜€Ž Ì ׇ& ÄLONGREAL_ADD r {"È� Ž€µÌ 'Iˆ.Ž€µŽ Ì ÈHƒüÃýöˆ+ú-È' ÷ˆH‰üÃýüˆˆó!ýŒö,""óŒý'¾�ƒ2üwƒü� #³'üw%ö,'†-{M{F˜‰Hƒ<ö.'ü'ƒ@Œüw†D0ƒ<ÝŽ¼”ˆ.]üý%¾‰@%¼ƒ&†.ˆ€ƒ<Ž'Ì É�F äLONGREAL_TRUNC ùc ÝÈ@ ƒü'Ã0˜ˆ€ƒ<ŽŽÌ'fí äLONGREAL_FLOAT öQ ñɈ ŽŽŽ–Ì í° ÄLONGREAL_SUB ‚ GþɈ ƒŽ€µŽ Ì–É@ƒü%ƒ/ÃH ÿÿý% ©ö-'@ˆo†Eƒ<¾ŒT,†-ƒ<@ˆ†+ƒ<ü!¡GdZintabs¤¶EÈ… ý¾‡Œ&@@Ìd.ªdZintdiv«½NZÄ ƒÃ0˜ƒ<¾„ÈÌd ƒ¿¾„ÄÌ  ƒÃ0„˜ƒ<¾Ì À ƒ0ˆ0˜!ƒ<†ƒ0†ƒbN ÁRPwrite_float¤*† ¤9áÁPwrite_float NÁEPwrite_float¤|Iw¥?ð@$@Y@È€  A—ׄCAÃy7à€F“¸µµnM8Oé?ùõZ‚wHù02uOÝs¿<@ow &˜PERR_6809IO6809ð Hl68XXHP6809 co P+ ¿Q& $IOR„Piocheck „FEmessageÄPreturn_addr ¤FILE_abort j¡ %Qýƒ /Ã"ýüÃ0÷9r#5··ö€'f#Ž€�ÎÌa_ŠdSTmove �_72̃ö�Æ÷ 2ü€ý_Á.@ˆAÆ÷öË \Ž0…¿¾€Æ ôr7dZwshiftª´5bÀ Æÿô¿€" ��矾"Æÿüýö Á/z Ä0�I5aRPerrorŽ”+Ž9Ë aPerror aEPerrorŽ?Š r�` I/O error  00File IO routine called by user from address xxxxHÃr &˜PRD_TEXT IO6809²Hl68XXHP6809 co P=  &$IORDPlookdPerror B9 ý¿0 Æ焾0o„¾0ˆB怄'¾0ˆH þ3È@îÄï”}u9 ¡RPget_text 1�l 19n ¡EPget_text 1�_ 2"ý¿2ƒ¾0öÁ^ DZequ ò"KÁ@ƒä„'†Ä€ ¾0ˆJ æ„÷ö¥4" ¡RPlook_texti¹Ð i9¦ ¡EPlook_texti¹Ã Oj"ý  ¿ 0Æ焾 #0o„ü ƒ 0¾ 0öÁ0Pƒä„'†1  ¾ 0ˆˆJæ„÷ ö ÓO áRPget_look_text±¾ó ±9î!�Pget_text¡Plook_text 2áPget_look_text jáEPget_look_text±‘Ÿ!get_ÛÍ&XPLOOKIO6809O 09uHl68XXHP6809 co P0  žº&<dPbound „LINESIZE äLINE_MARKER_MODäLINE_MARKER_CHAÄREAD_REC_LEN $IORäPAD_ODD_RECORDSdPerror Dread öÚ<` ý¿ 0æ„'d_Oý ¾ 0æ„'†ƒ?¾ 0ˆ>æ„'!¾€ 0ˆ�€Bæ„'± ¾ 0ˆF®„æ „Oþ 0ˆˆ@®„ý ¼ ZŽ`DZgtr û]ȃ¾ 0ˆ@®„!÷Œô~DZleq !í}nÉ@ú'† Ä€ƒo¾ 0ˆ?o„¾ 0ˆF®„æ„Oþ 0ˆ@®„ý ¼”€ &¾ 0ˆJ Æ ç„¾ 0ˆ?Æç„ ¾€  0ˆJþ 3È@¾ 1¨F®¤îÄ01«æ¤焾 0ˆH:E}8ä þ 3È@îÄ¾ 0ˆ? æ„' ¾ 0ˆ@_O턾 00ˆ?o„öÁR&8DZequ ú{ȃ¾ 0ˆ<ä„R'¾ 0ˆJÆ€ 焾 0ˆ? Æ焾 0ˆH<o„ξ 0 ˆ<o„¾ 0ˆJþ 3È<Æ æŸ ÉTýƒ,† Hƒ~¾ŒT€&@¾ 0ˆ<æ„'(öÜü{v�ÁHÁ&¾ 0ˆJÆ ç„¾ 0ˆ?Æ焾€ 0ˆ<o„ ¾ 0Æç„4¾ 0ˆJæ È„ñ€ƒ÷öÀÉÁƒô'H¾ 0ˆJ† §„¾ 0ˆ?†„§„¾Œå‹vDZneq #ïpûȾ 0ꄾ€ 0ˆ?ê„'ÿ2 ¾ 0æ„È#÷ö€Áƒ%ô''Ž¿ ¾ 0†§„ ¾ 0ˆ@þ 3 È@îÄ÷0Ã턾 0®„¿WZ¦p$Zcc ‡Î}cÍHƒô' ÷ü„ˆÃý¾ 0 ˆJ¿¾ 0ˆ€<o„¾ 0ˆ<"b¿ ¾¾þ 2æŸ ýUƒ,†ƒI¾ 0ˆ<戄È÷¾ŒL”ƒô' ¾€ 0†§„L}}Ý" üóý""ü³ý¾ €0ˆJü0‹¿Œ ö€Á¾€ 0ê„÷¾„ÈŒú¾€ 0ˆ=ê„'ÿW ¾ 0¦„ˆ#÷ö€Áƒ"R·ô'¾ 0†§„}*Q ¾ 0þ 3HîÄ÷0Ã턾 0o„#üý]*aRPlook t�Ãt9± APlookaEPlook t¬à lookÛã&˜PWR_TEXT IO6809% Hl68XXHP6809 co PH °&.„LINESIZE äLINE_MARKER_MODäLINE_MARK‚  �ER_CHAÄWRITE_REC_LEN$IORdPerror Dwrite¨ˆ. #ý¿ö€Á&WDZneq #êÂ0ƒOýö€ÁÊ_DZequ ÷DÍ€Ž¾6柳P2'†ƒ¾ 0o„¾0o„¾0ˆ@_ Oí„_Oý€xQDaRPputlnX“þX9•aEPputlnX“ñ4Y ý¿0ˆHBæ„'Ͼ0ˆF®„æ„OÃH¾0ˆ@®„"ý ¼ ±P4DZgtr û‡Èƒ¾0ˆ@®„!÷ Œô¤DZleq !í}˜È€ú ¾0ˆ@ þ3ÈD®„÷€É ¬Äƒú '@Ć ƒt¾€ 0ˆ@þ3ÈFîÄ®„3˾0ˆJæ„çľ0ˆF® „æ„O¾0ˆ‰@®„ý ¼ /H¾0ˆF®„ þ3Èþ>}} @îÄ0焾€ 0ˆ@þ3È@îÄ0Ã턾0ˆHþ3È@îÄï”HZ¾0ˆ@®„5"¼-üƒ0RöÁ&<¾0ˆJÆ_æŸ5Rƒ&¾€0ˆ@þ3ÈàS}+�@îÄ0Ãí „†ƒ¾€0o„¾0 o„_Oý€–[+�RPputtext¦5·¦9ã�EPputtext¦5ªH§"ý ¿Œ,†ƒ0¾ 0ˆ@®„óœÈ³ƒ÷¾ŒÉ¼ô'Hˆ ÷ü ƒìîH�RPlinefitì ôì9)�EPlinefitì ç;í"!ý¿¿ŒP-'Æý¾€0ˆJÆ ç„"&üƒYü³ ,Ãý ßPò; ¡RPputblanks$˜© $9a!aPputln �Pputtext Y�Plinefit §¡Pputblanks í¡EPputblanks$›e!putläê&xPUTILS IO680909GHl68XXHP6809 co PB ÂŽ&äBACK_PTR_ARRAY $IORsê"ýæŸÁ(çDZgeq å È ÷æŸÁΠDZleq !æ#ÉHƒô'÷æ ŸXIŽ0€‹®„¼9#DZequ ó 7È€÷öΫ ÁRFIB_IS_VALID?}t ?9| ÁEFIB_IS_VALID?}g @2ö€÷5µ �RIORESULTF¼×F9ƒÁFIBƒ‚_IS_VALID �IORESULT @�EIORESULTF >IB_I¨”&xINITIALIO680909}=Hl68XXHP6809 co P$ ´ò&DcloseÄFIB_IS_VALID ËK Ìÿý.4Æ ! ÷5Ìý6_O ý2Æ÷<Æ"Á-ö€XIŽ0‹_€Oí„öÁ,| åK áRPinit_pascal_iD¹b D9� áEPinit_pascal_iD¹U =ERÆÁ-/ öXIŽ0 ‹®„ƒ'H2 öý öÁ,| Ô½"= áRPshutdown_pasc|ж |9¹máPinit_pascal_ioáPshutdown_pascaEâBACK_PTR_ARRAY bPbound .ÂREAD_REC_LEN 0ÂWRITE_REC_LEN2âLINE_MARKER_MOD4âLINE_MARKER_CHA5‚LINESIZE 6ÂPreturn_addr 8"IOR:‚Piocheck ;âPAD_ODD_RECORDS<áEPshutdown_pasc|™ŽminitÒë&˜PRET_6809IO6809Hl68XXHP�¶‘�ñ PIPsavereturn 6Â& ÄPreturn_addr S� ¡Psavereturnä` ìbý9ˆ  &˜FMON_6809IO6809Hl68XXHP�¶‘�ñ PJPIO FILE error monitorÈÀ& ¡FILE_abort tç €� ÿý€² ¢FILE_ERROR ¢FILE_STATUS‚FEmessage=Ž}€ÿNo error  �-}}j  Ï}6Õ .h6 ‚ÿÿ! ÿÿ&˜INITSIMIOIO6809Á»Hl68XXHP6809 co P$ öÕ& !ŽÌ#‹ dPARAM_ FpÈÆ÷Æ€÷Æÿþ÷„ˆÌðýÆz÷ÆÁ-H€öXI Ž{0‹Æ ç„ öÁ,| åÆ Á%$" Î#öO4`†Ž€»WœpdARRAY_ WWnÀ€ƒo„öÁ $| ßüýˆˆ£üý¥üýˆˆ§üý©ü ýˆˆ«ü ý­üýˆˆ¯üý±üýˆ€³üýµ©TW áRINIT_SIMIO_LIBº- º9÷wáINIT_SIMIO_LIB âRW_WRITE_ENABLEâRS232_RECV_OPENâRS232_READ_INDEâRS232_MODE_BYTE‚DSP_LINE ¢DSP_COLUMN ÂKBD_ALL_TERMSÂKBD_CMND_CODEÂKBD_LINE_LEN ÂKBD_TERM_CODE!ÂKBD_LOST_CHAR"bCA_INFO#‚FD_ARRAY {ÂCA_PTR_ARRAY £üôwBerrno¹áEINIT_SIMIO_LIBº3 »È  &˜OPEN_AIDSIO6809¶6Hl68XXHP6809 co P& ëa&dCA_INFOÄCA_PTR_ARRAY „FD_ARRAY „SIO_WAIT B a"Æ÷"¾ö0…æ„"÷öÁ &" |¾ö0…æ„÷ åö!Á&K PöÁ:& Æ"÷|7öÁA±aDZugeq:\È€÷öÁZÐDZuleq@}gȈƒô÷öÁ ˆa÷öÁ ‰zƒôú'H€·÷öÁAÈ€÷öÁZÉ@ƒô'†·„Æ÷ö€ÈÁA÷ö€ÈÁZƒô÷ˆ öÁa÷€¯ý}<Ú 2öÁzƒô" ú÷öÁ02 ÷öÁ92"ƒôú÷ öÁ_èÇ<DZequ õc ÉHú'*¶�" ,L·Ž0†¶§„|"¾ö0…æ„!÷ÿvJö"Á0÷ö%Á9ƒô'0"†·¶÷Æ Šc„Zbytemul 4Ø+kȃ¶€0·ûˆˆ÷|¾ö€0…æ„÷ ¶9è!+ Ž!ŽÌ %" dPARAM_ F^•ÂoŸoŸ€€…„Æ÷Æç"Ÿ¾o„ÆÁ-Æ÷"¾ö0…Æ ç„öÁ, "| èƒö"Á&nŽ΀&K^DSTequ :~êÔ!ƒ'oŸE"5Ž΀/ƒ' „ÆçŸ/ŽˆÔ΀7ƒ' ÆçŸŽ#P΀?ƒ' ÆD矪ˆƒöÁ&ÆçŸ•öÁ&ŒÆ矈�ö÷Á-@)Ìó~7l"Æ÷¾ö 0…Îö3Å"æÄç„|ö ñ,| Ü öW`À7$Zcc ‡Ë}šÁHÈ'|¾ˆöTXXXXˆX焃öÁˆ&ƒöÁˆ"¾þæÄËç„öÁ„&ƒyö�HÁ&pöÁ/Æ÷öˆ÷Á-)ƈ÷¾ö0…Yr}~"Îö3ÅæÄ"ç„|öñ,| ܾ"þö\TXXXëÄ焃ö�DÁ#“ö�HÁ'ƒö�HÁ&"öç" ŸƒöÁQ #höÁR 'ƒöÁ@&kH~}‘H�DŽ΀Eƒ'@! ÆçŸ—"5Ž΀Kƒ' „ÆçŸ�ŽˆÔ΀Tƒ' ÆçŸkŽ#P΀\ƒ' ÆHçŸUŽÎ�@€eƒ' Æç!"Ÿ?Ž΀n5ƒ' Æç�}|!"Ÿ)Ž΀t5ƒ' Æ çŸ„ˆŽ΀yÔƒ'Æ çŸæŸÁ'H�‡Ž΀~ƒ'@! ÆçŸq"5Ž΀…ƒ' „Æ çŸ[ŽˆÔ΀�ƒ' Æ çŸEޱI|V�ˆÔ΀–ƒ' Æ çŸ/Ž#P΀Ÿƒ' ÆH矎Î�@€¨ƒ' Æç!Ÿƒ PöÁ&ÆçŸV ¡RPARSE_NAMEæ)³ æ9# ¡EPARSE_NAMEæ)¦ Jç"Æÿÿ÷ !" ö!XIŽ0‹æ„Á &öˆ!÷ Æ÷"H€|!ö!ÁÈú"'Ï÷#ö€ smJ�RFIND_FD )¾p)9f�EFIND_FD )¾c%* Æ ÷$&Æ# ÷%Îö%O4`†! …†Ž€°>5%dARRAY_ W HÀƒæ„È÷'ö€0%OXIŽ€0‹®„ŒW DZneq #ï*bÉ@ô''†·ˆ„&¶%·$ö€ˆ%Ë÷%ö%Á þ<*DZugtr .D‡Èƒú&'©÷'ö€$[> áRFIND_A_DISC_CA” í ”9Ñ áEFIND_A_DISC_CA” à K•"ý*¿,ÆÁR -$)ö)\¾€ˆ*0…þ,ö)3ÅæÄç„ö)Á€,|) ß¾€*ÆŠç„ü*ȃ÷(x&K ÁRSIOF_CHANGE פ¥ ×9 ÁESIOF_CHANGE פ˜ VØ"2ý2¿4ü€ý.ü40‹¿0"¾.ü20‹ö0ç„ü2þ.0‹ö1ç„ü2þ.0‹o„! ü2þ.0‹o„®¹V ÁRSET_RS_ADDR %· %9b-¡PARSE_NAME ŽaFIND_FDçáFIND_A_DISC_CA *¡SIOF_CHANGE•¡SET_RS_ADDRØÁESET_RS_ADDR %"ø-}&keyboarddisplayprinterrs232relocabsolutelistingemul_comlink_comtracepromdatasourceasmb_dbasm,^}.‘b_symlink_symcomp_symcomp_dbp. &xUCLOSE IO6809O £ Hl68XXHP6809 co P' ÈÆ&,dCA_INFOÄCA_PTR_ARRAY „FD_ARRAY DerrnoäRS232_RECV_OPEN„SIO_WAIT DwriteŒí, ýÆÿÿý_ €Oý€³GkDZgtr ùÈ„ƒ÷ ¾ŒКDZgeq ëdÉDú ' Ž¿Ä€€hüXIŽÀ0‹æ„÷ÁL & Ìý€HJöOXIŽ€ 0‹®„¿Æ ÷ÆÁ-:"öXIŽÀ0‹æ„ñ fdDZequ ø€Ȇƒ÷ ö³ãsDZneq #í5ŽÉHô 'ö€Á,| LÉö'ÏÎö€O4`† Ž€�+B5dARRAY_ W|¾Àƒ0æ„'Ž@_Æ2ü÷! ö`öÁR&,¾ƈç„# üƒý€öÔÈ'¾ÆŒ‹ç„üƒ2ý€‡†¾Æ�ç„# üƒý€H;¾Æ‚ç„ü€6|q4Œ1ƒý€'$Á%ùÁ "õŽ€SOXIn*ª›€ã€ã€ã€ã€,€,€,¨È€,€,€,ÎöO4`†Ž€�0 ƒo„üXI0Ž0‹Æ ç„1P¾€Œ&_O"ýüpúqaRclose œšïœ9Ù AcloseaEclose œ¼ �ª  &xUCREAT IO6809O ×# Hl68XXHP6809 co P) Ï &KdCA_INFOÄCA_PTR_ARRAY „FD_ARRAY DerrnoäRS232_MODE_BYTE¤PARSE_NAME ¤SET_RS_ADDRdFIND_FDäFIND_A_DISC_CA „SIO_WAIT ¤SIOF_CHANGE ÀªK}"ý¿Æÿÿý€É_Oý€ÎŽˆ€ŽÌ4vΘ ¾4`ƒö”È'”ƒ÷ÁL, Ìý€H|öXIŽ!0‹¿ö-Ìý€>ö!Á& PöÁ&Æ‘¦}A~@÷Æ÷ˆöOXIŽ€!0‹®„¿ŒQ1& Ìý€2ÎöO4€`†Ž€Ñ>ÉAdARRAY_ W*»Èƒ¿ æ„È'H¾†€§„üŒ2ƒý€öÁÇÓ*DZequ û}ßÈÄ÷"¾€ŒÉHô"' ¾0†@§„¾0 ¶§„¾0€o„¾†‚§Œ„÷"üƒ5Rý€ƒ&]¾0Æ7焾#ƃç„üƒ Tý€ƒ&;Æ(ÆÀDT}|W Ž‹Æ Æ(ÆÀÆ(Æ €¾ƇçÄüƒý€ ¾ 0Ì(í„ ¾ 0Ì턾€Œ& ˆÆçŸ ¾ 0€o„¾ 0_€O턾 0Ì@@í„Ø¦î||ÌÈ÷Á & ÌLLý€£Îö€O4`†#"Ž€Ñƒ¿ öÀOXIŽ€0‹®ˆ„¿ŽüÃUý€ƒ&h ¾0öç„ ¾0öç„ ¾ƃç„ü0Àƒý€¾�@|}A€Æ€ç„üÃUƒý€ƒ&*ˆÆçŸ ¾ 0€o„¾ 0_€O턾 0Ì@€턾 0Ì@Dí„Á%ùÁ"õŽ€ €™OXI" "