Per 2016, RMID pindah ke RMID Discord (Invite link dihapus untuk mencegah spambot -Theo @ 2019). Posting sudah tidak bisa dilakukan lagi.
Mohon maaf atas ketidaknyamanannya dan mohon kerjasamanya.

Share | 
 

 [ask] jet credit script

Topik sebelumnya Topik selanjutnya Go down 
[ask] jet credit script Empty2011-12-31, 10:02
Post[ask] jet credit script
#1
baszto 
Advance
Advance
baszto

Level 5
Posts : 317
Thanked : 2

[ask] jet credit script Vide
kk ada yang tau gak cara memperlambat script credit ini? karna naiknya kecepetan :v ngerti gak maksud saya? klo gak coba aj dlu scriptny..,
thx
Code:
module JetCredits
 
  # This is the text that will be displayed for the credits rolling.
  # Stay within the { and the }
  CREDITS_TEXT = %Q{

Credits
               
Scripts -
_________

           
Jet - Credit Script
           
Others -
________
           
Jet - Being cools and everything yo
           
AND FINALLY, THE ONE, THE ONLY
     
Jet - he is just too hawt not to credit
     
  }
 
  # Do you want to center the text in the screen?
  CENTER_CREDITS_TEXT = true
 
  # Are the credits skippable with a button?
  SKIP_CREDITS_WITH_BUTTON = true
 
  # This is the button then can press if they want to skip the credits.
  SKIP_CREDITS_BUTTON = Input::C
 
end

#===============================================================================
# DON'T EDIT FURTHER UNLESS YOU KNOW WHAT TO DO.
#==============================================================================
class Scene_Credits < Scene_Base
 
  include JetCredits
 
  def initialize(return_scene = "Scene_Title")
    @return_scene = return_scene
  end
 
  def start
    create_menu_background
    @text = CREDITS_TEXT
    q = CENTER_CREDITS_TEXT ? 1 : 0
    line_index = 0
    @text.each_line {|s|
    if s[/<img: (.+)>/i].nil?
      line_index += 1
    else
      line_index += (Cache.picture($1).height / 24.0).round
    end
    }
    @credits = Window_Base.new(0, 416, 544, line_index * 24 + 32)
    @credits.opacity = 0
    line_index = 0
    @text.each_line {|s|
      text_to_draw = s.gsub("\n"){|h| "" }
      if text_to_draw[/<img: (.+)>/i].nil?
        @credits.contents.draw_text(0, line_index * 24, 514, 24, text_to_draw, q)
        line_index += 1
      else
        f = Cache.picture($1)
        x = q == 1 ? 544 / 2 - (f.width / 2.0) : 0
        @credits.contents.blt(x, line_index * 24, f, f.rect)
        line_index += (f.height / 24.0).round
      end
    }
  end
 
  def update
    super
    loop do
      Graphics.update
      Input.update
      @credits.y -= 1
      if SKIP_CREDITS_WITH_BUTTON
        if Input.trigger?(SKIP_CREDITS_BUTTON)
          break
        end
      end
      break if @credits.y <= @credits.height * -1
    end
    eval("$scene = #{@return_scene}.new")
  end
 
  def terminate
    super
    dispose_menu_background
    @credits.dispose
  end
end
[ask] jet credit script Empty2011-12-31, 10:05
PostRe: [ask] jet credit script
#2
shikami 
Member 1000 Konsep
avatar

Level 5
Posts : 3744
Thanked : 31
Engine : Multi-Engine User
Skill : Beginner
Type : Developer
Awards:


[ask] jet credit script Vide
mending pake Woratana;s Credit script :)
[ask] jet credit script Empty2011-12-31, 10:20
PostRe: [ask] jet credit script
#3
baszto 
Advance
Advance
baszto

Level 5
Posts : 317
Thanked : 2

[ask] jet credit script Vide
sya gak ngerti sama yg punya woratana :hammer:
[ask] jet credit script Empty2011-12-31, 10:24
PostRe: [ask] jet credit script
#4
shikami 
Member 1000 Konsep
avatar

Level 5
Posts : 3744
Thanked : 31
Engine : Multi-Engine User
Skill : Beginner
Type : Developer
Awards:


[ask] jet credit script Vide
Quote :
sya gak ngerti sama yg punya woratana :hammer:

