设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 16296|回复: 25

[RMVX发布] 简易的ACT最终修正版

 关闭 [复制链接]

Lv2.观梦者

傻♂逼

梦石
0
星屑
308
在线时间
1601 小时
注册时间
2007-3-13
帖子
6566

烫烫烫开拓者

发表于 2008-6-9 00:30:33 | 显示全部楼层 |阅读模式

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

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

x
注意,必须做以下工作:

更改移动速度为5或更高

频率为4或更高


这是本系统的最后一次修正.
严重的问题都已经纠正.
但是手感问题比较严重.
请下载范例,不提供无聊问题的答案,不要问如怎么用这类的问题
可爱的范例:http://rpg.blue/upload_program/files/ACT1_93371328.rar
脚本内容:
ACT0.3Program
〉Main
   
  1. $use = false #脚本开关
  2. $airjump = 2  #空中连跳
  3. $hight = 3
  4. #==============================================================================
  5. # 本脚本来自www.66RPG.com,使用和转载请保留此信息
  6. #==============================================================================
  7. #==============================================================================
  8. # ■ Game_Player
  9. #------------------------------------------------------------------------------
  10. #  处理主角的类。事件启动的判定、以及地图的滚动等功能。
  11. # 本类的实例请参考 $game_player。
  12. #==============================================================================

  13. class Game_Player < Game_Character
  14.   #--------------------------------------------------------------------------
  15.   # ● 常量
  16.   #--------------------------------------------------------------------------
  17.   CENTER_X = (544 / 2 - 16) * 8     # 画面中央 X 座标 * 8
  18.   CENTER_Y = (416 / 2 - 16) * 8     # 画面中央 Y 座标 * 8
  19.   #--------------------------------------------------------------------------
  20.   # ● 定义实例变量
  21.   #--------------------------------------------------------------------------
  22.   attr_reader   :vehicle_type       # 目前乘坐交通工具类型
  23.   #--------------------------------------------------------------------------
  24.   # ● 初始化对像
  25.   #--------------------------------------------------------------------------
  26.   def initialize
  27.     super
  28.     @vehicle_type = -1
  29.     @vehicle_getting_on = false     # 乘坐交通工具标志
  30.     @vehicle_getting_off = false    # 离开交通工具标志
  31.     @transferring = false           # 场所移动标志
  32.     @new_map_id = 0                 # 目标地图 ID
  33.     @new_x = 0                      # 目标 X 座标
  34.     @new_y = 0                      # 目标 Y 座标
  35.     @new_direction = 0              # 移动後方向
  36.     @walking_bgm = nil              # 记忆用行走时 BGM
  37.     @line_jp = 0
  38.     @cont = 2
  39.     @upcont = 0
  40.   end

  41.   #--------------------------------------------------------------------------
  42.   # ● 方向键移动处理
  43.   #--------------------------------------------------------------------------
  44.   def move_by_input
  45.     if @upcont > 0
  46.       move_up(false,true)
  47.       @upcont -= 1
  48.     end
  49.     if $use == false
  50.       return unless movable?
  51.       return if $game_map.interpreter.running?
  52.       case Input.dir4
  53.         when 2;  move_down
  54.         when 4;  move_left
  55.         when 6;  move_right
  56.         when 8;  move_up
  57.       end
  58.     end
  59.     if $use and @vehicle_type == -1
  60.       return if $game_map.interpreter.running?
  61.       
  62.       @cont -=1  
  63.       return unless movable?
  64.       if Input.dir4 == 8 and @line_jp <= $airjump
  65.         up1
  66.         @line_jp += 1
  67.       end
  68.       case Input.dir4
  69.         #when 2;  move_down
  70.         when 4;  move_left
  71.         when 6;  move_right#
  72.         
  73.         #when 8;  up1#up1
  74.       end
  75.       
  76.       if passable?(@x, @y+1) #and @cont <= 0
  77.         move_down(false,true)
  78.         check_event_trigger_here([0])
  79.         check_event_trigger_there([0,1,2])
  80.         @cont = 1
  81.       else
  82.         if @line_jp > 0
  83.           @line_jp = 0
  84.         end
  85.       end

  86.     end
  87.    
  88.   end
  89.     def up1
  90.       
  91.       #for i in 1..$hight
  92.             
  93.           #  check_event_trigger_here([0])
  94.           #  check_event_trigger_there([0,1,2])
  95.        #   end
  96.        @upcont = $hight

  97.   end
  98. #  def popbomb
  99. #   
  100. #  end
  101. end
  102. #==============================================================================
  103. # 本脚本来自www.66RPG.com,使用和转载请保留此信息
  104. #==============================================================================
复制代码

