질문과 답변

Extra Form

ex)새로시작

     이어하기

     끝내기

     제작자 홈페이지


이렇게 되있으면 제작자의 홈페이지를 누를 경우 홈페이지로 이동이 가능하게 만드는 방법 좀 가르쳐주세요 ㅠ

Comment '1'
  • profile
    러닝은빛 2014.10.26 16:03

    메인 위에 삽입하세요.


    아래 인터넷 주소는 이 게시물의 주소로 되어있으니 수정하시기 바랍니다.



    class Scene_Title

      #--------------------------------------------------------------------------

      # * Main Processing

      #--------------------------------------------------------------------------

      def main

        # If battle test

        if $BTEST

          battle_test

          return

        end

        # Load database

        $data_actors        = load_data("Data/Actors.rxdata")

        $data_classes       = load_data("Data/Classes.rxdata")

        $data_skills        = load_data("Data/Skills.rxdata")

        $data_items         = load_data("Data/Items.rxdata")

        $data_weapons       = load_data("Data/Weapons.rxdata")

        $data_armors        = load_data("Data/Armors.rxdata")

        $data_enemies       = load_data("Data/Enemies.rxdata")

        $data_troops        = load_data("Data/Troops.rxdata")

        $data_states        = load_data("Data/States.rxdata")

        $data_animations    = load_data("Data/Animations.rxdata")

        $data_tilesets      = load_data("Data/Tilesets.rxdata")

        $data_common_events = load_data("Data/CommonEvents.rxdata")

        $data_system        = load_data("Data/System.rxdata")

        # Make system object

        $game_system = Game_System.new

        # Make title graphic

        @sprite = Sprite.new

        @sprite.bitmap = RPG::Cache.title($data_system.title_name)

        # Make command window

        s1 = "새로 시작"

        s2 = "이어 하기"

        s3 = "끝내기"

        s4 = "제작자 홈페이지"

        @command_window = Window_Command.new(192, [s1, s2, s3, s4])

        @command_window.back_opacity = 160

        @command_window.x = 320 - @command_window.width / 2

        @command_window.y = 430 - @command_window.height

        # Continue enabled determinant

        # Check if at least one save file exists

        # If enabled, make @continue_enabled true; if disabled, make it false

        @continue_enabled = false

        for i in 0..3

          if FileTest.exist?("Save#{i+1}.rxdata")

            @continue_enabled = true

          end

        end

        # If continue is enabled, move cursor to "Continue"

        # If disabled, display "Continue" text in gray

        if @continue_enabled

          @command_window.index = 1

        else

          @command_window.disable_item(1)

        end

        # Play title BGM

        $game_system.bgm_play($data_system.title_bgm)

        # Stop playing ME and BGS

        Audio.me_stop

        Audio.bgs_stop

        # Execute transition

        Graphics.transition

        # Main loop

        loop do

          # Update game screen

          Graphics.update

          # Update input information

          Input.update

          # Frame update

          update

          # Abort loop if screen is changed

          if $scene != self

            break

          end

        end

        # Prepare for transition

        Graphics.freeze

        # Dispose of command window

        @command_window.dispose

        # Dispose of title graphic

        @sprite.bitmap.dispose

        @sprite.dispose

      end

      

      def update

        # Update command window

        @command_window.update

        # If C button was pressed

        if Input.trigger?(Input::C)

          # Branch by command window cursor position

          case @command_window.index

          when 0  # New game

            command_new_game

          when 1  # Continue

            command_continue

          when 2  # Shutdown

            command_shutdown

          when 3 

            command_hompage

          end

        end

      end  

      

      def page_open(url)

        md = Win32API.new("shell32","ShellExecute",['L','P','P','P','P','L'],'L')

        md.call(0,"open",url,0,0,0)

      end


      def command_hompage

        page_open("http://avangs.info/kin/1392344")

      end

    end




List of Articles
종류 분류 제목 글쓴이 날짜 조회 수
공지 묻고 답하기 가이드 습작 2014.06.14 12442
Board Pagination Prev 1 ... 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 Next
/ 83