perasaan lebih gampang deh kok malah ngga ngerti :hammer:
[ask] jet credit script Empty2011-12-31, 10:59
PostRe: [ask] jet credit script
#5
baszto 
Advance
Advance
baszto

Level 5
Posts : 317
Thanked : 2

[ask] jet credit script Vide
entahlah, pengertian orang itukan beda2 :v
[ask] jet credit script Empty2011-12-31, 11:40
PostRe: [ask] jet credit script
#6
DrDhoom 
Doomed Zombie
DrDhoom

Level 5
Posts : 629
Thanked : 22
Engine : Multi-Engine User
Skill : Intermediate
Type : Scripter

[ask] jet credit script Vide
Code:
module JetCredits
 
  # This is the text that will be displayed for the credits rolling.
  # Stay within the { and the }
  CREDITS_TEXT = %Q{

Credits
             
Scripts -
_________

         
Jet - Credit Script
         
Others -
________
         
Jet - Being cools and everything yo
         
AND FINALLY, THE ONE, THE ONLY
   
Jet - he is just too hawt not to credit
   
  }
 
  # Do you want to center the text in the screen?
  CENTER_CREDITS_TEXT = true
 
  # Are the credits skippable with a button?
  SKIP_CREDITS_WITH_BUTTON = true
 
  # This is the button then can press if they want to skip the credits.
  SKIP_CREDITS_BUTTON = Input::C
 
  #Editted by DrDhoom
  CD = 3 #Greater number, slower scroll
end

#===============================================================================
# DON'T EDIT FURTHER UNLESS YOU KNOW WHAT TO DO.
#==============================================================================
class Scene_Credits < Scene_Base
 
  include JetCredits
 
  def initialize(return_scene = "Scene_Title")
    @return_scene = return_scene
    @cd = CD
  end
 
  def start
    create_menu_background
    @text = CREDITS_TEXT
    q = CENTER_CREDITS_TEXT ? 1 : 0
    line_index = 0
    @text.each_line {|s|
    if s[/<img: (.+)>/i].nil?
      line_index += 1
    else
      line_index += (Cache.picture($1).height / 24.0).round
    end
    }
    @credits = Window_Base.new(0, 416, 544, line_index * 24 + 32)
    @credits.opacity = 0
    line_index = 0
    @text.each_line {|s|
      text_to_draw = s.gsub("\n"){|h| "" }
      if text_to_draw[/<img: (.+)>/i].nil?
        @credits.contents.draw_text(0, line_index * 24, 514, 24, text_to_draw, q)
        line_index += 1
      else
        f = Cache.picture($1)
        x = q == 1 ? 544 / 2 - (f.width / 2.0) : 0
        @credits.contents.blt(x, line_index * 24, f, f.rect)
        line_index += (f.height / 24.0).round
      end
    }
  end
 
  def update
    super
    loop do
      Graphics.update
      Input.update
      #Edited
      @cd -= 1
      if @cd <= 0
        @credits.y -= 1
        @cd = CD
      end
      #End of edit
      if SKIP_CREDITS_WITH_BUTTON
        if Input.trigger?(SKIP_CREDITS_BUTTON)
          break
        end
      end
      break if @credits.y <= @credits.height * -1
    end
    eval("$scene = #{@return_scene}.new")
  end
 
  def terminate
    super
    dispose_menu_background
    @credits.dispose
  end
end

Pengaturan kecepatannya ada di Module :)
[ask] jet credit script Empty2011-12-31, 12:01
PostRe: [ask] jet credit script
#7
baszto 
Advance
Advance
baszto

Level 5
Posts : 317
Thanked : 2

[ask] jet credit script Vide
ok sip om :thumbup: thx banget ya
topic solved.
[ask] jet credit script Empty
PostRe: [ask] jet credit script
#8
Sponsored content 




[ask] jet credit script Vide
 

[ask] jet credit script

Topik sebelumnya Topik selanjutnya Kembali Ke Atas 

Similar topics

+
Halaman 1 dari 1

Permissions in this forum:Anda tidak dapat menjawab topik
RPGMakerID :: Scripts & Event Systems :: RMVX Scripts :: RGSS2 Support :: RGSS2 Support Archive-