重写RMXP的UI库如何?

kylixs · 发表于 2007-3-28 10:30:06

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

某轮乱用职权后的留言:
建议诸位看看第2页LZ的回帖,恩,思路比成品重要!
[LINE]1,#dddddd[/LINE]
前几天想做一个仿《大话西游IIoline》商店，区别于RM传统商店的是：呼出商店时不是场景切换，而是弹出一个对话框！

详细点击大话商店
这一过程发现RMXP的UI库极不成熟，只能说还没成型，修改和扩展都十分麻烦，而且不通用！！
我在论坛上看到不少修改的例子，基本上很多是作者自己修改了大半个系统，这些脚本的复用很成问题。

这个商店我写了几个UI组件：窗口，按钮，标签
有一个比较简单的更新、描绘和事件处理机制，还不是很成熟
不知道有没有人对UI库感兴趣的，有人一起干的话，重写一个简单UI库也不会很长时间，1周左右应该拿得出最初版本了。
联系我：QQ 307358033 [email protected]

Benavii　叫我PM美兽殿{/gg}是谁？我才上6R没几天{/fd}{/bz}

懒得打字，随便帖一个脚本（这个脚本是不能单独运行的{/gg}还没整理好...就不放上来了）...

#----------------------------------------------------------------------------
# ■ 弹出式商店--PopupShop
# @author: kylixs
# @date : 2007-3
# @e-mail: [email protected]
# @qq : 307358033
# @website: [url]http://bbs.javarpg.cn[/url]
#-----------------------------------------------------------------------------
class PopupShop < AyinWindow
def initialize(shop_goods)
super("购买",210,5)
add_ignore_rect(Rect.new(19,44,306,204))
# 购买按钮
@btn_buy=Button.new(["购买按钮1","购买按钮2","购买按钮3"])
@btn_buy.action = Proc.new{
buy_action()
# 关闭商店
# close()
}
add(@btn_buy,150,390)
# 单价
@lbl_price = Label.new("",140,16)
@lbl_price.font.bold = true
add(@lbl_price,142,271)
# 数量
@lbl_num = Label.new("",140,16)
@lbl_num.font.bold = true
add(@lbl_num,142,299)
# 总价
@lbl_cost = Label.new("",140,16)
@lbl_cost.font.bold = true
add(@lbl_cost,142,326)
# 现金
@lbl_cash = Label.new("",140,16)
@lbl_cash.font.bold = true
add(@lbl_cash,142,354)
# 实例变量
@shop_goods = shop_goods
# 物品提示窗口
@tooltip = Tooltip.new
@number = 0
@index = -1
@item = nil
@data = []
@cell_bg = $game_temp.cell_selected_background
$game_temp.message_window_showing = true
$game_system.map_interpreter.message_waiting = true
init_shop
update
end
#--------------------------------------------------------------------------
# ● 释放
#--------------------------------------------------------------------------
def dispose
$game_temp.message_window_showing = false
$game_system.map_interpreter.message_waiting = false
@tooltip.dispose
super
end
#--------------------------------------------------------------------------
# ● 更新画面/事件等
#--------------------------------------------------------------------------
def update
super
if self.closed?
return
end
@tooltip.update
#更新相关标签
update_labels()
# 选择商品
index = select_goods
item = nil
if index > -1
item = @data[index]
end
x,y = Mouse.get_mouse_pos
@tooltip.set_item(item)
@tooltip.x = x
@tooltip.y = y + 32
if Mouse.trigger?(Mouse::LEFT)
if item != nil
# 选中一个项目
if(@item == item )
@number += 1
else
@number = 1
@index = index
@item = item
end
end
Mouse.update
elsif Mouse.trigger?(Mouse::RIGHT)
# 减少商品数量
if index == @index && @number > 0
@number -= 1
end
Mouse.update
elsif Input.trigger?(Input::C)
@btn_buy.click()
Input.update
end
return
end
#--------------------------------------------------------------------------
# ● 更新商店相关的数据
#--------------------------------------------------------------------------
def update_labels
if(@item != nil)
@lbl_price.set_text(@item.price.to_s)
@lbl_num.set_text(@number.to_s)
cost = @number * @item.price
@lbl_cost.font.color = (cost > $game_party.gold ? short_gold_color : normal_color)
@lbl_cost.set_text(cost.to_s)
else
@lbl_price.set_text("")
@lbl_num.set_text("")
@lbl_cost.set_text("")
end
end
#--------------------------------------------------------------------------
# ● 选择商品
#--------------------------------------------------------------------------
def select_goods
x,y = get_mouse_pos
x -= 19 #top
y -= 44 #left
if( x < 0 || x > 306 || y < 0 || y > 204)
return -1
end
col = x/51
row = y/51
index = row * 6 + col
# 所在单元格是否有商品
if index >= @data.size
return -1
end
return index
end
#--------------------------------------------------------------------------
# ● 减少商品数量
#--------------------------------------------------------------------------
def reduce_num
end
#--------------------------------------------------------------------------
# ● 购买处理
#--------------------------------------------------------------------------
def buy_action
#未选中物品或者数量为0
if @item == nil || @number == 0
# 演奏冻结 SE
$game_system.se_play($data_system.buzzer_se)
return
end
# 金钱不足时
cost = @number * @item.price
if( cost > $game_party.gold)
# 演奏冻结 SE
$game_system.se_play($data_system.buzzer_se)
return
end
$game_party.lose_gold(cost)
case @item
when RPG::Item
$game_party.gain_item(@item.id, @number)
when RPG::Weapon
$game_party.gain_weapon(@item.id, @number)
when RPG::Armor
$game_party.gain_armor(@item.id, @number)
end
# 刷新各窗口
init_shop
end
#--------------------------------------------------------------------------
# ● 初始化商店
#--------------------------------------------------------------------------
def init_shop
@data = []
for goods_item in @shop_goods
case goods_item[0]
when 0
item = $data_items[goods_item[1]]
when 1
item = $data_weapons[goods_item[1]]
when 2
item = $data_armors[goods_item[1]]
end
if item != nil
@data.push(item)
end
end
@lbl_cash.font.color = get_gold_color($game_party.gold)
@lbl_cash.set_text($game_party.gold.to_s)
@number = 0
end
#--------------------------------------------------------------------------
# ● 描绘商品
#--------------------------------------------------------------------------
def paint_goods
# 如果项目数不是 0 就生成位图、描绘全部项目
@item_max = @data.size
if @item_max > 0
# 选中单元格背景
if( @index >=0 && @index <@item_max)
x,y = get_item_pos(@index)
self.contents.blt(x-1,y-1,@cell_bg,@cell_bg.rect)
end
for i in 0...@item_max
draw_item(i)
end
end
end
#--------------------------------------------------------------------------
# ● 描绘项目
# index :项目编号
#--------------------------------------------------------------------------
def draw_item(index)
item = @data[index]
# 获取物品所持数
case item
when RPG::Item
number = $game_party.item_number(item.id)
when RPG::Weapon
number = $game_party.weapon_number(item.id)
when RPG::Armor
number = $game_party.armor_number(item.id)
end
# 价格在所持金以下、并且所持数不是 99 的情况下为普通文字颜色
# 除此之外的情况设置为无效文字色
if item.price <= $game_party.gold and number < 99
self.contents.font.color = normal_color
else
self.contents.font.color = disabled_color
end
x,y = get_item_pos(index)
bitmap = RPG::Cache.icon(item.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
x += (50 - bitmap.width)/2
y += (50 - bitmap.height)/2
self.contents.blt(x, y , bitmap, bitmap.rect, opacity)
end
def paint()
super
paint_goods
end
def get_item_pos(index)
col = index % 6
row = index / 6
x = 19 + col * 51
y = 44 + row * 51
return x,y
end
end

复制代码

PS: 第一次在6R发帖....

kylixs · 发表于 2007-3-28 10:30:06

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

某轮乱用职权后的留言:
建议诸位看看第2页LZ的回帖,恩,思路比成品重要!
[LINE]1,#dddddd[/LINE]
前几天想做一个仿《大话西游IIoline》商店，区别于RM传统商店的是：呼出商店时不是场景切换，而是弹出一个对话框！

详细点击大话商店
这一过程发现RMXP的UI库极不成熟，只能说还没成型，修改和扩展都十分麻烦，而且不通用！！
我在论坛上看到不少修改的例子，基本上很多是作者自己修改了大半个系统，这些脚本的复用很成问题。

这个商店我写了几个UI组件：窗口，按钮，标签
有一个比较简单的更新、描绘和事件处理机制，还不是很成熟
不知道有没有人对UI库感兴趣的，有人一起干的话，重写一个简单UI库也不会很长时间，1周左右应该拿得出最初版本了。
联系我：QQ 307358033 [email protected]

Benavii　叫我PM美兽殿{/gg}是谁？我才上6R没几天{/fd}{/bz}

懒得打字，随便帖一个脚本（这个脚本是不能单独运行的{/gg}还没整理好...就不放上来了）...

#----------------------------------------------------------------------------
# ■ 弹出式商店--PopupShop
# @author: kylixs
# @date : 2007-3
# @e-mail: [email protected]
# @qq : 307358033
# @website: [url]http://bbs.javarpg.cn[/url]
#-----------------------------------------------------------------------------
class PopupShop < AyinWindow
def initialize(shop_goods)
super("购买",210,5)
add_ignore_rect(Rect.new(19,44,306,204))
# 购买按钮
@btn_buy=Button.new(["购买按钮1","购买按钮2","购买按钮3"])
@btn_buy.action = Proc.new{
buy_action()
# 关闭商店
# close()
}
add(@btn_buy,150,390)
# 单价
@lbl_price = Label.new("",140,16)
@lbl_price.font.bold = true
add(@lbl_price,142,271)
# 数量
@lbl_num = Label.new("",140,16)
@lbl_num.font.bold = true
add(@lbl_num,142,299)
# 总价
@lbl_cost = Label.new("",140,16)
@lbl_cost.font.bold = true
add(@lbl_cost,142,326)
# 现金
@lbl_cash = Label.new("",140,16)
@lbl_cash.font.bold = true
add(@lbl_cash,142,354)
# 实例变量
@shop_goods = shop_goods
# 物品提示窗口
@tooltip = Tooltip.new
@number = 0
@index = -1
@item = nil
@data = []
@cell_bg = $game_temp.cell_selected_background
$game_temp.message_window_showing = true
$game_system.map_interpreter.message_waiting = true
init_shop
update
end
#--------------------------------------------------------------------------
# ● 释放
#--------------------------------------------------------------------------
def dispose
$game_temp.message_window_showing = false
$game_system.map_interpreter.message_waiting = false
@tooltip.dispose
super
end
#--------------------------------------------------------------------------
# ● 更新画面/事件等
#--------------------------------------------------------------------------
def update
super
if self.closed?
return
end
@tooltip.update
#更新相关标签
update_labels()
# 选择商品
index = select_goods
item = nil
if index > -1
item = @data[index]
end
x,y = Mouse.get_mouse_pos
@tooltip.set_item(item)
@tooltip.x = x
@tooltip.y = y + 32
if Mouse.trigger?(Mouse::LEFT)
if item != nil
# 选中一个项目
if(@item == item )
@number += 1
else
@number = 1
@index = index
@item = item
end
end
Mouse.update
elsif Mouse.trigger?(Mouse::RIGHT)
# 减少商品数量
if index == @index && @number > 0
@number -= 1
end
Mouse.update
elsif Input.trigger?(Input::C)
@btn_buy.click()
Input.update
end
return
end
#--------------------------------------------------------------------------
# ● 更新商店相关的数据
#--------------------------------------------------------------------------
def update_labels
if(@item != nil)
@lbl_price.set_text(@item.price.to_s)
@lbl_num.set_text(@number.to_s)
cost = @number * @item.price
@lbl_cost.font.color = (cost > $game_party.gold ? short_gold_color : normal_color)
@lbl_cost.set_text(cost.to_s)
else
@lbl_price.set_text("")
@lbl_num.set_text("")
@lbl_cost.set_text("")
end
end
#--------------------------------------------------------------------------
# ● 选择商品
#--------------------------------------------------------------------------
def select_goods
x,y = get_mouse_pos
x -= 19 #top
y -= 44 #left
if( x < 0 || x > 306 || y < 0 || y > 204)
return -1
end
col = x/51
row = y/51
index = row * 6 + col
# 所在单元格是否有商品
if index >= @data.size
return -1
end
return index
end
#--------------------------------------------------------------------------
# ● 减少商品数量
#--------------------------------------------------------------------------
def reduce_num
end
#--------------------------------------------------------------------------
# ● 购买处理
#--------------------------------------------------------------------------
def buy_action
#未选中物品或者数量为0
if @item == nil || @number == 0
# 演奏冻结 SE
$game_system.se_play($data_system.buzzer_se)
return
end
# 金钱不足时
cost = @number * @item.price
if( cost > $game_party.gold)
# 演奏冻结 SE
$game_system.se_play($data_system.buzzer_se)
return
end
$game_party.lose_gold(cost)
case @item
when RPG::Item
$game_party.gain_item(@item.id, @number)
when RPG::Weapon
$game_party.gain_weapon(@item.id, @number)
when RPG::Armor
$game_party.gain_armor(@item.id, @number)
end
# 刷新各窗口
init_shop
end
#--------------------------------------------------------------------------
# ● 初始化商店
#--------------------------------------------------------------------------
def init_shop
@data = []
for goods_item in @shop_goods
case goods_item[0]
when 0
item = $data_items[goods_item[1]]
when 1
item = $data_weapons[goods_item[1]]
when 2
item = $data_armors[goods_item[1]]
end
if item != nil
@data.push(item)
end
end
@lbl_cash.font.color = get_gold_color($game_party.gold)
@lbl_cash.set_text($game_party.gold.to_s)
@number = 0
end
#--------------------------------------------------------------------------
# ● 描绘商品
#--------------------------------------------------------------------------
def paint_goods
# 如果项目数不是 0 就生成位图、描绘全部项目
@item_max = @data.size
if @item_max > 0
# 选中单元格背景
if( @index >=0 && @index <@item_max)
x,y = get_item_pos(@index)
self.contents.blt(x-1,y-1,@cell_bg,@cell_bg.rect)
end
for i in 0...@item_max
draw_item(i)
end
end
end
#--------------------------------------------------------------------------
# ● 描绘项目
# index :项目编号
#--------------------------------------------------------------------------
def draw_item(index)
item = @data[index]
# 获取物品所持数
case item
when RPG::Item
number = $game_party.item_number(item.id)
when RPG::Weapon
number = $game_party.weapon_number(item.id)
when RPG::Armor
number = $game_party.armor_number(item.id)
end
# 价格在所持金以下、并且所持数不是 99 的情况下为普通文字颜色
# 除此之外的情况设置为无效文字色
if item.price <= $game_party.gold and number < 99
self.contents.font.color = normal_color
else
self.contents.font.color = disabled_color
end
x,y = get_item_pos(index)
bitmap = RPG::Cache.icon(item.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
x += (50 - bitmap.width)/2
y += (50 - bitmap.height)/2
self.contents.blt(x, y , bitmap, bitmap.rect, opacity)
end
def paint()
super
paint_goods
end
def get_item_pos(index)
col = index % 6
row = index / 6
x = 19 + col * 51
y = 44 + row * 51
return x,y
end
end

复制代码

PS: 第一次在6R发帖....

kylixs · 发表于 2007-3-28 10:37:19

自己顶一下。。。

gpra8764:

以后不要这样……建议，建议……

kylixs · 发表于 2007-3-29 02:37:01

以下引用美兽于2007-3-28 7:43:26的发言：

是JAVA的风格，对于这种时间杀手式的工作，实在力有所不及。

{/gg}这种不是Java的风格，跟java毫无关系，只是UI类库我参考了java的类库设计。。。
{/wx}这个商店是仿《大话西游IIonline》的，弹出的概念－－如打开一个QQ窗口，只是弹出一个对话框在顶部，其它下面的东西正常显示，而RM默认是$sence切换的。。

{/fd}可能是你们习惯于RM的默认风格了，如果有用过其它语言来设计用户界面的会明白
——什么是组件及组件化带来的便利
简单地说，组件可以像积木一样搭起一个窗口，而每个组件内部是自己维护描绘和事件的，这样统一又便于重复使用，如按钮和标签，放到哪个窗口中都可以，只需要设置一些参数

而默认RMXP的UI并不是这样，UI类不是很通用，通常是定制的，普通常用的控件也找不到，而是用一种较为简单的方式，如Window_Selectable，这个东西可以作为列表、选项、表格的父类

一句话，RMXP默认UI类，用来设计自定义的，比较复杂的窗口时就非常不好用!
{/kuk}举个简单的例子，就拿商店
如果用Window_ShopCommand，有3个按钮，“购买”，“买卖”，“取消”，每次更新，我们都判断这3个按钮哪个被按下了，然后转向相应的事件处理函数，3个按钮时没什么关系，如果有5个，10个，那是不是要写case when 0...when 10 ?
如果用Button组件，可以为每个Button指定按下时的事件
@btn1.action = Proc.new{buy_action}
@btn2.action = Proc.new{sell_action}
@btn3.action = Proc.new{close}
......
而且每个按钮支持用图片背景（3张图片，分别为普通、鼠标移上，按下），或者其它修改，都容易多了，因为泾渭分明，修改这个组件的时候只要做到标准化就大大提高重用率！

谢谢，口水洒了一地{/gg}{/cy}
PS:第一次发帖，好多人鼓励我{/hx}我会努力的

kylixs · 发表于 2007-3-30 01:08:23

看了一下,好像不是很难{/bz}..你能把每个要求变成设计图纸给我吗?
QQ 307358033

kylixs · 发表于 2007-3-30 01:32:32

以下引用亿万星辰于2007-3-28 18:55:42的发言：

原来 Proc 是做这个用的

好难理解.......这貌似就是差距...

[本贴由作者于 2007-3-28 18:57:58 最后编辑]

以下引用神思于2007-3-29 17:09:06的发言：

呵呵``大概知道Proc有什么用了`````感谢`

其实我做这个商店的时候才开始学ruby,Proc这个是看看来的代码学到的,原来有几个地方用到了,如Interpreter1中231-246行

#--------------------------------------------------------------------------
# ● 设置选择项
#--------------------------------------------------------------------------
def setup_choices(parameters)
# choice_max 为设置选择项的项目数
$game_temp.choice_max = parameters[0].size
# message_text 为设置选择项
for text in parameters[0]
$game_temp.message_text += text + "\n"
end
# 设置取消的情况的处理
$game_temp.choice_cancel_type = parameters[1]
# 返回调用设置
current_indent = @list[@index].indent
$game_temp.choice_proc = Proc.new { |n| @branch[current_indent] = n }
end

复制代码

现在对ruby只算是知其皮毛,这个语言太灵活了...扩展也容易

我要做的UI库,打算重写Input类,支持全部键盘/鼠标,支持keyDown/keyUp,mouseDown/mouseUp/mouseMove这些常见事件 -- 满足简单的PC版游戏要求

kylixs · 发表于 2007-3-30 02:17:59

以下引用神思于2007-3-29 17:50:52的发言：

只是那个速度啊````你什么脚本都不用``快速摇晃鼠标个FPS都掉的厉害```
有个靠优化Graphics.update的鼠标脚本````期待你会怎么改````

说具体点好吗..?
还不知道速度这个也是问题哦..我测试一下..
目前知道的问题是:无法设置鼠标指针位置--以前的脚本鼠标移到选项时,按键盘上/下方向键,都不会跳过其它选项 --- 因为没有mosuemove

帐号		自动登录	找回密码
密码			注册会员

重写RMXP的UI库如何?

加入我们，或者，欢迎回来。

加入我们，或者，欢迎回来。

重写RMXP的UI库如何?