home *** CD-ROM | disk | FTP | other *** search
/ ftp.texkom.ru / ftp.texkom.ru.tar / ftp.texkom.ru / Zay100.zip / Zay100 / Progs / zapu.prg < prev   
Text File  |  2001-04-21  |  2KB  |  121 lines
  1. PUBLIC cPach
  2. cPach = SYS (5) + SYS (2003)
  3. ON SHUTDOWN CLEAR EVENTS
  4. WITH _SCREEN
  5.     .CAPTION = "╟α ΓΩα"
  6.     .AUTOCENTER = .T.
  7.     .WINDOWSTATE = 2
  8.     .ICON = "&cPach" + "\Net13.ico"
  9. ENDWITH
  10.  
  11.  
  12. SET TALK OFF
  13. SET NOTIFY ON
  14. SET CLOCK STATUS
  15. SET COMPATIBLE OFF
  16. SET PALETTE ON
  17. SET BELL ON
  18. SET BELL TO '', 1
  19. SET SAFETY OFF
  20. SET ESCAPE ON
  21. SET LOGERRORS ON
  22. SET KEYCOMP TO WINDOWS
  23. SET CARRY OFF
  24. SET CONFIRM OFF
  25. SET BROWSEIMECONTROL OFF
  26. SET STRICTDATE TO 1
  27. SET EXACT OFF
  28. SET NEAR ON
  29. SET ANSI ON
  30. SET LOCK OFF
  31. SET EXCLUSIVE ON
  32. SET MULTILOCKS ON
  33. SET HEADINGS ON
  34. SET DELETED ON
  35. SET OPTIMIZE ON
  36. SET UNIQUE OFF
  37. SET CPDIALOG ON
  38. SET REFRESH TO 0,5
  39. SET ODOMETER TO 100
  40. SET BLOCKSIZE TO 64
  41. SET REPROCESS TO 0
  42. SET COLLATE TO "RUSSIAN"
  43. SET RESOURCE OFF
  44. SET SYSFORMATS OFF
  45. SET SECONDS ON
  46. SET CENTURY ON
  47. SET CURRENCY RIGHT
  48. SET CURRENCY TO "≡"
  49. SET HOURS TO 12
  50. SET DATE TO GERMAN
  51. SET DECIMALS TO 2
  52. SET FDOW TO 1
  53. SET FWEEK TO 1
  54. SET MARK TO "."
  55. SET SEPARATOR TO ","
  56. SET POINT TO "."
  57. SET TRBETWEEN OFF
  58.  
  59.  
  60. SET MARGIN  TO 0
  61. SET DECIMALS TO 2
  62. SET MEMOWIDTH TO 50
  63. SET TYPEAHEAD TO 20
  64. SET BLOCKSIZE TO 64
  65. SET REPROCESS  TO 0
  66. SET REFRESH TO 0,5 SECONDS
  67. SET SAFETY ON
  68.  
  69.  
  70. SET COLLATE TO "RUSSIAN"
  71. SET DATE GERMAN
  72. SET ALTERNATE OFF
  73. SET ANSI ON
  74. SET ASSERTS OFF
  75. SET BELL ON
  76. SET BLINK ON
  77. SET BRSTATUS OFF
  78. SET CARRY OFF
  79. SET CENTURY ON
  80. SET CLEAR ON
  81. SET COLOR ON
  82. SET COMPATIBLE OFF
  83. SET CONFIRM OFF
  84. SET CONSOLE ON
  85. SET CURSOR ON
  86. SET DELETED ON
  87. SET ECHO OFF
  88. SET ESCAPE ON
  89. SET EXACT OFF
  90. SET EXCLUSIVE ON
  91. SET FIELDS OFF
  92. SET FIXED OFF
  93. SET FULLPATH ON
  94. SET HEADING ON
  95. SET HELP ON
  96. SET INTENSITY ON
  97. SET LOCK  OFF
  98. SET LOGERRORS ON
  99. SET MOUSE ON
  100. SET MULTILOCKS ON
  101. SET NEAR ON
  102. SET NULL OFF
  103. SET OPTIMIZE  ON
  104. SET PRINT OFF
  105. SET READBORDER OFF
  106. SET SAFETY OFF
  107. SET SPACE ON
  108. SET STATUS BAR ON
  109. SET SYSMENUS ON
  110. SET TALK OFF
  111. SET TEXTMERGE OFF
  112. SET TITLE OFF
  113. SET UNIQUE OFF
  114.  
  115.  
  116.  
  117. DO  "&cPach" + "\Menus\Menu.MPR"
  118. READ EVENTS
  119. ON SHUTDOWN QUIT
  120. CLEAR EVENTS
  121.