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 6153
541 상점 Advanced Shop System by Alexis Hiemis 1 file Alkaid 2010.10.08 1872
540 이동 및 탈것 이벤트가 이벤트를 따라가는것 8 백호 2009.02.22 1872
539 장비 Angie's Equipment Sets 2.3 by DerVVulfman 7 Alkaid 2010.12.31 1869
538 맵/타일 Editor Tiles by PK8 (XP/VX/VXA) Alkaid 2012.09.11 1868
537 저장 KGC_2PaneSave 15 file 키라링 2009.01.23 1868
536 기타 잠수방지 스크립트 12 백호 2009.02.22 1865
535 스킬 RO Job/Skill System 2.01b by Blizzard 2 file Alkaid 2010.09.05 1862
534 맵/타일 Call Map Event by DerVVulfman Alkaid 2011.12.21 1861
533 [복권] 복권시스템 2.0 [수정 완료] 12 file 코아 코스튬 2010.10.26 1860
532 전투 Etude87_Custom_Slip_Damage_XP ver.1.0 5 습작 2012.08.26 1857
531 타이틀/게임오버 타이틀 아주 미묘한 효과 5 백호 2009.02.22 1857
530 그래픽 [자작]Bitmap에서 줄긋기, 네모그리기 6 나뚜루 2009.01.24 1855
529 기타 광물캐기 스크립트 1 file 백호 2009.02.22 1850
528 전투 KGC_Active Count Battle (7/30일자) 7 file 백호 2009.02.22 1846
527 전투 MrMo DVV Add-On #13: Tinuke's Smart Missiles 2 Alkaid 2011.01.24 1843
526 기타 일시정지 스크립트 13 【§㉤ㅏ법㉧ㅣ§】 2011.02.26 1841
525 이동 및 탈것 젤다 스타일 맵스크롤 5 file 백호 2009.02.21 1839
524 기타 몬스터 도감 7 file 백호 2009.02.21 1834
523 전투 Minkoff's Animated Battlers - Enhanced 13.8 by DerVVulfman 1 Alkaid 2012.08.26 1832
522 키입력 텍스트입력 이벤트명령 2.0 by wachunga@rmxp.org (SDK호환) file 백호 2009.02.22 1826
Board Pagination Prev 1 ... 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 ... 52 Next
/ 52