Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 6: Программирование на Visual Basic искусственного интеллекта. Продолжение 2

Автор

Валерий Алексеевич Жарков

Жанр

Программы

Год написания книги

2023

Теги

<< 1 ... 52 53 54 55 56 57 >>

На страницу:

Перейти

56 из 57

Настройки чтения

Размер шрифта

Высота строк

Поля

'we traveling vertically?

Private m_xVelocityBoris As Integer 'How fast are we

'traveling vertically?

Const MAX_DY_BORIS_FLYING = 4

Private m_y_accelerationBorris As Integer

Private m_world_I_Inhabit As PlayFieldManager

Private m_myModeOfMovement As ModeOfMovement

Public Enum ModeOfMovement As Integer

Flying = 1

End Enum

'When did we last update a flipped image

Private m_lastTickCountWhenImageFlipped As Integer

Const DTIME_TO_FLAP_WINGS = 400 'Every 600 ms we should

'flap our wings

'–

'These are the current image states for Hank

'–

Private Enum BorisImagesIndexes

flyLeft1 = 1

flyLeft2 = 2

End Enum

'–

'[in] X,Y : Position to start Hank at

'[in] worldHankInhabits : Playfield in which Hank lives

'–

Sub New(ByVal x As Integer, ByVal y As Integer, _

ByVal world_I_Inhabit As PlayFieldManager)

'–

'Get the bitmaps for our character

'–

Dim col As Collection

col = g_FlyingBirdPictureCollection()

m_world_I_Inhabit = world_I_Inhabit

ChangeMyMovementState(ModeOfMovement.Flying)

'Start him off as falling.

'Initialize our base class with these…

MyBase.Initialize_DrawableMultiPlayfiedBitmapObject( _

x, y, col, True)

'Set the image index

Me.CurrentFrameIndex = BorisImagesIndexes.flyLeft1

'Set Boris' speed

m_xVelocityBoris = -4

m_y_accelerationBorris = 1

'–

'Set the collision rectangle for Hank

'–

Const BORIS_COLLISION_STARTX = 11

Const BORIS_COLLISION_DX = 31

Const BORIS_COLLISION_STARTY = 6

Const BORIS_COLLISION_DY = 7

<< 1 ... 52 53 54 55 56 57 >>

На страницу:

Перейти

56 из 57

Другие электронные книги автора Валерий Алексеевич Жарков

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 13: Программирование на Visual Basic искусственного интеллекта. Издание 2. Продолжение 2

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 12: Программирование на Visual Basic искусственного интеллекта. Издание 2. Продолжение 1

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 11: Программирование на Visual Basic искусственного интеллекта. Издание 2

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 10: Программирование на Visual C# искусственного интеллекта. Издание 3. Продолжение 1

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 9: Программирование на Visual C# искусственного интеллекта. Издание 3

4.5

Справочник Жаркова по проектированию и программированию искусственного интеллекта. Том 8: Программирование на Visual C# искусственного интеллекта. Издание 2. Продолжение 1

Последний отзыв

Однажды на пляже в Бостери… Рассказы о любви – небесной и земной

Замир Осоров

2.43

Да, первый рассказ из сборника, что я успела прочитать, что надо! И написано хорошо, и содержание необычное, но жизненное. Очень понравилось, хотя там...