Category : Pascal Source Code
Archive   : DOORDR30.ZIP
Filename : ANSIMENU.TPU
ARROWCOLOR¦ ¶ à £R BRACKETCOLOR§ ¶ à R
NUMOPTIONS¨ 0¶ à ÓROPTIONS© |pÎ æ à æ à à TÎ ( dÎ DÎ RDESCÑ ¹Î æ à P æ à Q à Î TÎ Î R
MIDSCREENY ¶ à R
MIDSCREENX ¶ à SGETANSIMENU 0
à Î ~ ÿ Â Ö ÷ è ÜÅ ó S CENTERSTRING È
à à ñ à RS ÿ à ÒRXPOSÿþ¶ à RAüþÆ à SCURSOR_FORWARD &
"IX RMENUÚøóÎ :R
MENULENGTHÙøó¶ à KRMENUTOPØøó¶ à R
MENUBOTTOM×øó¶ à R OPTIONTOPÖøó¶ à R OPTIONBOTTOMÕøó¶ à £ROPTIONXÒøóÖ à ¼RCURPOSÑøó¶ à ÐR CUROPTIONÐøó¶ à ROLDPOSÏøó¶ à ùR OLDOPTIONÎøó¶ à vRAÍøó¶ à bR OPTIONSELECTÌøóà 0RCHËøóà ãRDONEÊøóþ à ÿÿÿÿ © @ 0 0 Ð ANSIMENU SYSTEM DOORDRIV CRT uS ANSIMENU.PAS #Qÿ #
ó 4 a #
8 V$
G
V
S Uå¸ ìÄ~W¾ ÿW¸ÿ P ÿ0ä¹ ÷ùÐ 0ä+Âÿþÿþ0äúþ¸ ;úþ>üþëÿüþ¾úýW¿ W ¾ ÿW ¾ ÿW¸ÿ P üþ;úþuȾ ÿWÄ~W¸ÿ P ì] [CUå1À ¿ W 0ä@P P ì]Ã[] <>] Uå¸8 ì8Ä~W¾ÚøW¸%P ÆÊø ù0ä ÙøÙø0ä¹ ÷ùÐ 0ä+ÂØøÙø0ä¹ ÷ùÐ 0äÂ×øù0ä¹ ÷ùÐ 0ä+ÂÖøù0ä¹ ÷ùÐ 0äÂÕøù0ä1Ò ¹ 1ö1ÿ RSPù0ä¹ ÷ù Y^_ uÕø0äHÕø×ø0äH×ø1ÀÒøùÉø°:ÉøwFÍøëþÍøÍø0äºQ ÷âøZù0äÐÍø0äøÑçù0ä ÒøÒøÍø:ÉøuÀù0äÈÒø1Ò÷ñ1Ò¹ ÷ñÐ 0ä+ÂÒø> ué|ù0äP ¸ PØø0äP ¾Ê÷W¾ÚøWè ùÉø°:Éøvé£ ÍøëþÍøÿ¶ÒøÍø0äÐÖø0äÂHP ù0äP ¿ W ~ù0äP Íø0äøÑç»ùW ù0äP ¿ W ù0äP Íø0äºQ ÷âø»ZùW Íø:Éøtécÿ|ù0äP ¸ P×ø0äP ¾Ê÷W¾+ùWè ÖøÑøÆÐøÑøÏøÐøÎøÿ¶ÒøÑø0äP ù0äP ¿ W ~ù0äP Ðø0äøÑç»ùW ù0äP ¿ W ¾ËøW ¾Ëø8t¾Ëøu! :ÖøvÑø0äHÑøÐø0äHÐø¾Ëø2t¾Ëøu! :ÕøsÑø0ä@ÑøÐø0ä@ÐøùÉø°:ÉøwcÍøëþÍø¾È÷WËøP P Íø0äøÑç»ùW u"ÍøÐøÍø0äÐÖø0äÂHÑøÆËø
Íø:Éøu£ÿ¶ÒøÏø0äP ù0äP ¿ W è ¿ W ÿ¶ÒøÑø0äP ù0äP ¿ W è ¿ W ÑøÏøÐøÎø¾Ëø
uÐø0äøÑçùÌøÆÊø¾Êø uéþÌøFÿÿ6 éh :Øøs ¿ W ëé¾Ê÷W¾ÚøWè ¿ W ùÉø°:Éøvé ÍøëþÍø 0ä;Òøs ¿ W ëç¾È÷W¿ W Íø0äøÑç»ùW ¿ W ¿ W Íø0äºQ ÷âø»ZùW Íø:Éøu¿ W ¾Ê÷W¾+ùWè ÆÌø ¾ËøW ËøP ËøùÉø°:ÉøwCÍøëþÍø¾È÷WËøP Íø0äøÑç»ùW uËøÌøÍø:ÉøuþÌø tÌøFÿFÿì]Ê ( 0Ð 00 ! Ð 4 P b 0, g 0<