〉Edit
   
  1. #==============================================================================
  2. # ■ Game_Character
  3. #------------------------------------------------------------------------------
  4. #  处理角色的类。本类作为 Game_Player 类与 Game_Event 类的超级类使用。
  5. #==============================================================================

  6. class Game_Character
  7.   #--------------------------------------------------------------------------
  8.   # ● 向上移动
  9.   #     turn_ok : 允许当场转向
  10.   #--------------------------------------------------------------------------
  11.   def move_up(turn_ok = true,act = false)
  12.     if passable?(@x, @y-1)                  # 可通行的场合
  13.       turn_up if turn_ok
  14.       @y = $game_map.round_y(@y-1)
  15.       @real_y = (@y+1)*256
  16.       increase_steps if not act
  17.       #check_event_trigger_touch(@x, @y-1) if act  # 是否触发接触事件
  18.       @move_failed = false
  19.     else                                    # 不可通行的场合
  20.       turn_up if turn_ok
  21.       check_event_trigger_touch(@x, @y-1)   # 是否触发接触事件
  22.       @move_failed = true
  23.     end
  24.   end
  25.   #--------------------------------------------------------------------------
  26.   # ● 向下移动
  27.   #     turn_ok : 允许当场转向
  28.   #--------------------------------------------------------------------------
  29.   def move_down(turn_ok = true,act = false)
  30.     if passable?(@x, @y+1)                  # 可通行的场合
  31.       turn_down if turn_ok
  32.       @y = $game_map.round_y(@y+1)
  33.       @real_y = (@y-1)*256
  34.       increase_steps if not act
  35.       #check_event_trigger_touch(@x, @y-1) if act
  36.       @move_failed = false
  37.     else                                    # 不可通行的场合
  38.       turn_down if turn_ok
  39.       check_event_trigger_touch(@x, @y+1)   # 是否触发接触事件
  40.       @move_failed = true
  41.     end
  42.   end

  43. end





  44. #==============================================================================
  45. # ■ Game_Event
  46. #------------------------------------------------------------------------------
  47. #  处理事件的类。条件判断、事件页的切换、并行处理、执行事件功能
  48. # 在 Game_Map 类的内部使用。
  49. #==============================================================================

  50. class Game_Event < Game_Character
  51.   #--------------------------------------------------------------------------
  52.   # ● 我是敌人吗?
  53.   #--------------------------------------------------------------------------
  54.   def check_enemy
  55.     return if @erased
  56.     cx = $game_player.x
  57.     cy = $game_player.y
  58.     ev = $game_map.events[@id]
  59.     if ((cx == ev.x) and (cy == ev.y)) and (@event.name == "enemy")
  60.       $win = true
  61.   #    p "Kill"
  62.       start
  63.       erase
  64.       
  65.     end
  66.     if (((cx == ev.x+1) and (cy == ev.y)) and (@event.name == "enemy")) or
  67.       (((cx == ev.x-1) and (cy == ev.y)) and (@event.name == "enemy"))
  68. #     p "Died"
  69.       $died = true
  70.       start
  71.       erase
  72.       
  73.     end
  74.   end
  75. end


  76. #==============================================================================
  77. # ■ Scene_Map
  78. #------------------------------------------------------------------------------
  79. #  处理地图画面的类。
  80. #==============================================================================

  81. class Scene_Map < Scene_Base
  82.   #--------------------------------------------------------------------------
  83.   # ● 更新画面
  84.   #--------------------------------------------------------------------------
  85.   def update
  86.     super
  87.     $game_map.interpreter.update      # 更新解释器
  88.     $game_map.update                  # 更新地图
  89.     $game_player.update               # 更新主角
  90.     $game_system.update               # 更新计时器
  91.     @spriteset.update                 # 更新活动块组
  92.     @message_window.update            # 更新信息窗口
  93.     unless $game_message.visible      # 信息窗口显示中除外
  94.       for i in 0..$game_map.events.keys.size
  95.         if $game_map.events[i] != nil
  96. #          $game_map.events[i].check_box
  97.           $game_map.events[i].check_enemy
  98.         end
  99.       end
  100.       update_transfer_player
  101.       update_encounter
  102.       update_call_menu
  103.       update_call_debug
  104.       update_scene_change
  105.     end
  106.   end
  107. end
复制代码

〉EvDrop
   
  1. #==============================================================================
  2. # ■ Game_Event
  3. #------------------------------------------------------------------------------
  4. #  处理事件的类。条件判断、事件页的切换、并行处理、执行事件功能
  5. # 在 Game_Map 类的内部使用。
  6. #==============================================================================

  7. class Game_Event < Game_Character
  8.   #--------------------------------------------------------------------------
  9.   # ● 更新画面
  10.   #--------------------------------------------------------------------------
  11.   def update
  12.     super
  13.     check_event_trigger_auto                    # 自动事件启动判定
  14.     if @interpreter != nil                      # 并行处理的情况下
  15.       unless @interpreter.running?              # 不在执行中的场合的情况下
  16.         @interpreter.setup(@list, @event.id)    # 设置事件
  17.       end
  18.       @interpreter.update                       # 更新解释器
  19.     end
  20.     return if $use == false
  21.     if ($game_player.passable?(@x, @y+1)) and (@event.name != "box") #and @cont <= 0
  22.         move_down(false,true)
  23.     end
  24.   end
  25. end
