Project1

标题: 求人帮忙移植XP仿DNF地图到VA价钱好说 [打印本页]

---

作者: j296196585    时间: 2017-7-15 18:54
标题: 求人帮忙移植XP仿DNF地图到VA价钱好说


有没有空闲的 程序猿 给移植下

压缩包是一个副本选择难度 配合这个一起使用

价钱好说

微信  j296196585
QQ296196585 \
可微信转账

RUBY 代码复制

#_______________________________________________________________________________
# MOG_Location_Name V1.4            
#_______________________________________________________________________________
# By Moghunter       
# [url]http://www.atelier-rgss.com[/url]
#_______________________________________________________________________________
module MOG
#Font Name.
MPFONT = ["宋体"]#"Georgia"
#Fade ON/OFF(True - False).
MPNMFD = true
#Fade Time(in seconds).
MPNMTM = 10
#Window Position.
# 0 = Upper Left.
# 1 = Lower Left.
# 2 = Upper Right.
# 3 = Lower Right.
MPNMPS = 1   #难度选择
# Disable Window Switch(ID).
WM_SWITCH_VIS_DISABLE = 15
end
#_________________________________________________
$mogscript = {} if $mogscript == nil
$mogscript["Location_Name"] = true
###############
# Game_System #
###############
class Game_System
attr_accessor :fdtm
attr_accessor :mpnm_x
attr_accessor :mpnm_y
alias mog24_initialize initialize
def initialize
mog24_initialize
@fdtm = 255 + 40 * MOG::MPNMTM
if MOG::MPNMPS == 0 
@mpnm_x = 0
@mpnm_y = -16
elsif MOG::MPNMPS == 1
@mpnm_x = 0
@mpnm_y = -16
elsif MOG::MPNMPS == 2
@mpnm_x = 0
@mpnm_y = -16
else 
@mpnm_x = 0
@mpnm_y = -16
end  
end
def mpnm_x
return @mpnm_x
end
def mpnm_y
return @mpnm_y
end
def fdtm
if @fdtm <= 0
@fdtm = 0 
end
return @fdtm
end
end 
############
# Game_Map #
############
class Game_Map
attr_reader   :map_id  
def mpname
$mpname = load_data("Data/MapInfos.rxdata") 
$mpname[@map_id].name
end
end
###############
# Window Base #
###############
class Window_Base < Window
def nd_mapic 
mapic = RPG::Cache.picture("")     
end  
def draw_mpname(x,y)
mapic = RPG::Cache.picture("Mpname2") rescue nd_mapic   
cw = mapic.width
ch = mapic.height
src_rect = Rect.new(0, 0, 1220, 990)
x1 = 40
x2 = 0
self.contents.blt(0, 0, RPG::Cache.picture("Mpname2"), Rect.new(0, 0, 1220, 990))
self.contents.font.name = MOG::MPFONT
self.contents.font.size = 15
self.contents.font.color = Color.new(0,0,0,255)
if $game_variables[1] == 0
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s,1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 1
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 冒险级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 2
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 勇士级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 3
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 王者级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 4
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 英雄级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 5
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 地狱级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 6
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 噩梦级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 7
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 灾难级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 8
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 毁灭级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 9
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 世界末日级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 10
self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 修罗降世",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
self.contents.font.color = Color.new(231,206,156,255)
if $game_variables[1] == 0
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s,1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 1
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 冒险级",1)#(525, -4, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 2
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 勇士级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 3
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 王者级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 4
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 英雄级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 5
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 地狱级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 6
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 噩梦级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 7
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 灾难级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 8
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 毁灭级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 9
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 世界末日级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
if $game_variables[1] == 10
self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 修罗降世",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)
end
end
end
##########
# Mpname #
##########
class Mpname < Window_Base
def initialize
super($game_system.mpnm_x, -16, 656, 5480)#$game_system.mpnm_y, 656, 480)
self.contents = Bitmap.new(width, height)
self.opacity = 0
refresh
end
def refresh
self.contents.clear
draw_mpname(10,0)    
end
end
#############
# Scene_Map #
#############
class Scene_Map
alias mog24_main main
def main
@mpnm = Mpname.new
@mpnm.contents_opacity = $game_system.fdtm
if $game_switches[MOG::WM_SWITCH_VIS_DISABLE] == false
@mpnm.visible = true
else
@mpnm.visible = true
end  
mog24_main
@mpnm.dispose
end
alias mog24_update update
def update
mog24_update  
$game_system.mpnm_x = @mpnm.x
$game_system.mpnm_y = @mpnm.y
if $game_switches[MOG::WM_SWITCH_VIS_DISABLE] == true or $game_system.fdtm <= 0
@mpnm.visible = true  
else
@mpnm.visible = true 
end 
if MOG::MPNMPS == 0 or MOG::MPNMPS == 1 
if @mpnm.x < 0
   @mpnm.x += 8
