Project1

标题: 关于按键秘籍 [打印本页]

---

作者: fofolee    时间: 2007-8-7 19:14
标题: 关于按键秘籍
虽然在努力学习脚本中，仍然有很多问题，下了个按键秘笈脚本，怎么增加调用公共事件的个数呀？相关脚本如下

1. #==============================================================================
   
2. #以下是按键秘籍
   
3. #==============================================================================
   
4.    $mj=[] #在下面设置秘籍
   
5.    $mj[0] = [nil,$R_Key_M,$R_Key_O,$R_Key_N,$R_Key_E,$R_Key_Y]
   
6.    $mj[1] = [nil,$R_Key_I,$R_Key_T,$R_Key_E,$R_Key_M]
   
7.    $mj[2] = [nil,$R_Key_S,$R_Key_A]
   
8.   $mj[3] = [nil,$R_Key_S,$R_Key_P]
   
9. class Scene_Map
   
10.   alias old update
    
11.   def update
    
12.     n = 0
    
13.     for i in 1..190
    
14.       if Kboard.trigger?(i)
    
15.         n = i
    
16.       end
    
17.     end
    
18.     if n > 0 and  $game_switches[1] == true
    
19.       if $open
    
20.         $open = false
    
21.         for @k in @z
    
22.           $open = true if n == $mj[@k][@j[@k]]
    
23.         end
    
24.         for @k in @z
    
25.           if n == $mj[@k][@j[@k]]
    
26.             @j[@k]+=1
    
27.             if @j[@k]==$mj[@k].size
    
28.               #-----成功处理，@k为成功的秘籍编号--------
    
29.               $game_temp.common_event_id = @k+1 #按对后的功能
    
30.               #------------------------------------------
    
31.               @j[@k] = 0
    
32.             end
    
33.           else
    
34.             @j[@k] = 0
    
35.           end
    
36.         end
    
37.       end
    
38.     end
    
39.    
    
40.     if $open != true
    
41.       @z = []
    
42.       @j = []
    
43.       for i in 0..$mj.size-1
    
44.         if n == $mj[i][1]
    
45.           @z.push(i)
    
46.           @j[i] = 2
    
47.           $open = true
    
48.         end
    
49.       end
    
50.     end
    
51.     old
    
52.   end
    
53. end

复制代码

---

作者: fofolee    时间: 2007-8-7 19:14
标题: 关于按键秘籍
虽然在努力学习脚本中，仍然有很多问题，下了个按键秘笈脚本，怎么增加调用公共事件的个数呀？相关脚本如下

1. #==============================================================================
   
2. #以下是按键秘籍
   
3. #==============================================================================
   
4.    $mj=[] #在下面设置秘籍
   
5.    $mj[0] = [nil,$R_Key_M,$R_Key_O,$R_Key_N,$R_Key_E,$R_Key_Y]
   
6.    $mj[1] = [nil,$R_Key_I,$R_Key_T,$R_Key_E,$R_Key_M]
   
7.    $mj[2] = [nil,$R_Key_S,$R_Key_A]
   
8.   $mj[3] = [nil,$R_Key_S,$R_Key_P]
   
9. class Scene_Map
   
10.   alias old update
    
11.   def update
    
12.     n = 0
    
13.     for i in 1..190
    
14.       if Kboard.trigger?(i)
    
15.         n = i
    
16.       end
    
17.     end
    
18.     if n > 0 and  $game_switches[1] == true
    
19.       if $open
    
20.         $open = false
    
21.         for @k in @z
    
22.           $open = true if n == $mj[@k][@j[@k]]
    
23.         end
    
24.         for @k in @z
    
25.           if n == $mj[@k][@j[@k]]
    
26.             @j[@k]+=1
    
27.             if @j[@k]==$mj[@k].size
    
28.               #-----成功处理，@k为成功的秘籍编号--------
    
29.               $game_temp.common_event_id = @k+1 #按对后的功能
    
30.               #------------------------------------------
    
31.               @j[@k] = 0
    
32.             end
    
33.           else
    
34.             @j[@k] = 0
    
35.           end
    
36.         end
    
37.       end
    
38.     end
    
39.    
    
40.     if $open != true
    
41.       @z = []
    
42.       @j = []
    
43.       for i in 0..$mj.size-1
    
44.         if n == $mj[i][1]
    
45.           @z.push(i)
    
46.           @j[i] = 2
    
47.           $open = true
    
48.         end
    
49.       end
    
50.     end
    
51.     old
    
52.   end
    
53. end

复制代码

---

作者: 幻の飞鱼    时间: 2007-8-7 19:19
找到这一段

              #-----成功处理，@k为成功的秘籍编号--------
              $game_temp.common_event_id = @k+1 #按对后的功能
              #------------------------------------------

在里面增加就可以了


其实……比如打开1号公共事件，你还想打开2号的话，就在1号里写一句，启动2号公共事件就好了

---

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

Powered by Discuz! X3.1