谁有《冒险物语》中的得失物品脚本

575539640

谁有《冒险物语》中的得失物品脚本


求    《冒险物语》中的得失物品脚本




帮个忙，谢谢

小小刀886

1. #==============================================================================
   
2. # ★RGSS2
   
3. # STEMB_マップエフェクトベース v0.8
   
4. #
   
5. # ・エフェクト表示のための配列定義、フレーム更新、ビューポート関連付け
   
6. #
   
7. #==============================================================================
   
8. # ■ Game_Temp
   
9. #==============================================================================
   
10. class Game_Temp
    
11.   #--------------------------------------------------------------------------
    
12.   # ● 公開インスタンス変数
    
13.   #--------------------------------------------------------------------------
    
14.   attr_accessor :streffect
    
15.   #--------------------------------------------------------------------------
    
16.   # ● オブジェクト初期化
    
17.   #--------------------------------------------------------------------------
    
18.   alias initialize_stref initialize
    
19.   def initialize
    
20.     initialize_stref
    
21.     @streffect = []
    
22.   end
    
23. end
    
24. #==============================================================================
    
25. # ■ Spriteset_Map
    
26. #==============================================================================
    
27. class Spriteset_Map
    
28.   #--------------------------------------------------------------------------
    
29.   # ● エフェクトの作成
    
30.   #--------------------------------------------------------------------------
    
31.   def create_streffect
    
32.     $game_temp.streffect = []
    
33.   end
    
34.   #--------------------------------------------------------------------------
    
35.   # ● エフェクトの解放
    
36.   #--------------------------------------------------------------------------
    
37.   def dispose_streffect
    
38.     for i in 0...$game_temp.streffect.size
    
39.       $game_temp.streffect[i].dispose if $game_temp.streffect[i] != nil
    
40.     end
    
41.     $game_temp.streffect = []
    
42.   end
    
43.   #--------------------------------------------------------------------------
    
44.   # ● エフェクトの更新
    
45.   #--------------------------------------------------------------------------
    
46.   def update_streffect
    
47.     for i in 0...$game_temp.streffect.size
    
48.       if $game_temp.streffect[i] != nil
    
49.         $game_temp.streffect[i].viewport = @viewport1
    
50.         $game_temp.streffect[i].update
    
51.         $game_temp.streffect.delete_at(i) if $game_temp.streffect[i].disposed?
    
52.       end
    
53.     end
    
54.   end
    
55.   #--------------------------------------------------------------------------
    
56.   # ★ エイリアス
    
57.   #--------------------------------------------------------------------------
    
58.   alias create_parallax_stref create_parallax
    
59.   def create_parallax
    
60.     create_parallax_stref
    
61.     create_streffect
    
62.   end
    
63.   alias dispose_stref dispose
    
64.   def dispose
    
65.     dispose_streffect
    
66.     dispose_stref
    
67.   end
    
68.   alias update_stref update
    
69.   def update
    
70.     update_stref
    
71.     update_streffect
    
72.   end
    
73. end

复制代码

1. #==============================================================================
   
2. # ★RGSS2
   
3. # STR20_入手インフォメーション v1.1 08/08/07
   
4. # サポート：http://otsu.cool.ne.jp/strcatyou/
   
5. # ◇必須スクリプト　STEMB_マップエフェクトベース
   
6. #
   
7. # ・マップ画面にアイテム入手・スキル修得などの際に表示するインフォです。
   
8. # ・表示内容は 任意指定の名目+アイテム名+ヘルプメッセージとなります。
   
9. # ・アイテムのメモ欄に info[/任意の文字列/] と記述することで
   
10. # 　通常とは別の説明文をインフォに表示させることができます。(v1.1)
    
11. # [仕様]インフォが表示されている間も移動できます。
    
12. # 　　　移動させたくない場合はウェイトを入れてください。
    
13. #------------------------------------------------------------------------------
    
14. #
    
15. # 更新履歴
    
16. # ◇1.0→1.1
    
17. #　通常とは別の説明文をインフォに表示できるようになった
    
18. #
    
19. #==============================================================================
    
20. # ■ Window_Getinfo
    
21. #==============================================================================
    
22. class Window_Getinfo < Window_Base
    
23.   # 設定箇所
    
24.   G_ICON  = 205   # ゴールド入手インフォに使用するアイコンインデックス
    
25.   Y_TYPE  = 1     # Y座標の位置(0 = 上基準　1 = 下基準)
    
26.   Z       = 230   # Z座標(問題が起きない限り変更しないでください)
    
