Demyi Jump

=begin Этот скрипт позволяет игроку совершать прыжок на определённое расстояние. На данный момент прыжок учитывает регионы(любой регион считается непроходимым), край карты и наличие ивентов. Возможно когда-нибудь сделаю ещё и проверку на разные регионы. Измените строку: "stat = 0", что бы изменить дальность прыжка. Через $game_actors[1].def - можно привязать её к параметру. =end class De_Jumps def start @actor = $game_actors[1] @orig_g = @actor.character_name #автоматически сохраняет обычную графику перса. @orig_i = @actor.character_index @a = "Actor4" #Эта строка отвечает за файл графики спрайта в прыжке. 0 - отлкючить. @b = 1 #Сюда пишется айди спрайта в прыжке, помните, что отчёт начинатся с нуля. @but = :C #кнопка отвечающая за прыжок, указывается как и в проверке условия у ивента. @se = "Jump1" #укажите название файла звука, который проигрывается при прыжке. 0 = отключить. @vol = 70 #укажите громкость звука. end def chek start if @actor == nil graph if @a != 0 jump if Input.press?(@but) && !$game_player.jumping? end def graph z = [@actor.character_name,@actor.character_index] if $game_player.jumping? a = @a b = @b end if $game_player.stopping? || $game_player.moving? a = @orig_g b = @orig_i end d = [a,b] if z != d @actor.set_graphic(a, b, a, 0) $game_player.refresh end end def jump Audio.se_play('Audio/SE/' + @se, @vol, 100) if @se != 0 i = 0 x = $game_player.x y = $game_player.y stat = 0 #Строка отвечающая за дальность прыжка. space = [1] #массив заполняется 0 и 1, в зависимости от проходимости тайлов. case $game_player.direction when 2 while i != stat i += 1 if $game_map.event_id_xy(x, y+i) == 0 && y+i < $game_map.height && $game_map.region_id(x, y+i) == 0 #строка вышла длинная, но я не нашёл другого пути проверить сразу на три условия. space.push 1 #собственно, пишем 1 - если клетка проходима. else space.push 0 #и 0, если нет. end end i = space.rindex(1) #присваем i индекс последнего в массиве элемента, со значением "1". $game_player.jump(0, i) when 4 while i != -stat #не нашёл варианта сравнить числа по модулю. i -= 1 if $game_map.event_id_xy(x+i, y) == 0 && x+i >= 0 && $game_map.region_id(x+i, y) == 0 space.push 1 else space.push 0 end end i = -space.rindex(1) #прыгаем в отрицательную сторону же $game_player.jump(i, 0) when 6 while i != stat i += 1 if $game_map.event_id_xy(x+i, y) == 0 && x+i < $game_map.width && $game_map.region_id(x+i, y) == 0 space.push 1 else space.push 0 end end i = space.rindex(1) $game_player.jump(i, 0) when 8 while i != -stat i -= 1 if $game_map.event_id_xy(x, y+i) == 0 && y-i >= 0 && $game_map.region_id(x, y+i) == 0 space.push 1 else space.push 0 end end i = -space.rindex(1) $game_player.jump(0, i) end end end $dj = De_Jumps.new class Scene_Map < Scene_Base alias re_update_scene update_scene def update_scene re_update_scene update_jump_player unless scene_changing? end def update_jump_player $dj.chek end end