Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 4: Программирование на Visual Basic искусственного интеллекта. Валерий Алексеевич Жарков

Читать онлайн книгу.

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 4: Программирование на Visual Basic искусственного интеллекта - Валерий Алексеевич Жарков


Скачать книгу
и устанавливаем параметры DirectX:

      Public Function InitializeDirectX() As Boolean

      Try

      'renderWindow связываем с this формой (или эл-м):

      renderWindow = Me

      'Создаём и инициализируем переменные для звука:

      'Устройство DeviceOfSound класса Device из DirectSound:

      DeviceOfSound = _

      New Microsoft.DirectX.DirectSound.Device()

      'Уровень доступа к устройству – многозадачный Normal:

      DeviceOfSound.SetCooperativeLevel(renderWindow, _

      CooperativeLevel.Normal)

      'Инициализация DirectX прошла успешно:

      Return True

      Catch

      'Перехвачена ошибка инициализации DirectX:

      Return False

      End Try

      End Function 'Конец метода InitializeDirectX.

      Напомним, что именно этот универсальный код можно будет копировать и записывать в наши последующие приложения и игры (после нашего напоминания).

      Теперь в панели Properties (для формы Form1)) на вкладке Events дважды щёлкаем по имени события Load (Загрузка).

      Появляется файл Form1.vb с шаблоном метода Form1_Load, который после записи нашего кода принимает следующий вид.

      Конец ознакомительного фрагмента.

      Текст предоставлен ООО «ЛитРес».

      Прочитайте эту книгу целиком, купив полную легальную версию на ЛитРес.

      Безопасно оплатить книгу можно банковской картой Visa, MasterCard, Maestro, со счета мобильного телефона, с платежного терминала, в салоне МТС или Связной, через PayPal, WebMoney, Яндекс.Деньги, QIWI Кошелек, бонусными картами или другим удобным Вам способом.