elsif @mpnm.x >= 0
   @mpnm.x = 0
end   
else
if @mpnm.x > 400
   @mpnm.x -= 8
elsif @mpnm.x <= 400
   @mpnm.x = 400
end     
end 
@mpnm.contents_opacity = $game_system.fdtm
if MOG::MPNMFD == true
$game_system.fdtm -= 0
end
end
alias mog24_transfer_player transfer_player
def transfer_player
mog24_transfer_player
if MOG::MPNMPS == 0 
$game_system.mpnm_x = 0
$game_system.mpnm_y = -16
elsif MOG::MPNMPS == 1
$game_system.mpnm_x = 0
$game_system.mpnm_y = -16
elsif MOG::MPNMPS == 2
$game_system.mpnm_x = 0
$game_system.mpnm_y = -16
else 
$game_system.mpnm_x = 0
$game_system.mpnm_y = -16
end  
@mpnm.y = $game_system.mpnm_y
@mpnm.x = $game_system.mpnm_x
$game_system.fdtm = 255 + 40 * MOG::MPNMTM
@mpnm.refresh
end
end

#_______________________________________________________________________________


# MOG_Location_Name V1.4            


#_______________________________________________________________________________


# By Moghunter       


# [url]http://www.atelier-rgss.com[/url]


#_______________________________________________________________________________


module MOG


#Font Name.


MPFONT = ["宋体"]#"Georgia"


#Fade ON/OFF(True - False).


MPNMFD = true


#Fade Time(in seconds).


MPNMTM = 10


#Window Position.


# 0 = Upper Left.


# 1 = Lower Left.


# 2 = Upper Right.


# 3 = Lower Right.


MPNMPS = 1   #难度选择


# Disable Window Switch(ID).


WM_SWITCH_VIS_DISABLE = 15


end


#_________________________________________________


$mogscript = {} if $mogscript == nil


$mogscript["Location_Name"] = true


###############


# Game_System #


###############


class Game_System


attr_accessor :fdtm


attr_accessor :mpnm_x


attr_accessor :mpnm_y


alias mog24_initialize initialize


def initialize


mog24_initialize


@fdtm = 255 + 40 * MOG::MPNMTM


if MOG::MPNMPS == 0 


@mpnm_x = 0


@mpnm_y = -16


elsif MOG::MPNMPS == 1


@mpnm_x = 0


@mpnm_y = -16


elsif MOG::MPNMPS == 2


@mpnm_x = 0


@mpnm_y = -16


else 


@mpnm_x = 0


@mpnm_y = -16


end  


end


def mpnm_x


return @mpnm_x


end


def mpnm_y


return @mpnm_y


end


def fdtm


if @fdtm <= 0


@fdtm = 0 


end


return @fdtm


end


end 


############


# Game_Map #


############


class Game_Map


attr_reader   :map_id  


def mpname


$mpname = load_data("Data/MapInfos.rxdata") 


$mpname[@map_id].name


end


end


###############


# Window Base #


###############


class Window_Base < Window


def nd_mapic 


mapic = RPG::Cache.picture("")     


end  


def draw_mpname(x,y)