27.   TIME    = 120   # インフォ表示時間(1/60sec)
    
28.   OPACITY = 32    # 透明度変化スピード
    
29.   B_COLOR = Color.new(0, 0, 0, 160)        # インフォバックの色
    
30.   INFO_SE = RPG::SE.new("magic", 100, 150) # インフォ表示時の効果音
    
31.   STR20W  = "info"# メモ設定ワード(※なるべく変更しないでください)
    
32. end
    
33. #
    
34. if false
    
35. # ★以下をコマンドのスクリプト等に貼り付けてテキスト表示----------------★
    
36. 
    
37. # 種類 / 0=ｱｲﾃﾑ 1=武器 2=防具 3=ｽｷﾙ 4=金
    
38. type = 0
    
39. # ID  / 金の場合は金額を入力
    
40. id   = 1
    
41. # 入手テキスト / 金の場合無効
    
42. text = "アイテム入手！"
    
43. #
    
44. e = $game_temp.streffect
    
45. e.push(Window_Getinfo.new(id, type, text))
    
46. 
    
47. # ★ここまで------------------------------------------------------------★
    
48. #
    
49. # ◇スキル修得時などにアクター名を直接打ち込むと
    
50. # 　アクターの名前が変えられるゲームなどで問題が生じます。
    
51. # 　なので、以下のようにtext部分を改造するといいかもしれません。
    
52. #
    
53. # 指定IDのアクターの名前取得
    
54. t = $game_actors[1].name
    
55. text = t + " / スキル修得！"
    
56. #
    
57. end
    
58. #==============================================================================
    
59. # ■ Window_Getinfo
    
60. #==============================================================================
    
61. class Window_Getinfo < Window_Base
    
62.   #--------------------------------------------------------------------------
    
63.   # ● オブジェクト初期化
    
64.   #     actor : アクター
    
65.   #--------------------------------------------------------------------------
    
66.   def initialize(id, type, text = "")
    
67.     super(-16, 0, 544 + 32, 38 + 32)
    
68.     self.z = Z
    
69.     self.contents_opacity = 0
    
70.     self.back_opacity = 0
    
71.     self.opacity = 0
    
72.     @count = 0
    
73.     @i = $game_temp.getinfo_size.index(nil)
    
74.     @i = $game_temp.getinfo_size.size if (@i == nil)
    
75.     if Y_TYPE == 0
    
76.       self.y = -14 + (@i * 40)
    
77.     else
    
78.       self.y = 416 - 58 - (@i * 40)
    
79.     end
    
80.     $game_temp.getinfo_size[@i] = true
    
81.     refresh(id, type, text)
    
82.     INFO_SE.play
    
83.   end
    
84.   #--------------------------------------------------------------------------
    
85.   # ● 解放
    
86.   #--------------------------------------------------------------------------
    
87.   def dispose
    
88.     $game_temp.getinfo_size[@i] = nil
    
89.     super
    
90.   end
    
91.   #--------------------------------------------------------------------------
    
92.   # ● フレーム更新
    
93.   #--------------------------------------------------------------------------
    
94.   def update
    
95.     self.viewport = nil
    
96.     @count += 1
    
97.     unless @count >= TIME
    
98.       self.contents_opacity += OPACITY
    
99.     else
    
100.       if Y_TYPE == 0
     
101.         self.y -= 1
     
102.       else
     
103.         self.y += 1
     
104.       end
     
105.       self.contents_opacity -= OPACITY
     
106.       dispose if self.contents_opacity == 0
     
107.     end
     
108.   end
     
109.   #--------------------------------------------------------------------------
     
110.   # ● リフレッシュ
     
111.   #--------------------------------------------------------------------------
     
112.   def refresh(id, type, text = "")
     
113.     case type
     
114.     when 0 ; data = $data_items[id]
     
115.     when 1 ; data = $data_weapons[id]
     
116.     when 2 ; data = $data_armors[id]
     
117.     when 3 ; data = $data_skills[id]
     
118.     when 4 ; data = id
     
119.     else   ; p "typeの値がおかしいです><;"
     
120.     end
     
121.     c = B_COLOR
     
122.     self.contents.fill_rect(0, 14, 225, 24, c)
     
123.     if type < 4
     
124.       draw_item_name(data, 4, 14)
     
125.       self.contents.draw_text(2040, 14, 340, WLH, description(data))
     
126.     else
     
127.       draw_icon(G_ICON, 4, 14)
     
128.       self.contents.draw_text(28, 14, 176, WLH, data.to_s + Vocab::gold)
     
