Тема: EKLib

Обновил до версии 1.6. Переписал метод getImagePartByIndex. Подробнее внутри скрипта.
Небольшая демка:
Вставьте библиотеку в свой проект, после чего создайте на карте новое событие. В действиях выберите Script...
И вставьте туда данный фрагмент кода:

Код:

$EKLib = EKLib.new
@interval = 0
@f = ["001-Sky01","002-Sky02","003-StarlitSky01","004-CloudySky01","005-Sunset01","006-Mountains01","007-Ocean01"]
for n in 0..@f.size - 1
  @w = 16
  @count = Bitmap.new("Graphics/Panoramas/" + @f[n]).width / @w
  @h = Bitmap.new("Graphics/Panoramas/" + @f[n]).height
  @a = [0, 1, @count]
  @bitmaps = $EKLib.getImagePartByIndex ("Graphics/Panoramas/" + @f[n], @a, @w, @h)
  @sprites = []
  for i in 0..@count
    @sprites.push(Sprite.new)
    @sprites[i].x = (@w + @interval) * i
    @sprites[i].bitmap = @bitmaps[i]
    Graphics.update
  end
  Graphics.freeze
  Graphics.transition(60)
end
for sprite in @sprites = []
  sprite.dispose
end

P.S. Это использование метода не по назначению. По сути, он здесь не нужен и можно сделать все более оптимальным способом, но нужно же было как-то наглядно продемонстрировать работу хоть какой-нибудь функции...
P.S. Для большей наглядности, можете изменить значение @interval с 0 на 1.