伪"注册用户"登陆帐号密码系统(范例工程紧急修正)

TERENCE

不知道大家还记不记得6R站上gpra8764的片头制作教程-事件版

此系统灵感来自：
gpra8764的片头制作教程事件版(http://rpg.blue/web/htm/news828.htm)

功能：
在进入游戏标题画面前，要求玩家先登陆"帐号"及"密码"

教学：
1.首先把脚本中的Window_NameInput做一点点的修改。
在Window_NameInput中你会找到输入名称的文字(日文)如下
參考:
http://rpg.blue/viewthread.php?t ... D2%2D8+22%3A17%3A52

1.   CHARACTER_TABLE =
   
2.   [
   
3.     "あ","い","う","え","お",
   
4.     "か","き","く","け","こ",
   
5.     "さ","し","す","せ","そ",
   
6.     "た","ち","つ","て","と",
   
7.     "な","に","ぬ","ね","の",
   
8.     "は","ひ","ふ","へ","ほ",
   
9.     "ま","み","む","め","も",
   
10.     "や", "" ,"ゆ", "" ,"よ",
    
11.     "ら","り","る","れ","ろ",
    
12.     "わ", "" ,"を", "" ,"ん",
    
13.     "が","ぎ","ぐ","げ","ご",
    
14.     "ざ","じ","ず","ぜ","ぞ",
    
15.     "だ","ぢ","づ","で","ど",
    
16.     "ば","び","ぶ","べ","ぼ",
    
17.     "ぱ","ぴ","ぷ","ぺ","ぽ",
    
18.     "ゃ","ゅ","ょ","っ","ゎ",
    
19.     "ぁ","ぃ","ぅ","ぇ","ぉ",
    
20.     "ー","", "" , "" , "" ,
    
21.     "ア","イ","ウ","エ","オ",
    
22.     "カ","キ","ク","ケ","コ",
    
23.     "サ","シ","ス","セ","ソ",
    
24.     "タ","チ","ツ","テ","ト",
    
25.     "ナ","ニ","ヌ","ネ","ノ",
    
26.     "ハ","ヒ","フ","ヘ","ホ",
    
27.     "マ","ミ","ム","メ","モ",
    
28.     "ヤ", "" ,"ユ", "" ,"ヨ",
    
29.     "ラ","リ","ル","レ","ロ",
    
30.     "ワ", "" ,"ヲ", "" ,"ン",
    
31.     "ガ","ギ","グ","ゲ","ゴ",
    
32.     "ザ","ジ","ズ","ゼ","ゾ",
    
33.     "ダ","ヂ","ヅ","デ","ド",
    
34.     "バ","ビ","ブ","ベ","ボ",
    
35.     "パ","ピ","プ","ペ","ポ",
    
36.     "ャ","ュ","ョ","ッ","ヮ",
    
37.     "ァ","ィ","ゥ","ェ","ォ",
    
38.     "ー","","ヴ", "" , "" ,
    
39.   ]

复制代码

然后用以下取代原来的名称的文字
(注:你也可以自行修改你想要使用的文字)

1.   CHARACTER_TABLE =
   
2.   [
   
3.     "A","B","C","D","E",
   
4.     "F","G","H","I","J",
   
5.     "K","L","M","N","O",
   
6.     "P","Q","R","S","T",
   
7.     "U","V","W","X","Y",
   
8.     "Z"," "," "," "," ",
   
9.     "a","b","c","d","e",
   
10.     "f", "g" ,"h", "i" ,"j",
    
11.     "k","l","m","n","o",
    
12.     "p", "q" ,"r", "s" ,"t",
    
13.     "u","v","w","x","y",
    
14.     "z"," "," "," "," ",
    
15.     "α","β","γ","δ","ε",
    
16.     "ζ","η","θ","ι","κ",
    
17.     "λ","μ","ν","ξ","ο",
    
18.     "π", "ρ" ,"τ", "υ" ,"φ",
    
19.     "χ","ψ","ω",""," ",
    
20.     "￥", "€" ,"￠", "￡" ,"〒",
    
21.     "Γ","Δ","Θ","Λ","Ξ",
    
22.     "Π","Σ","Υ","Φ","Ψ",
    
23.     "Ω"," "," "," "," ",
    
24.     "0","1","2","3","4",
    
25.     "5","6","7","8","9",
    
26.     "♀","♂","△","▲","◇",
    
27.     "◆","□","■","○","●",
    
28.     "◎","★","☆","※"," ",
    
29.     "~","!","@","#","$",
    
30.     "%","^","&","*","-",
    
31.     "(",")",":","?","+",
    
32.     "-","=", "|" , "<" , ">" ,
    
33.     "[","]","{","}","∥",
    
34.     "§","《","》","【","】",
    
35.     "↑","↓","←","→"," ",
    
36.     "↖","↗","↙","↘"," ",
    
37.     "⊕","⊙","℃","℉","°",
    
38.     " "," "," ", " " , " " ,
    
39.   ]

复制代码

2.在数据库中设置一个"空白"的角色:


3.把修改好的Sence_Title脚本贴上(脚本By gpra8764)

1. #==============================================================================
   
2. # ■ Scene_Title
   
3. #------------------------------------------------------------------------------
   
4. # 　处理标题画面的类。
   
5. #==============================================================================
   
6. 
   
7. class Scene_Title
   
8.   #--------------------------------------------------------------------------
   
9.   # ● 主处理
   
10.   #--------------------------------------------------------------------------
    
11.   def main
    
12.     # 战斗测试的情况下
    
13.     if $BTEST
    
14.       battle_test
    
15.       return
    
16.     end
    
17.     # 载入数据库
    
18.     $data_actors        = load_data("Data/Actors.rxdata")
    
19.     $data_classes       = load_data("Data/Classes.rxdata")
    
20.     $data_skills        = load_data("Data/Skills.rxdata")
    
21.     $data_items         = load_data("Data/Items.rxdata")
    
22.     $data_weapons       = load_data("Data/Weapons.rxdata")
    
23.     $data_armors        = load_data("Data/Armors.rxdata")
    
24.     $data_enemies       = load_data("Data/Enemies.rxdata")
    
25.     $data_troops        = load_data("Data/Troops.rxdata")
    
26.     $data_states        = load_data("Data/States.rxdata")
    
27.     $data_animations    = load_data("Data/Animations.rxdata")
    
28.     $data_tilesets      = load_data("Data/Tilesets.rxdata")
    
29.     $data_common_events = load_data("Data/CommonEvents.rxdata")
    
30.     $data_system        = load_data("Data/System.rxdata")
    
31.     # 生成系统对像
    
32.     $game_system = Game_System.new
    
33.     # 进入事件显示LOGO，如果您不想在调试时总是显示LOGO就加上下一行中注释部分
    
34.     if $show_logo # and !$DEBUG
    
35.       # 设置标记变量保证下次回到标题画面不会再显示片头
    
36.       $show_logo = false
    
37.       # 重置测量游戏时间用的画面计数器
    
38.       Graphics.frame_count = 0
    
39.       # 生成各种游戏对像
    
40.       $game_temp          = Game_Temp.new
    
41.       $game_system        = Game_System.new
    
42.       $game_switches      = Game_Switches.new
    
43.       $game_variables     = Game_Variables.new
    
44.       $game_self_switches = Game_SelfSwitches.new
    
45.       $game_screen        = Game_Screen.new
    
46.       $game_actors        = Game_Actors.new
    
47.       $game_party         = Game_Party.new
    
48.       $game_troop         = Game_Troop.new
    
49.       $game_map           = Game_Map.new
    
50.       $game_player        = Game_Player.new
    
51.       # 设置初期同伴位置
    
52.       $game_party.setup_starting_members
    
53.       # 设置初期位置的地图
    
54.       $game_map.setup($data_system.start_map_id)
    
55.       # 主角向初期位置移动
    
56.       $game_player.moveto($data_system.start_x, $data_system.start_y)
    
57.       # 刷新主角
    
58.       $game_player.refresh
    
59.       # 执行地图设置的 BGM 与 BGS 的自动切换
    
60.       $game_map.autoplay
    
61.       # 刷新地图 (执行并行事件)
    
62.       $game_map.update
    
63.       # 与真正的新游戏唯一不同就是将变量1设置一个标记值(暂用8764)
    
64.       $game_variables[1]=8764
    
65.       # 主角暂时是不能显示出来的……
    
66.       $game_player.transparent = true
    
67.       # 切换地图画面
    
68.       $scene = Scene_Map.new
    
69.     # 否则是默认显示标题画面
    
70.     else
    
71.       # 生成标题图形
    
72.       @sprite = Sprite.new
    
73.       @sprite.bitmap = RPG::Cache.title($data_system.title_name)
    
74.       # 生成命令窗口
    
75.       s1 = "新的游戏"
    
76.       s2 = "读取记录"
    
77.       s3 = "退出游戏"
    
78.       @command_window = Window_Command.new(192, [s1, s2, s3])
    
79.       @command_window.back_opacity = 160
    
80.       @command_window.x = 320 - @command_window.width / 2
    
81.       @command_window.y = 288
    
82.       # 判定继续的有效性
    
83.       # 存档文件一个也不存在的时候也调查
    
84.       # 有効为 @continue_enabled 为 true、無効为 false
    
85.       @continue_enabled = false
    
86.       for i in 0..3
    
87.         if FileTest.exist?("Save#{i+1}.rxdata")
    
88.           @continue_enabled = true
    
89.         end
    
90.       end
    
91.       # 继续为有效的情况下、光标停止在继续上
    
92.       # 无效的情况下、继续的文字显示为灰色
    
93.       if @continue_enabled
    
94.         @command_window.index = 1
    
95.       else
    
96.         @command_window.disable_item(1)
    
97.       end
    
98.       # 演奏标题 BGM
    
99.       $game_system.bgm_play($data_system.title_bgm)
    
100.       # 停止演奏 ME、BGS
     
101.       Audio.me_stop
     
102.       Audio.bgs_stop
     
103.       # 执行过渡
     
104.       Graphics.transition
     
105.       # 主循环
     
106.       loop do
     
107.         # 刷新游戏画面
     
108.         Graphics.update
     
109.         # 刷新输入信息
     
110.         Input.update
     
111.         # 刷新画面
     
112.         update
     
113.         # 如果画面被切换就中断循环
     
114.         if $scene != self
     
115.           break
     
116.         end
     
117.       end
     
118.       # 装备过渡
     
119.       Graphics.freeze
     
120.       # 释放命令窗口
     
121.       @command_window.dispose
     
122.       # 释放标题图形
     
123.       @sprite.bitmap.dispose
     
124.       @sprite.dispose
     
125.     end
     
126.   end
     
127.   #--------------------------------------------------------------------------
     
128.   # ● 刷新画面
     
129.   #--------------------------------------------------------------------------
     
130.   def update
     
131.     # 刷新命令窗口
     
132.     @command_window.update
     
133.     # 按下 C 键的情况下
     
134.     if Input.trigger?(Input::C)
     
135.       # 命令窗口的光标位置的分支
     
136.       case @command_window.index
     
137.       when 0  # 新游戏
     
138.         command_new_game
     
139.       when 1  # 继续
     
140.         command_continue
     
141.       when 2  # 退出
     
142.         command_shutdown
     
143.       end
     
144.     end
     
145.   end
     
146.   #--------------------------------------------------------------------------
     
147.   # ● 命令 : 新游戏
     
148.   #--------------------------------------------------------------------------
     
149.   def command_new_game
     
150.     # 演奏确定 SE
     
151.     $game_system.se_play($data_system.decision_se)
     
152.     # 停止 BGM
     
153.     Audio.bgm_stop
     
154.     # 重置测量游戏时间用的画面计数器
     
155.     Graphics.frame_count = 0
     
156.     # 生成各种游戏对像
     
157.     $game_temp          = Game_Temp.new
     
158.     $game_system        = Game_System.new
     
159.     $game_switches      = Game_Switches.new
     
160.     $game_variables     = Game_Variables.new
     
161.     $game_self_switches = Game_SelfSwitches.new
     
162.     $game_screen        = Game_Screen.new
     
163.     $game_actors        = Game_Actors.new
     
164.     $game_party         = Game_Party.new
     
165.     $game_troop         = Game_Troop.new
     
166.     $game_map           = Game_Map.new
     
167.     $game_player        = Game_Player.new
     
168.     # 设置初期同伴位置
     
169.     $game_party.setup_starting_members
     
170.     # 设置初期位置的地图
     
171.     $game_map.setup($data_system.start_map_id)
     
172.     # 主角向初期位置移动
     
173.     $game_player.moveto($data_system.start_x, $data_system.start_y)
     
174.     # 刷新主角
     
175.     $game_player.refresh
     
176.     # 执行地图设置的 BGM 与 BGS 的自动切换
     
177.     $game_map.autoplay
     
178.     # 刷新地图 (执行并行事件)
     
179.     $game_map.update
     
180.     # 主角暂时是不能显示出来的……
     
181.     $game_player.transparent = true
     
182.     # 切换地图画面
     
183.     $scene = Scene_Map.new
     
184.   end
     
185.   #--------------------------------------------------------------------------
     
186.   # ● 命令 : 继续
     
187.   #--------------------------------------------------------------------------
     
188.   def command_continue
     
189.     # 继续无效的情况下
     
190.     unless @continue_enabled
     
191.       # 演奏无效 SE
     
192.       $game_system.se_play($data_system.buzzer_se)
     
193.       return
     
194.     end
     
195.     # 演奏确定 SE
     
196.     $game_system.se_play($data_system.decision_se)
     
197.     # 切换到读档画面
     
198.     $scene = Scene_Load.new
     
199.   end
     
200.   #--------------------------------------------------------------------------
     
201.   # ● 命令 : 退出
     
202.   #--------------------------------------------------------------------------
     
203.   def command_shutdown
     
204.     # 演奏确定 SE
     
205.     $game_system.se_play($data_system.decision_se)
     
206.     # BGM、BGS、ME 的淡入淡出
     
207.     Audio.bgm_fade(800)
     
208.     Audio.bgs_fade(800)
     
209.     Audio.me_fade(800)
     
210.     # 退出
     
211.     $scene = nil
     
212.   end
     
213.   #--------------------------------------------------------------------------
     
214.   # ● 战斗测试
     
215.   #--------------------------------------------------------------------------
     
216.   def battle_test
     
217.     # 载入数据库 (战斗测试用)
     
218.     $data_actors        = load_data("Data/BT_Actors.rxdata")
     
219.     $data_classes       = load_data("Data/BT_Classes.rxdata")
     
220.     $data_skills        = load_data("Data/BT_Skills.rxdata")
     
221.     $data_items         = load_data("Data/BT_Items.rxdata")
     
222.     $data_weapons       = load_data("Data/BT_Weapons.rxdata")
     
223.     $data_armors        = load_data("Data/BT_Armors.rxdata")
     
224.     $data_enemies       = load_data("Data/BT_Enemies.rxdata")
     
225.     $data_troops        = load_data("Data/BT_Troops.rxdata")
     
226.     $data_states        = load_data("Data/BT_States.rxdata")
     
227.     $data_animations    = load_data("Data/BT_Animations.rxdata")
     
228.     $data_tilesets      = load_data("Data/BT_Tilesets.rxdata")
     
229.     $data_common_events = load_data("Data/BT_CommonEvents.rxdata")
     
230.     $data_system        = load_data("Data/BT_System.rxdata")
     
231.     # 重置测量游戏时间用的画面计数器
     
232.     Graphics.frame_count = 0
     
233.     # 生成各种游戏对像
     
234.     $game_temp          = Game_Temp.new
     
235.     $game_system        = Game_System.new
     
236.     $game_switches      = Game_Switches.new
     
237.     $game_variables     = Game_Variables.new
     
238.     $game_self_switches = Game_SelfSwitches.new
     
239.     $game_screen        = Game_Screen.new
     
240.     $game_actors        = Game_Actors.new
     
241.     $game_party         = Game_Party.new
     
242.     $game_troop         = Game_Troop.new
     
243.     $game_map           = Game_Map.new
     
244.     $game_player        = Game_Player.new
     
245.     # 设置战斗测试用同伴
     
246.     $game_party.setup_battle_test_members
     
247.     # 设置队伍 ID、可以逃走标志、战斗背景
     
248.     $game_temp.battle_troop_id = $data_system.test_troop_id
     
249.     $game_temp.battle_can_escape = true
     
250.     $game_map.battleback_name = $data_system.battleback_name
     
251.     # 演奏战斗开始 BGM
     
252.     $game_system.se_play($data_system.battle_start_se)
     
253.     # 演奏战斗 BGM
     
254.     $game_system.bgm_play($game_system.battle_bgm)
     
255.     # 切换到战斗画面
     
256.     $scene = Scene_Battle.new
     
257.   end
     
258. end
     

复制代码

4.修改Main(脚本修改By gpra8764)

1. #==============================================================================
   
2. # ■ Main
   
3. #------------------------------------------------------------------------------
   
4. # 　各定义结束后、从这里开始实际处理。
   
5. #==============================================================================
   
6. 
   
7. begin
   
8.   # 准备过渡
   
9.   # 设置系统默认字体
   
10.   Font.default_name = (["黑体"])
    
11.   Graphics.freeze
    
12.   # 增加变量，用于显示LOGO
    
13.   $show_logo = true
    
14.   # 生成场景对像 (标题画面)
    
15.   $scene = Scene_Title.new
    
16.   # $scene 为有效的情况下调用 main 过程
    
17.   while $scene != nil
    
18.     $scene.main
    
19.   end
    
20.   # 淡入淡出
    
21.   Graphics.transition(20)
    
22. rescue Errno::ENOENT
    
23.   # 补充 Errno::ENOENT 以外错误
    
24.   # 无法打开文件的情况下、显示信息后结束
    
25.   filename = $!.message.sub("No such file or directory - ", "")
    
26.   print("找不到文件 #{filename}。 ")
    
27. end

复制代码

5.在事件开始地图上添加一个为“自动执行”的事件，在里面首先需要加入一个条件分支。在变量1=8764的时候写的事件就是片头显示事件，否则就是正常游戏部分的事件。这里为了显示"帐号"及"密码"的时候不会因为有地图背景而显得奇怪，建议特别的制作一张空地图来做游戏开始地图。需要格外注意的一点就是，记得一定要返回标题画面(本叙修改自"gpra8764的片头制作教程-事件版")

6.范例工程(有添加修改一点点效果，也没很多，不影响!)
http://rpg.blue/UP_PIC/200801/事件版(修正)_83018148.rar

帐号:TERENCE
密码:12345

范例工程如有误请告知，THANKS!!

q2571875

支持支持{/se}

TERENCE

范例工程有小错误，修正:
http://rpg.blue/upload_program/f ... ��正)_83018148.rar

莳绱主锍

按进入后还是那张图...{/gg}

TERENCE

以下引用莳绱主锍于2008-2-9 20:54:05的发言：

按进入后还是那张图...

修正范例工程，在你的頭上

TERENCE

一楼的范例工程也修改了！
{/gg}汗～事件错误，对不起，偶的錯！

yujianing

啊,非常不错,用处很大哦