129.     end
     
130.     self.contents.font.size = 14
     
131.     w = self.contents.text_size(text).width
     
132.     self.contents.fill_rect(0, 0, w + 4, 14, c)
     
133.     self.contents.draw_text_f(4, 0, 340, 14, text)
     
134.     Graphics.frame_reset
     
135.   end
     
136.   #--------------------------------------------------------------------------
     
137.   # ● 解説文取得
     
138.   #--------------------------------------------------------------------------
     
139.   def description(data)
     
140.     return $1.gsub!(/[\t\n\r\f]*/,"") if (data.note[/#{STR20W}\[\/(.*)\/\]/im]) != nil
     
141.     return data.description
     
142.   end
     
143. end
     
144. #==============================================================================
     
145. # ■ Game_Temp
     
146. #==============================================================================
     
147. class Game_Temp
     
148.   #--------------------------------------------------------------------------
     
149.   # ● 公開インスタンス変数
     
150.   #--------------------------------------------------------------------------
     
151.   attr_accessor :getinfo_size
     
152.   #--------------------------------------------------------------------------
     
153.   # ● オブジェクト初期化
     
154.   #--------------------------------------------------------------------------
     
155.   alias initialize_str20 initialize
     
156.   def initialize
     
157.     initialize_str20
     
158.     @getinfo_size = []
     
159.   end
     
160. end
     
161. #==============================================================================
     
162. # ■ Bitmap
     
163. #==============================================================================
     
164. class Bitmap
     
165.   #--------------------------------------------------------------------------
     
166.   # ● 文字縁取り描画
     
167.   #--------------------------------------------------------------------------
     
168.   def draw_text_f(x, y, width, height, str, align = 0, color = Color.new(64,32,128))
     
169.     shadow = self.font.shadow
     
170.     b_color = self.font.color.dup
     
171.     font.shadow = false
     
172.     font.color = color
     
173.     draw_text(x + 1, y, width, height, str, align)
     
174.     draw_text(x - 1, y, width, height, str, align)
     
175.     draw_text(x, y + 1, width, height, str, align)
     
176.     draw_text(x, y - 1, width, height, str, align)
     
177.     font.color = b_color
     
178.     draw_text(x, y, width, height, str, align)
     
179.     font.shadow = shadow
     
180.   end
     
181.   def draw_text_f_rect(r, str, align = 0, color = Color.new(64,32,128))
     
182.     draw_text_f(r.x, r.y, r.width, r.height, str, align = 0, color)
     
183.   end
     
184. end
     

复制代码

1. #==============================================================================
   
2. # ★RGSS2
   
3. # STR20p2_インフォ表示物自動入手 08/01/28　scripted by 西瓜
   
4. # サポート：http://otsu.cool.ne.jp/strcatyou/　
   
5. # ◇必須スクリプト　STEMB_マップエフェクトベース
   
6. # 　　　　　　　　　STR20_入手インフォメーション
   
7. #
   
8. # ・インフォで表示されたものと同内容のものを自動的に入手させます(スキルは除く)。
   
9. # ・導入セクション位置はSTR20_入手インフォより下に。
   
10. #
    
11. #==============================================================================
    
12. # ■ Window_Getinfo
    
13. #==============================================================================
    
14. class Window_Getinfo < Window_Base
    
15.   # エイリアス
    
16.   alias snf_getinfo_refresh refresh
    
17.   def refresh(id, type, text = "")
    
18.     snf_getinfo_refresh(id, type, text)
    
19.     case type
    
20.     when 0 ; data = $data_items[id]
    
21.     when 1 ; data = $data_weapons[id]
    
22.     when 2 ; data = $data_armors[id]
    
23.     end
    
24.     if type <= 2
    
25.       $game_party.gain_item(data, 1)
    
26.     elsif type == 4
    
27.       $game_party.gain_gold(id)
    
28.     end
    
29.   end
    
30. end
    

复制代码

三个全部放到main之前~
使用方法：
# type种类 / 0=道具 1=武器 2=防具 3=技能 4=錢
type = 4

# ID物品编号  / 如果是金钱的话直接輸入金钱数量
id   =

# text显示文字 / 提示上面的紫色文字
text = ""

#
e = $game_temp.streffect
e.push(Window_Getinfo.new(id, type, text))

575539640

小小刀886 发表于 2013-4-13 16:03
三个全部放到main之前~
使用方法：
# type种类 / 0=道具 1=武器 2=防具 3=技能 4=錢

非常好用，，谢谢你