请问怎么样才能设置消耗其他东西的商店？

zlpwb1666

请问怎么样才能设置消耗其他东西的商店？

我深深的思考了老久，怎么样才能设置一个商店！

通过消耗各种声望勋章来购买声望奖励品的商店。

比如说：

在米托奥兰的军需商店中有一件衣服，购买它不能消耗金钱而是消耗此地获得的声望勋章呢 ？

希望有能人看懂我的描述，有人能帮帮我么？

喵呜喵5

zlpwb1666 发表于 2013-9-26 23:10
我的声望值不是存在哪里！
我是用物品制造了一个声望勋章。
比如说一个史诗级的戒指需要30个勋章来购买这 ...

事件页变量操作:
[变量1]等于勋章个数
物品勋章减99个
商店处理
物品勋章增加[变量1]个

zlpwb1666

喵呜喵5 发表于 2013-9-26 22:52
根本不需要脚本来设置啊，你的声望值存在哪里了?

我的声望值不是存在哪里！
我是用物品制造了一个声望勋章。
比如说一个史诗级的戒指需要30个勋章来购买这种！

喵呜喵5

zlpwb1666 发表于 2013-9-26 22:26
那么相关的变量又要从哪里设置呢
对不起，我不懂什么脚本。

根本不需要脚本来设置啊，你的声望值存在哪里了?

zlpwb1666

喵呜喵5 发表于 2013-9-26 22:18
把出错的那句脚本里的删掉

艹，论坛还真什么用户名都有随便@一下都被论坛改代码 ...

那么相关的变量又要从哪里设置呢
对不起，我不懂什么脚本。

喵呜喵5

zlpwb1666 发表于 2013-9-26 21:59
这个是怎么回事呢

把出错的那句脚本里的[url][url]删掉

艹，论坛还真什么用户名都有随便@一下都被论坛改代码

zlpwb1666

喵呜喵5 发表于 2013-9-26 18:21

这个是怎么回事呢

喵呜喵5

1. =begin
   
2. ===============================================================================
   
3.   变量商店 By喵呜喵5
   
4. ===============================================================================
   
5. 
   
6. 【说明】
   
7.   
   
8.   可以使用变量在商店进行购物
   
9.   
   
10.   首先先在事件中使用脚本命令输入：shop_set(变量的ID,"变量的单位")，例如：  
    
11.   shop_set(1,"节操")
    
12.   
    
13.   接着使用事件中的商店处理时，购买物品不会消耗金钱而是消耗对应的变量
    
14.   
    
15.   使用命令shop_set可以恢复原来使用金钱购物的商店
    
16.   
    
17. =end
    
18. 
    
19. #==============================================================================
    
20. #  脚本部分
    
21. #==============================================================================
    
22. $shop_set = [0,0] if $shop_set == nil
    
23. class Game_Interpreter
    
24.   def shop_set(gold=0,unit="")
    
25.     $shop_set = gold,unit
    
26.   end
    
27. end
    
28. class Window_Gold_New < Window_Base
    
29.   def initialize(gold,unit)
    
30.     super(0, 0, window_width, fitting_height(1))
    
31.     [url=home.php?mod=space&uid=236945]@gold[/url] = gold
    
32.     @unit = unit
    
33.     refresh
    
34.   end
    
35.   def window_width
    
36.     return 160
    
37.   end
    
38.   def refresh
    
39.     contents.clear
    
40.     draw_currency_value(value, currency_unit, 4, 0, contents.width - 8)
    
41.   end
    
42.   def value
    
43.     if [url=home.php?mod=space&uid=236945]@gold[/url] == 0
    
44.       $game_party.gold
    
45.     else
    
46.       $game_variables[@gold]
    
47.     end
    
48.   end
    
49.   def currency_unit
    
50.     if @gold == 0
    
51.       Vocab::currency_unit
    
52.     else
    
53.       @unit
    
54.     end
    
55.   end
    
56.   def open
    
57.     refresh
    
58.     super
    
59.   end
    
60. end
    
61. class Scene_Shop < Scene_MenuBase  
    
62.   def create_gold_window
    
63.     @gold_window = Window_Gold_New.new($shop_set[0],$shop_set[1])
    
64.     @gold_window.viewport = @viewport
    
65.     @gold_window.x = Graphics.width - @gold_window.width
    
66.     @gold_window.y = @help_window.height
    
67.   end
    
68.   def do_buy(number)
    
69.     if $shop_set[0] == 0
    
70.       $game_party.lose_gold(number * buying_price)
    
71.     else
    
72.       $game_variables[$shop_set[0]] -= number * buying_price
    
73.     end
    
74.     $game_party.gain_item(@item, number)
    
75.   end
    
76.   def do_sell(number)
    
77.     if $shop_set[0] == 0
    
78.       $game_party.gain_gold(number * selling_price)
    
79.     else
    
80.       $game_variables[$shop_set[0]] += number * selling_price
    
81.     end
    
82.     $game_party.lose_item(@item, number)
    
83.   end  
    
84.   def money
    
85.       @gold_window.value   
    
86.   end
    
87.   def currency_unit
    
88.       @gold_window.currency_unit
    
89.   end  
    
90.   def selling_price
    
91.     if $shop_set[0] == 0
    
92.       @item.price / 2
    
93.     else
    
94.       buying_price / 2
    
95.     end  
    
96.   end  
    
97. end
    

复制代码

cloudwuge

zlpwb1666 发表于 2013-9-26 14:09
不是减少声望，而是消耗一个叫做声望勋章的物品进行购买

弄个事件商店，当身上的声望物品大于X的时候，这个东西移除x。然后某个东西加入背包。否者提示文本身上没有那么多（可以自己编辑）  楼主是要这样的事件吗？

zlpwb1666

cjlzbb 发表于 2013-9-26 00:08
你需要事件商店，

具体链接搜下或者是外站吧，我忘了在哪找到的。机子也重装了 ...

外站的话会出现其他国度的语言么？