Category : Pascal Source Code
Archive   : DOORDR30.ZIP
Filename : DDANSI.TPU

 
Output of file : DDANSI.TPU contained in archive : DOORDR30.ZIP

TPU6Â@ý]m}•§Å #؈ $Ð~¨l~ÔæKõÂ:YDDANSIaÅÔõYSYSTEMaéæYDOSñõÔYCRTʞæRESCAPEþÞRBLINKþÞRHIGHþÞRNORMþÞRANYþÞRANY2þÞRFFLAGþÞ)RGFLAGþÞ[R ANSI_STRING†ÞS
ANSI_WRITEä
Þ~¯–¨8Íß5l~ÔñRKõ€Pii«æRSCALEtÌ æÞÆÞdÌRSCALEH£Ì æÞÆޓÌRBBBþÞRTÞRRESTXÆÞRRESTYÆÞRCURCOLORÆÞR NOTE_OCTAVEÆÞR
NOTE_FRACTION
¢ÞR NOTE_LENGTH¢ÞÂR NOTE_QUARTER¢ÞS
PIBPLAYSETŒ
SPIBPLAY »
†Þ2$RSÿ–†ÞR NOTE_OFFSETûÌAGÞÆÞëÌR
NOTE_FREQS.Ì TæÞªÆÞÌÓP QUARTER_NOTEžÞ€ý?ÅR PLAY_FREQþþ–ÆÞXR
PLAY_DURATIONüþ–ÆÞnR
REST_DURATIONúþ–ÆÞRIøþ–ÆވRC÷þ–Þ°RFREQÌûÌ æÞ  æÞÆÞß̨ïÌÏÌ:RNôþ–ÆÞ¢RXNîþ–¢Þ¾RKìþ–ÆÞSGETINT–Q
ÆÞ[RNüÿ2ÆÞ:S CHANGE_COLOR“
ÆޝRCiÆÞSC_CHECKÐ
þÞ†Þ'èRSþþ«†ÞÚRTTüþ«ÆÞRTTTúþ«ÆÞRTTTTøþ«ÆÞ÷RCPöþ«ÆÞRBõþ«þÞ¿S EVAL_STRING^
†ÞÁ±Ò…RSÿ5†ÞRCPþþ5ÆÞRTýþ5ÞhRJJúþ5ÆޓRTTøþ5ÆÞvRTTTöþ5ÆÞRTTTTôþ5ÆÞ¢RFLAG1óþ5þÞîRCH¨Þ8j0 B  (JX«ÿ¸/2Æ0;Ý(Upá͈
 ¸DDANSISYSTEMCRT"|ƒ
DDANSI.PASi>
2 ´& –BÆß#*4&2 ### 46C% $     4&2G   . 5 
B   i§
      «Æ## #
 5Ý‚#

 # #
 
$!( # #
 !# #
 !# #
 !# #
 ! # #
# #
¨ a":
V j„U‰å1ÀšÇÇ€ÇÇ`ÇÇÇljÇÇz‰ì]ÃÿU‰å¸šƒì1À‰Fü‹~6‹…øþ‹~ø6Š…ÿP¿Wšt9‹~6‹…øþ‹~ø6Š…ÿ0ä‹Ø‹Fü¹
÷éÃ-0‰Fü‹~6‹…øþ@‹~6‰…øþ먋~6‹…øþH‹~6‰…øþ‹Fü‰Fþ‹Fþ‰ì] (ÿU‰å¸šìÄ~W¾ÿW¸ÿPš¾ìýW¾ÿWš¿Wš¾ÿW¸ÿPšÇ†øþŠ†ÿ0ä;†øþéP‹¾øþŠƒÿPšˆ†÷þŠ†÷þš‰†îþ‰žðþ‰–òþ‹†îþ‹žðþ‹–òþ‹‹6‹>šš‰†üþ¸1Û1ҋ‹6‹>š‹Žîþ‹¶ðþ‹¾òþšš‰†úþ‹†øþ@‹øŠƒÿP¿Wštz‹†øþ@‰†øþ‹¾øþŠƒÿ<#u‹†ôþ@Ñà‹È¡º÷â‹øù‹…‰†þþëF<+u‹†ôþ@Ñà‹È¡º÷â‹øù‹…‰†þþë#<-u‹†ôþHÑà‹È¡º÷â‹øù‹…‰†þþ닆øþ@‹øŠƒÿP¿Wšu龋†øþ@‰†øþU艆ôþ‹†ôþ™šRSP¸1Û1ÒY^_š¹1ö1ÿš‰†îþ‰žðþ‰–òþ¡‹‹‹‹6‹>š‹Žîþ‹¶ðþ‹¾òþšš‰†üþ¸1Û1ҋ‹6‹>š‹Žîþ‹¶ðþ‹¾òþš‹‹6‹>šš‰†úþ‹†øþ@‹ø€»ÿ.utdžîþÇ†ðþdžòþ‹†øþ@‹ø€»ÿ.u0‹†îþ‹žðþ‹–òþ¹1ö¿@š‰†îþ‰žðþ‰–òþ‹†øþ@‰†øþ닆üþ™š‹Žîþ‹¶ðþ‹¾òþšš‰†üþÿ¶þþšÿ¶üþššÿ¶úþšéV~¡H£é‘<>uƒ>}¡@£é|‹†øþ@‰†øþU艆ôþƒ¾ôþ馃¾ôþT~霋¾ôþÑ狅‰†þþ¡‹‹¹1ö1ÿš‹‹6‹>š‰†îþ‰žðþ‰–òþ‹†îþ‹žðþ‹–òþ‹‹6‹>šš‰†üþ¸1Û1ҋ‹6‹>š‹Žîþ‹¶ðþ‹¾òþšš‰†úþëZƒ¾ôþuS1À‰†þþ1À‰†üþ¡‹‹¹1ö1ÿšRSP¡‹‹‹‹6‹>šY^_šš‰†úþÿ¶þþšÿ¶üþššÿ¶úþšé7 ƒ¾ôþ@~džôþ@1À‰†þþ1À‰†üþ‹†ôþ™šRSP¸1Û1ÒY^_š¹1ö1ÿš‹‹6‹>šš‰†úþÿ¶þþšÿ¶üþššÿ¶úþšë‹†øþ@‰†øþé¡ùš‰ì]ÂU‰å1Àš‹F=uÆÆÆÆë,=uÆë =u šÆë=u
Æƃ~顃~&|é˜ÆÆ‹F-‰F‹F£€>u€>u‹~Ñ狅€Pš€>u€>u‹~Ñ犅Pš€>u€>u‹~Ñ狅€Pš€>u€>u‹~Ñ犅PšÆƒ~'~(ƒ~0}"Æ‹F-(‰F‹~Ñ犅PšÆ‰ì]ÂU‰å¸ šì Ä~W¾þþW¸ÿPšÇ†öþƆõþdžüþÿÿ¾ôýW‹¾öþŠƒþþPš¾øþWš‰†üþƒ¾øþuX‹†öþ@‰†öþ¾ôýW‹¾öþŠƒþþPš¾øþWš‰†úþƒ¾øþu‹†üþ¹
÷鉆üþ‹†üþ†úþ‰†üþƒ¾üþ~ƆõþŠ†õþˆFÿŠFÿ‰ì]ÂU‰å¸šìÄ~W¾ÿW¸ÿPšŠ†ÿ0ä‹øŠƒÿˆ†ýþdžþþŠ†ýþ ÷鉆øþ‹†øþ†öþ‰†øþÿ¶øþ苆þþ@‰†þþŠ†ÿ0ä;†þþ~éeÿ€>t齀>u€>u°Pš°PšÇ€>u€>u°PšÇ€>u€>u‹>Ñ犅Pš€>u€>u‹>Ñ狅€Pš€>u!€>u€>u‹>Ñ狅€Pš€>u€>u°Pš€>u‹>Ñ犅Pš€>u€>u‹>Ñ犅PšÆÆÆÆÆé­<u5¾ÿW¸P¸Pš¾ÿWŠ†ÿ0äP¸Pš¾ÿWèét ÷鉆øþ‹†øþ†öþ‰†øþëdžøþš0䉆öþ‹†øþ†öþ=P‹†øþ†öþPšPšéº ÷鉆øþ‹†øþ†öþ‰†øþëdžøþš0䉆öþ‹†öþ+†øþ=|‹†öþ+†øþPšPšé ÷鉆øþ‹†øþ†öþ‰†øþëdžøþš0䉆öþ‹†öþ+†øþ=|šP‹†öþ+†øþPšéF ÷鉆øþ‹†øþ†öþ‰†øþëdžøþš0䉆öþ‹†öþ†øþ=šP‹†öþ†øþPšéŒ ÷鉆øþ‹†øþ†öþ‰†øþƆóþëdžøþ‹†øþ‰†úþ€¾óþu ‹†þþ@‰†þþ€¾óþu ‹†þþ‰†þþŠ†ÿ0ä;†þþé†Ç†øþ¾òýW‹¾þþŠƒÿPš¾ôþWš‰†øþƒ¾ôþuN‹†þþ@‰†þþ¾òýW‹¾þþŠƒÿPš¾ôþWš‰†öþƒ¾ôþu‹†øþ¹
÷鉆øþ‹†øþ†öþ‰†øþëdžøþëdžøþŠ†øþPŠ†úþPšë¿W¾ÿW1ÀPššš‰ì]Â@@ (U‰å¸šì€~ ušéJ€~ uW¿W° P1ÀPšššš0䙹÷ù™šRSPš0ä1Қ¹„1ö1ÿšY^_šu¬éí€~[t€>uÆÆÆÆëÆ€~u
ÆÆ€>t4¾þW¿Wš¾ÿWŠFPšš¿W¸ÿPšë¿WŠFP1ÀPššš€~Cu%¿WèÀt€>tÆ¿WèÆ€~
uÆŠFP¿Wšt€>tÆ¿WèƉì]Ê$ ANSI-BBS driver routines installed. (C) 1988 by Scott Baker.&(C) 1989 Revised by Derrick Parkhurst.U‰å¿W¿W1ÀPššš¿W¿W1ÀPššš¿W¿W1ÀPšššÆè‰ì]Ë

 AEINRW\bhnt{ƒ‹“œ¥¯¹ÄÐÜé÷&8J^rˆ ¸Òî ,Lp”¼ä@p¤ÜX˜à(xÈ €àH¸0°0 À P
ð
 @
À
p```€ à €€ à 0А 
 $*06<B 0Ð'PG 0`L 0ÐI 00a 0,rPw 0<| 00‹ 0h®Ð~ÿԐãÐð÷ûÿ 0Ä  0À
8 <@ 0ÀC 0ÐH
Y ]a 0¼d 0Àu 0ÐzP 0`”¹ÐƐÜÐéÿÐ P"! 0`&: 0ÌF 0ÄX 0Äd
u y}…‰ 0ÀŒ 0À 0Т
³ ·» 0¼¾ 0ÀÏÕÙÝ 0Àà 0Ðå 0À0 0ÌQ 0Àb 0Ðg0Lt0H}0P‚0H‹
Á ǐ͐
ِ ߐå
ñ ÷ý=HNR]cg~Р§«¯ 0Ő¿ÃÇ 0Àʐ
è ìð 0Àó 0Ðø

 0¼ 0À% 0Ð*HLP 0ÄZ
