PureBasic

ZoomSprite()

Синтаксис

ZoomSprite(#Sprite , Width , Height)

Описание


Масштабирует Спрайт с Номером #Sprite.

Параметры

Width Новая ширина Спрайта (в пикселях). Если указано значение #PB_Default, то начальная ширина спрайта будет восстановлена.
Height Новая высота Спрайта (в пикселях). Если указано значение #PB_Default, то начальная ширина спрайта будет восстановлена.

Возвращаемое значение

Ничего.

Пример (фран.)

InitSprite()
OpenScreen(800,600,32,"Sprite")

 ;Спрайт цель 0
CreateSprite(0,100,100)
StartDrawing(SpriteOutput(0))
Circle(50,50,49,RGB(255,255,0))
Circle(50,50,40,RGB(0,255,0))
Circle(50,50,30,RGB(0,255,255))
Circle(50,50,20,RGB(0,0,255))
Circle(50,50,10,RGB(255,0,0))
StopDrawing()

 ;Спрайт цель 1
CopySprite(0, 1)

 ; Цикл
For i=-100 To 100
  ;Отобразим цель 0 и цель 1
  DisplaySprite(0, 200, 160)
  DisplaySprite(1, 500, 160)
  
  ;Масштабируем цель 0 и цель 1
  ZoomSprite(0,100+i,100+i)
  ZoomSprite(1,100-i,100+i)
  
  ;Отобразим экран 
  FlipBuffers()
  
  ;Очистим буфер
  ClearScreen(RGB(0,0,0))
  
  ;Задержка 100 мсек.
  Delay(100)
  
Next i

См. также

TransformSprite(), RotateSprite()

Поддерживаемые OS

Все

<- TransparentSpriteColor() - Оглавление Sprite