复制代码
哎呀,蛋疼什么的最有爱了

Lv3.寻梦者 (暗夜天使)

名侦探小柯

梦石
0
星屑
2077
在线时间
3473 小时
注册时间
2006-9-6
帖子
37329

开拓者贵宾第3届短篇游戏大赛主流游戏组亚军第5届短篇游戏比赛亚军

发表于 2008-6-9 00:39:02 | 显示全部楼层
手感是个大问题……
Lofter个站:点击进入吧 不要犹豫了come on baby! (闲水、游戏预告、游戏发布)

回复 支持 反对

使用道具 举报

Lv2.观梦者

傻♂逼

梦石
0
星屑
308
在线时间
1601 小时
注册时间
2007-3-13
帖子
6566

烫烫烫开拓者

 楼主| 发表于 2008-6-9 00:58:52 | 显示全部楼层
以下引用越前リョーマ于2008-6-8 16:39:02的发言:

手感是个大问题……

更改速度后就没有手感问题了(虽然稍微有一点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点点
哎呀,蛋疼什么的最有爱了
回复 支持 反对

使用道具 举报

Lv2.观梦者

傻♂逼

梦石
0
星屑
308
在线时间
1601 小时
注册时间
2007-3-13
帖子
6566

烫烫烫开拓者

 楼主| 发表于 2008-6-25 22:08:41 | 显示全部楼层
顶一下
回复 支持 反对

使用道具 举报

Lv3.寻梦者 (暗夜天使)

名侦探小柯

梦石
0
星屑
2077
在线时间
3473 小时
注册时间
2006-9-6
帖子
37329

开拓者贵宾第3届短篇游戏大赛主流游戏组亚军第5届短篇游戏比赛亚军

发表于 2008-6-28 21:52:31 | 显示全部楼层
话说测试了感觉怪怪的……

重力好像比较小……不适合地球……
Lofter个站:点击进入吧 不要犹豫了come on baby! (闲水、游戏预告、游戏发布)

回复 支持 反对

使用道具 举报

Lv2.观梦者

傻♂逼

梦石
0
星屑
308
在线时间
1601 小时
注册时间
2007-3-13
帖子
6566

烫烫烫开拓者

 楼主| 发表于 2008-6-28 22:05:27 | 显示全部楼层
以下引用越前リョーマ于2008-6-28 13:52:31的发言:

话说测试了感觉怪怪的……

重力好像比较小……不适合地球……

改天做个游戏叫: 越前リョーマ上火星
哎呀,蛋疼什么的最有爱了
回复 支持 反对

使用道具 举报

Lv1.梦旅人

6R文字专区写手

梦石
0
星屑
50
在线时间
15 小时
注册时间
2007-5-11
帖子
1486
发表于 2008-7-21 06:03:57 | 显示全部楼层
干嘛范例有问题?
回复 支持 反对

使用道具 举报

Lv2.观梦者

傻♂逼

梦石
0
星屑
308
在线时间
1601 小时
注册时间
2007-3-13
帖子
6566

烫烫烫开拓者

 楼主| 发表于 2008-7-21 21:37:46 | 显示全部楼层
以下引用恺撒亮于2008-7-20 22:03:57的发言:

干嘛范例有问题?

哎呀,蛋疼什么的最有爱了
回复 支持 反对

使用道具 举报

Lv2.观梦者

傻♂逼

梦石
0
星屑
308
在线时间
1601 小时
注册时间
2007-3-13
帖子
6566

烫烫烫开拓者

 楼主| 发表于 2008-8-21 22:58:53 | 显示全部楼层
顶起
回复 支持 反对

使用道具 举报

Lv3.寻梦者 (暗夜天使)

名侦探小柯

梦石
0
星屑
2077
在线时间
3473 小时
注册时间
2006-9-6
帖子
37329

开拓者贵宾第3届短篇游戏大赛主流游戏组亚军第5届短篇游戏比赛亚军

发表于 2008-8-22 00:54:29 | 显示全部楼层
以下引用yangff于2008-8-21 14:58:53的发言:

顶起

真够囧的,没见过你这么顶的……
Lofter个站:点击进入吧 不要犹豫了come on baby! (闲水、游戏预告、游戏发布)

回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:fux2@moe9th.com|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2019-1-19 07:38

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表