XP 스크립트

아래에 사진처럼 게임오버를 킹오니처럼 하는 스크립트입니다.

사진 아래부터 시작

dP.PNG

#-------------------------------------------------
# 제작 / 콰우
#-------------------------------------------------
# 수정을 하시면 신고 합니다.
#-------------------------------------------------
# - 홍보 - http://cafe.naver.com/xpcafe
#-------------------------------------------------
# 등업 해주세요 카제님 ㅋㅋ 장난이고요 죄송합니다.
#-------------------------------------------------

#스크립트 시작#
class Scene_Gameover

def main
   
  # 게임 오버 그래픽을 작성
    @sprite = Sprite.new
    @sprite.bitmap = RPG::Cache.gameover($data_system.gameover_name)
    # BGM, BGS 를 정지
    $game_system.bgm_play(nil)
    $game_system.bgs_play(nil)
    # 게임 오버 ME 를 연주
    $game_system.me_play($data_system.gameover_me)
 
    s1 = "게임종료"
    s2 = "타이틀로"
    s3 = "뉴 게임"
    s4 = "콘티 뉴"
    @command_window = Window_Command.new(192, [s1,s2,s3,s4])
    @command_window.x = 530- @command_window.width / 2
    @command_window.y = 370 - @command_window.height / 2
     # 트란지션 실행
    Graphics.transition
    # 메인 루프
    loop do
      # 게임 화면을 갱신
      Graphics.update
      # 입력 정보를 갱신
      Input.update
      # 프레임 갱신
      update
      # 화면이 바뀌면 루프를 중단
      if $scene != self
        break
      end
    end
    # 트란지션 준비
    Graphics.freeze
    # 윈도우를 해방
    @command_window.dispose
    # 타이틀 화면으로 전환해 안의 경우
    if $scene.is_a?(Scene_Title)
      # 화면을 페이드아웃
      Graphics.transition
      Graphics.freeze
    end
  end
   
#*******************************************************
#프레임 갱신
#*******************************************************
  def update
    # 커멘드 윈도우를 갱신
    @command_window.update
    # B 버튼이 밀렸을 경우
    if Input.trigger?(Input::B)
      # 캔슬 SE 를 연주
      $game_system.se_play($data_system.cancel_se)
      # 메뉴 화면으로 전환해
      $scene = Scene_Menu.new(5)
      return
    end
    # C 버튼이 밀렸을 경우
    if Input.trigger?(Input::C)
      # 커멘드 윈도우의 커서 위치에서 분기
      case @command_window.index
      when 0  # 게임종료
        command_0
      when 1  # 돌아가기
        command_1
      when 2  # 뉴 게임
        command_2
      when 3 # 콘티 뉴
        command_3
      end
      return
    end
  end   
   
#*******************************************************
# 커멘드 [게임종료] 선택시의 처리
#*******************************************************
  def command_0
    # 결정 SE 를 연주
    $game_system.se_play($data_system.decision_se)
    # BGM, BGS, ME 를 페이드아웃
    Audio.bgm_fade(800)
    Audio.bgs_fade(800)
    Audio.me_fade(800)
    # 슛다운
    $scene = nil
  end
#*******************************************************
# 커멘드 [돌아가기] 선택시의 처리
#*******************************************************
  def command_1
    # 결정 SE 를 연주
    $game_system.se_play($data_system.decision_se)
    # BGM, BGS, ME 를 페이드아웃
    Audio.bgm_fade(800)
    Audio.bgs_fade(800)
    Audio.me_fade(800)
    # 타이틀 화면으로 전환해
    $scene = Scene_Title.new
  end
  #*******************************************************
# 커멘드 [뉴 게임] 선택시의 처리
#*******************************************************
  def command_2
    # 결정 SE 를 연주
    $game_system.se_play($data_system.decision_se)
    # BGM 를 정지
    Audio.bgm_stop
    # 플레이 시간 계측용의 프레임 카운트를 리셋트
    Graphics.frame_count = 0
    # 각종 게임 오브젝트를 작성
    $game_temp          = Game_Temp.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables     = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_screen        = Game_Screen.new
    $game_actors        = Game_Actors.new
    $game_party         = Game_Party.new
    $game_troop         = Game_Troop.new
    $game_map           = Game_Map.new
    $game_player        = Game_Player.new
    # 초기 파티를 셋업
    $game_party.setup_starting_members
    # 초기 위치의 맵을 셋업
    $game_map.setup($data_system.start_map_id)
    # 플레이어를 초기 위치에 이동
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    # 플레이어를 리프레쉬
    $game_player.refresh
    # 맵으로 설정되어 있는 BGM 와 BGS 의 자동 변환을 실행
    $game_map.autoplay
    # 맵을 갱신 (병렬 이벤트 실행)
    $game_map.update
    # 맵 화면으로 전환해
    $scene = Scene_Map.new
  end
#*******************************************************
# 커멘드 [콘티 뉴] 선택시의 처리
#*******************************************************
  def command_3
    # 콘티 뉴가 무효의 경우
    unless @continue_enabled
      # 버저 SE 를 연주
      $game_system.se_play($data_system.buzzer_se)
      return
    end
    # 결정 SE 를 연주
    $game_system.se_play($data_system.decision_se)
    # 로드 화면으로 전환해
    $scene = Scene_Load.new
  end
end

Who's 또라에몽

profile

약 2년인가 3년만에 돌아온것 같네요.

Atachment
첨부 '1'
Comment '14'

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 6159
801 기타 양손무기, 전신갑옷 스크립트 2 백호 2009.02.22 1714
800 스킬 약간 수정한 심플액알(크리티컬,스킬) 10 백호 2009.02.22 3836
799 전투 액티브 타임 배틀(보행그래픽) file 백호 2009.02.21 2104
798 기타 액터 선택 스크립트 2 백호 2009.02.21 1228
797 액알입니다.정말 확신함 12 dkqkfsoatp 2007.12.13 4266
796 액알 스크립트 강좌용~!!!| 27 아방스 2007.11.09 5461
795 전투 액알 스크립트 24 백호 2009.02.22 6014
794 기타 액알 30 지존!! 2010.07.26 5096
793 타이틀/게임오버 애니메이션을 타이틀 화면에서 이용 15 file 백호 2009.02.21 3340
792 기타 암울한스크립트? 엔딩후 캐릭터 이어서 새로운 게임시작 스크립트 5 *ps인간 2009.01.26 2533
791 이동 및 탈것 아하! 그렇구나의 3D 신기술 체험 3 14 아하!잘봤어요. 2010.02.28 4258
790 이동 및 탈것 아하! 그렇구나의 3D 신기술 체험 2 23 아하!잘봤어요. 2010.02.28 3815
789 이동 및 탈것 아하! 그렇구나의 3D 신기술 체험 30 아하!잘봤어요. 2010.02.28 4772
788 아이템 아이템획득스크립트 ps인간 2009.01.23 2993
787 아이템 아이템창변경 27 카르닉스 2010.02.26 3634
786 아이템 아이템제한스크립트 ps인간 2009.01.23 1680
785 아이템 아이템을 얻으면 자동으로 아이템 입수 메세지윈도우 띄우기 4 백호 2009.02.22 2279
784 아이템 아이템을 사용하여 기술 습득하기 (기술문서 아이템) 2 file 백호 2009.02.21 1033
783 아이템 아이템소지수 한계돌파 (중복일지도) 12 카르닉스 2010.02.26 1500
782 아이템 아이템도감 14 키라링 2009.01.22 2299
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 ... 52 Next
/ 52