mapic = RPG::Cache.picture("Mpname2") rescue nd_mapic   


cw = mapic.width


ch = mapic.height


src_rect = Rect.new(0, 0, 1220, 990)


x1 = 40


x2 = 0


self.contents.blt(0, 0, RPG::Cache.picture("Mpname2"), Rect.new(0, 0, 1220, 990))


self.contents.font.name = MOG::MPFONT


self.contents.font.size = 15


self.contents.font.color = Color.new(0,0,0,255)


if $game_variables[1] == 0


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s,1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 1


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 冒险级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 2


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 勇士级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 3


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 王者级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 4


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 英雄级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 5


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 地狱级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 6


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 噩梦级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 7


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 灾难级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 8


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 毁灭级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 9


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 世界末日级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 10


self.contents.draw_text(466, -3, 165, 32, $game_map.mpname.to_s + " - 修罗降世",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


self.contents.font.color = Color.new(231,206,156,255)


if $game_variables[1] == 0


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s,1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 1


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 冒险级",1)#(525, -4, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 2


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 勇士级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 3


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 王者级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 4


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 英雄级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 5


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 地狱级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 6


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 噩梦级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 7


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 灾难级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 8


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 毁灭级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 9


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 世界末日级",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


if $game_variables[1] == 10


self.contents.draw_text(465, -4, 165, 32, $game_map.mpname.to_s + " - 修罗降世",1)#(526, -3, 110, 32, $game_map.mpname.to_s,1)


end


end


end


##########


# Mpname #


##########


class Mpname < Window_Base


def initialize


super($game_system.mpnm_x, -16, 656, 5480)#$game_system.mpnm_y, 656, 480)


self.contents = Bitmap.new(width, height)


self.opacity = 0


refresh


end


def refresh


self.contents.clear


draw_mpname(10,0)    


end


end


#############


# Scene_Map #


#############


class Scene_Map


alias mog24_main main


def main


@mpnm = Mpname.new


@mpnm.contents_opacity = $game_system.fdtm


if $game_switches[MOG::WM_SWITCH_VIS_DISABLE] == false


@mpnm.visible = true


else


@mpnm.visible = true


end  


mog24_main


@mpnm.dispose


end


alias mog24_update update


def update


mog24_update  


$game_system.mpnm_x = @mpnm.x


$game_system.mpnm_y = @mpnm.y


if $game_switches[MOG::WM_SWITCH_VIS_DISABLE] == true or $game_system.fdtm <= 0


@mpnm.visible = true  


else


@mpnm.visible = true 


end 


if MOG::MPNMPS == 0 or MOG::MPNMPS == 1 


if @mpnm.x < 0


   @mpnm.x += 8


elsif @mpnm.x >= 0


   @mpnm.x = 0


end   


else


if @mpnm.x > 400


   @mpnm.x -= 8


elsif @mpnm.x <= 400


   @mpnm.x = 400


end     


end 


@mpnm.contents_opacity = $game_system.fdtm


if MOG::MPNMFD == true


$game_system.fdtm -= 0


end


end


alias mog24_transfer_player transfer_player


def transfer_player


mog24_transfer_player


if MOG::MPNMPS == 0 


$game_system.mpnm_x = 0


$game_system.mpnm_y = -16


elsif MOG::MPNMPS == 1


$game_system.mpnm_x = 0


$game_system.mpnm_y = -16


elsif MOG::MPNMPS == 2


$game_system.mpnm_x = 0


$game_system.mpnm_y = -16


else 


$game_system.mpnm_x = 0


$game_system.mpnm_y = -16


end  


@mpnm.y = $game_system.mpnm_y


@mpnm.x = $game_system.mpnm_x


$game_system.fdtm = 255 + 40 * MOG::MPNMTM


@mpnm.refresh


end


end

Mpname2.png (11.92 KB, 下载次数: 2)

下载附件  保存到相册

2017-7-15 18:54 上传

副本难度选择.zip

2017-7-15 18:58 上传

点击文件名下载附件

1002 KB, 下载次数: 32

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1