Куда глаза глядят
Следующее что хотелось рассмотреть в цикле заметочек.
Указание направления дивжения бота при помощи спрайта. Как таковой пример особой ценности не
имеет, однако может понадобиться в дальнейшем и может быть модфицирован под нужды "девелопера".
Открываем графический редактор (к примеру MS Paint) и творим: нам понадобиться круг, с одним
проведённым радиусом.
Теперь вопрос: подгружать спрайт по мере необходимости или использовать образец? Для такой простой
игры это не критично, однако, стоит приучиться использовать копии объектов. (в идеале должен быть
и образец для каждого типа "выстрела"). Приступим:
Global pricel=LoadImage("pricel.bmp")
Global shot_sprite=LoadSprite("sprite.bmp")
Global orient_sprite=LoadSprite("orient.bmp")
Function create_world()
Function create_world()
light=CreateLight()
RotateEntity light,90,0,0
HideEntity shot_sprite
HideEntity orient_sprite
SpriteViewMode orient_sprite,2
Создание бота немного подправим:
NameEntity b\entity,Handle(b)
Orient=CopyEntity(orient_sprite)
TurnEntity Orient,90,0,0
EntityParent Orient,b\entity
PositionEntity Orient,0,-1,0
Return True
Так... теперь вернёмся в место сокрытия образца и откалибруем размер спрайта:
SpriteViewMode orient_sprite,2
ScaleSprite orient_sprite,5,5
Собственно... пока всё.