b fjnrv 0Ày 0À 0І0L“0Hœ0P¡0HªÀ 0ÌÓ 0Äåêîò 0Ì 0Ä% 0À27;?V 0ÌŠ 0Äœ 0Ĩ®²¶ 0À¹ 0о0LË0HÔ0PÙ0Hâ0Põ 0А#/0$:@LQhm}ˆÐ”04›¡¨Ð´04¸¾ÅÐÑ04ؐސåÐñ04õû Ð08#) 0Ð 00 0HD 0ˆO 0Hw 0ˆ‚ 0Ð 00BF0J0V]0 `g 0H 0ˆ˜ 0HÀ 0ˆËø%04.086<BI04RX^elÐr04v|ƒŠА04—¤«²Ð¸04¿ÅÌ08ՐېâÐè04ìòùÐ04
$ 0T= 0TS ^ 0H€ 0ˆ‹ 0H³ 0ˆ¾0ï0 0 0H: 0ˆE 0Hm 0ˆx0©0 Ê0Ð 0Hô 0ˆÿ 0H' 0ˆ20 c0{0Š 0H® 0ˆ¹ 0Há 0ˆì0 050D 0Hq 0ˆ| 0H¤ 0ˆ¯ 0H3 0ˆ> 0Hf 0ˆq0´ » 0ØÉ 0èÎ 0ÈÓ 0Ð'0$6 D 0äO 0ìT 0ÈY0^ 0Ìl0t 0Ì} 0ĉ 0È‘¢©®³¸¿ÊϐԐà 0,å 0Hô 0<ùþ 00  0ä 0ì 0È$/4<CGLP[P0c 0`hpw{€„ nP8s 0Ø{ 0è€ 0ȅ ŠP8% 0ؗ 0èœ 0È¡ ¦P8C« 0س 0è¸ 0ȽÃÇ