Vn-Screen Forum
Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.



 
Trang ChínhTrang Chính  GalleryGallery  Latest imagesLatest images  Tìm kiếmTìm kiếm  Đăng kýĐăng ký  Đăng NhậpĐăng Nhập  
  • Top posters
 N.H.M (706)
 nhuantrung0210 (323)
 TjaGoChangLj (227)
 GVRFnu-Bjn (190)
 lisaidong (122)
 phongngan1997 (94)
 puppy:x* (85)
 anhcudo01 (69)
 taoghetmay (68)
 anhlathe47 (45)

Share | 
 

 Scrip Thêm Giới Thiệu nè

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
TjaGoChangLj
Administrator
Administrator
TjaGoChangLj

Thanked : 14


Scrip Thêm Giới Thiệu nè  _
Bài gửiTiêu đề: Scrip Thêm Giới Thiệu nè    Scrip Thêm Giới Thiệu nè  Empty20/7/2010, 2:56 pm

B1:
_Bật window script lên [F11]

sau đó bạn tìm script SCENE_TITLE

nhấn CTRL +G đánh 36 :nó sẽ đưa bạn đến dòng 36
Scrip Thêm Giới Thiệu nè  Anhscript




B2:


*Từ dòng 36 đến 40

# Make command window

s1 = "New Game"

s2 = "Continue"

s3 = "Shutdown"

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

thay bằng[copy ,paste đè lên đó mà]
# Make command window
s1 = "New Game"
s2 = "Continue"
s3 = "Giới thiệu"
s4 = "Shutdown"
@command_window = Window_Command.new(192, [s1, s2, s3, s4])


Sau đó CTRL+G lần nữa và lần này đến dòng 89

coi dòng 89 ,107


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

# * Frame Update


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

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

end

end

end

Thay thế
#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
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 # Credit
command_credit
when 3 # Shutdown
command_shutdown
end
end
end



B3


Nhấn CTRL+ F :Để kiếm dòng


* Command: Shutdown


sau đó paste ở trên đó

#--------------------------------------------------------------------------
# * Command: Credit
#--------------------------------------------------------------------------
def command_credit
printf"Thằng Minh Muốn Gì"
$scene = Scene_Credit.new
end

Scrip Thêm Giới Thiệu nè  Anhscript2


B3
Sau đó là insert /paste cái này làm 1 script mới
#==============================================================================
# ** Scene_Credit
#------------------------------------------------------------------------------
# Cái Script này phục vụ bạn làm 1 Credit dễ dàng - LeoV2F
# [You must be registered and logged in to see this link.]
#==============================================================================

class Scene_Credit
CREDIT =<<_END_

ThÝch ®iÒn g× ®ã th× ®iÒn


** Mäi chi tiÕt liªn hÖ :
- [You must be registered and logged in to see this link.]
- [You must be registered and logged in to see this link.]

E-Mail : [You must be registered and logged in to see this link.]


C¶m ¬n

_END_
end

class Scene_Credit

def initialize(return_scene = nil)
if return_scene.nil?
return_scene = Scene_Title.new
end
@return_scene = return_scene

end


def scene_start
credit_lines = CREDIT.split(/\n/)
credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
credit_lines.each_index do |i|
line = credit_lines[i]
credit_bitmap.font.name = ".VnArial"
credit_bitmap.font.size = 22
credit_bitmap.draw_text(0,i * 32,640,32,line,1)
end
@credit_sprite = Sprite.new(Viewport.new(0,50,640,380))
@credit_sprite.bitmap = credit_bitmap
@credit_sprite.oy = -430
@frame_index = 0
@last_flag = false
end

def scene_end
@credit_sprite.dispose
end

def last?
return (@frame_index >= @credit_sprite.bitmap.height + 480)
end

def last
if not @last_flag

@last_flag = true
@last_count = 0
else
@last_count += 1
end
if @last_count >= 20
$scene = @return_scene
end
end

def update
@frame_index += 1
return if cancel?
last if last?
@credit_sprite.oy += 1
end

def cancel?
if Input.trigger?(Input::B)
$scene = @return_scene
return true
end
return false
end

def main
scene_start

Graphics.transition

loop do

Graphics.update

Input.update

update

if $scene != self
break
end
end

Graphics.freeze
scene_end
end
end
# Scrip Thêm Giới Thiệu nè  459276 Không Hiểu Gì Thì Hỏi Mình Nha Scrip Thêm Giới Thiệu nè  701622 Scrip Thêm Giới Thiệu nè  746148
Chữ Ký Cá Nhân
Về Đầu Trang Go down
N.H.M
Rìu Chiến Bạc
Rìu Chiến Bạc
N.H.M

Thanked : 25


Scrip Thêm Giới Thiệu nè  _
Bài gửiTiêu đề: Re: Scrip Thêm Giới Thiệu nè    Scrip Thêm Giới Thiệu nè  Empty20/7/2010, 7:08 pm

tao làm dc rồi, demo kìa Nhe răng thanks
Chữ Ký Cá Nhân
Về Đầu Trang Go down
 

Scrip Thêm Giới Thiệu nè

Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
Vn-Screen Forum :: Thế Giới Game :: Game Offline :: RPG Maker XP-
VN-SCREEN.DARKBB.COM
Design by N.H.M - Developed by Vn-Screen Member
Create a forum on Forumotion | ©phpBB | Free forum support | Báo cáo lạm dụng | Thảo luận mới nhất