/9j/4AAQSkZJRgABAQEAZABkAAD/4gHbSUNDX1BST0ZJTEUAAQEAAAHLAAAAAAJAAABtbnRyUkdCIFhZWiAAAAAAAAAAAAAAAABhY3NwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAA9tYAAQAAAADTLVF0BQ8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAlyWFlaAAAA8AAAABRnWFlaAAABBAAAABRiWFlaAAABGAAAABR3dHB0AAABLAAAABRjcHJ0AAABQAAAAAxyVFJDAAABTAAAACBnVFJDAAABTAAAACBiVFJDAAABTAAAACBkZXNjAAABbAAAAF9YWVogAAAAAAAAb58AADj0AAADkVhZWiAAAAAAAABilgAAt4cAABjcWFlaIAAAAAAAACShAAAPhQAAttNYWVogAAAAAAAA808AAQAAAAEWwnRleHQAAAAATi9BAHBhcmEAAAAAAAMAAAACZmYAAPKnAAANWQAAE9AAAApbZGVzYwAAAAAAAAAFc1JHQgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCALtA/sDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAgMHBAEI/8QAYBAAAQMDAQMFCgkKBQEFBAYLAQACAwQFERIGEyEUFTFB0RYiMlFTYZKTlNIHVFVlcYGhsfAjMzZCUnJzkcHhFyQ1dLKzNDdWddMlQ2KDRUd2hIa0wsTiREZIGCZkgqL/xAAaAQEBAQEBAQEAAAAAAAAAAAAAAQIDBAUG/8QAMhEBAAIBAwMDAgQFBQEBAAAAAAERAgMSUhQVIQQxUUFhInGRoQUTgdHhMjOxwfAjYv/aAAwDAQACEQMRAD8As+2W2Vy2du8VHRw0r4307ZCZYyTkkjqI8SgP8UL58Wt/qXe8vTt9R84bc22i3m75TDDFrxnTqe4Zx19KrG0VgqdnLs6gqHNkGnXFI3oewkgHHUeBGPN1jif1HovTekz0sIzxjdMW+L6jV18c8pxnxEp7/FC+fFrf6l3vJ/ihfPi1v9S73lEbV7OdzFzjouV8q3kIl17vRjLnDGMn9n7VCL16fo/R6mMZ44RUuGXqPUYZbcsvK5/4n3z4tb/Uu95P8T758Wt/qXe8qai32/0vCGeq1uS5f4n3z4tb/Uu95P8AE++fFrf6l3vKnInb/S8IXqtbkuX+J18+LUHqXe8n+J17+LUHqne8vZN8GtDTVUdLPtTTxVEuNET4Wte/JwMAyZOTwVRvVmq7Dc30FYGmRrQ4PZnS8EdIJAyOkfSCvNo6X8P1prDGL/KY/wCXXUz9VpxeU/8ACxf4nXv4tQeqd7yf4nXv4tQeqd7yp6L09v8AS8Icuq1uS4f4m3v4tQeqd7y+/wCJt7+LUHqne8qlTMilqYo55txE54D5dJdoaTxdgdOBxwpLaWgtltu7qe01/LacMadeQ7S49LdQ4O6jkePHSCsT6L0kZxhs8z+bXUa+3duTf+Jt7+LUHqne8n+Jt7+LUHqne8qei32/0vCGeq1uS4f4mXv4tQeqd7y+/wCJl7+LUHqne8qepWbZ+en2Ygvsk0e6qZt1HG3Jd+vknxcWefOepYy9F6PGt2EefCx6jXy9sp8Jv/Ey9/FqD1TveT/Ey9/FqD1TveVQRa7f6XhDPVa3Jb/8TL38WoPVO95ff8S738WoPVO95U9fU7f6XhB1WtyW/wDxLvXxag9U73k/xLvXxag9U73lUETt/peEHVa3Jb/8S718WoPVO95ff8Sr18WoPVO95VBE7f6XhC9Vrclv/wASr18WoPVO95P8Sr18WoPVO95VEInb/S8IOq1uS3f4lXr4tQeqd7y+/wCJN6+LUHqne8qgvqnb/S8IOq1uS3f4k3r4tQ+qd7yf4k3r4tQ+qd7yqK+p0HpeEHVa3Jbv8Sb18WofVO95P8Sb18XofVO95VFE6D0vCDqtbkt3+JF5+L0Pqne8n+JF5+L0Pqne8qkidB6XhB1WtyW7/Ei8/F6H1TveT/Ei8/F6H1TveVSRToPS8IOq1uS2/wCI95+L0Pqne8n+I95+L0Pqne8qmidB6XhB1WtyW3/Ee8/F6H1TveT/ABHvPxeh9U73lUl9ToPS8IOq1uS2f4j3n4vQ+qd7yf4jXn4vQ+qd7yqaJ0HpuEHVa3JbP8Rrz8XofVO95ff8Rrz8XofVO95VJfU6D03CDqtbktn+I15+L0Pqne8n+It4+L0Pqne8qmvqdB6bhB1WtyWv/EW8fF6H1TveX3/EW8fF6H1TveVTX1Og9Nwg6rW5LX/iLePi9D6p3vJ/iJePi9D6p3vKqL6p0HpuEHVa3Jav8RLx8XofVO95ff8AES8fF6L1TveVUCJ0HpuEHVa3Ja/8Q7x8XovVO95P8Q7x8XovVO95VVE6D03CDqtbktX+Id4+L0Xqj7y+/wCId4+L0Xqj7yqqJ0HpuEHVa3Jav8Qrv8XovVH3k/xCu/xei9UfeVWRToPTcIOq1uS0/wCIV3+L0Xqj7y+/4hXf4vReqPvKqr6nQem4QdVrclp/xCu/xei9UfeT/EK7/F6L1R95VZE6D03CDqtbktP+IN3+L0Xqj7yf4g3f4vReqPvKrL6E6D03CDqtbktP+IN3+L0Xqj7yf4g3fyFF6o+8qsvqdB6bhB1WtyWj/EC7+QovVH3k/wAQLv5Ci9UfeVXX1ToPTcIOq1uS0f4gXfyFF6o+8nd/dvIUXqj7yq6J0PpuEHVa3JaO7+7eQovVH3l97v7t5Ci9Ue1VdE6H03CDqtbktHd/dvIUXqj2p3fXbyFH6o9qq6+p0PpuEHVa3JZ+767eQo/VHtX3u+u3kKP1R7VV19TofTcIOq1uSz93128hR+qPand9dvIUfqj2qsL6p0PpuEHVa3JZu767eQo/VHtTu9u3kKP1R7VWUTofTcIOq1uSz93t28hR+qPand7dvIUfqj2qsonQ+m4QdVrclm7vbr5Cj9Ue1O7y6+Qo/VHtVZX1Oh9Nwg6rW5LN3eXXyFH6o9qd3l18hR+qPaqyidD6bhB1WtyWbu8uvkKP1R7U7u7r5Cj9Ue1VpE6H03CDqtbks3d3dfIUfqj2p3d3XyFH6o9qrSKdD6bhB1WtyWXu7uvkKP1R7U7urr5Cj9Ue1VtAnQ+m4QdVrcll7urr5Cj9Ue1O7q6+Qo/VHtVaX1Oh9Nwg6rW5LJ3dXXyFH6o9q+93N08hSerPaq0vqdD6bhB1WtyWTu5unkKT1Z7U7ubp5Ck9We1VtAp0PpuEHVa3JZO7m6eRpPVntTu4unkaT1Z7VXECdD6bhB1WtyWTu4unkaT1Z7U7uLp5Gk9We1VxAnQ+n4QdVrclj7uLp5Gk9We1O7i6eRpPVntVcX0J0Xp+EHVa3JY+7e6eRpPVntTu3unkaT1Z7VXF9CdF6fhB1WtyWLu3unkaT1Z7U7t7n5Gk9We1V1fU6H0/CDqtbksXdtc/I0nqz2p3bXPyNJ6s9qrqKdF6fhB1WtyWLu2ufkaT1Z7U7trn5Gk9We1V5E6L0/CDqtbksXdrc/I0nqz2p3a3PyNJ6s9qrq+p0Xp+EHVa3JYe7W5+RpPVntTu1ufkaT1Z7VXl9TovT8IOq1uSw92lz8jSerPandpc/I0nqz2qvIFOi9Pwg6rW5LD3aXPyNL6s9qmaGtv1fRR1cZtjGS5wHteDwJHVnxKjK/bPfo7R/Q//AJuXg/iGlpaGlGWGMXf93r9HqamrqTjllPszztD5S0+i/sXkuVzvdrozUzutjmhwaGsY8kknHWoaf4T7HDNOWUlyqaCnmEMtzgptdKx2QD34PQC4dA49WcjMltTNFUbPRzwSMlikkjex7HBzXNPEEEdIIXyMNa8oicY/R9HLTrGZjKXugn2gnp4p2vtbWysa8BzX5AIyM8FsztD5S0+i/sX2OspqCxUtTWVMVNAymi1SzPDGty0AZJ4DiQF6ZpoqeF888jIoo2l73vcGta0DJJJ6AAmprbc5iMY/Qw07xiZylDXW83m0RxPnNufvXaWtjY8noznjhU3aRzn7Q1rnEk7zr+hWXa6aKopLdPBIyWKRxex7HBzXNLcggjpBCrO0X6QVv8UrOpMZaWOVRE3Pt/T+64ROOc43fiP+0ttb/wB5ti/+7f8AVKn7/T0W18lz2f0Rw3K3aJKeWQ5yHNa4kY44/VPSBlp4nAFZ26q46Db61Vkoc6OnjglcGjiQ2RxOPPwUDeNpd/tm/aC2CSPD43xtl4E6WNaQ7Seg4IIzxBX6HQ9Nnq6ellj4mMfE/e/+4t83U1ccMs4y83PmPtS27WWuK8/CZaaCc4ikpWl44981rpHFvAjGQMZ6sqXN05JcX281Oy0FnY90T6XlOmUNOQ4FuNOc5JbjxjPWqPfNtHVu01BfbbE6Camp2scyYBw1ZdqHDpaQ7GeB+hSk21Gw1fVR19bs9Ucr4Ofoa3QXZycgPAfxJ4kcevxKZem1dmEZ4zMRFVH0n9f3XHWw3ZTjMXf7PZYIrQ7aC+7K08zZrXWxB8BE4eGu0gkMzkFw1ZB4kbsZzjKw2dsVPDsvVWev3cdyvL5o4GFzyNUGQA4t4DS8OPnB6+hUW3XHmu9QXCmbI1sEwkbHvO+Lc8WlwA6RwJx1nh1KwX7bXnDauhu1EyoZT0OnRE+TSX8cv6Mhuod6enIAz4l6dX0utu24T4mImZ//AFjHj9Zq/wAnHDW09t5R5jx/Sf7eXumY3Z34MI2gbutvTwXkSAP3fSMY4lukAEdW8OenCoqsO2e0se0t1jnp2TR00MQYxkruJOcudgcATwHX4I+gV5e30mGWOE5Zx+LKbn+39IefXyicqx9o8Os7YbO2m7X2nqbjtBT2/RC1hgeWh72hzjkEuGM5Izg9HWsbDfqbaH4RamppGuEENuMLHu4GTEjTqx1DvujzdXQKVtrtBSbR3iKso45o42U4iImaAchzj1E8OITYq/0mzl4lrKyOaSN9O6ICFoJyXNPWRw4FfNj0ep0v4rnKqiPi3sn1GP8AO8eIvzPy9dZtVXbVvpbAIqegopqmONjYGuy1udLWniA4DIOMDi0dCnb1tpNsneeY7bbaVtDRNY0sOrU7IDjg54Hvukg8ck5zhc5jkkhlZLE90cjHBzXtOC0joIPUVeXbWbJXOWG4XqxTPuLWt3roQDG4t6DgvGoeZwPDhxAXfX9NhhOMRhuw8+I+fHn3ctLWyyifxVl48z8fDTtQ2LY3beCttEEb
Скачать книгу