Project1

标题: 如何用事件制作一个钓鱼系统 [打印本页]
作者: fox1313304    时间: 2015-5-30 19:33
标题: 如何用事件制作一个钓鱼系统
RT
想做一个带操作的钓鱼系统 但是很苦手……分享2个未成型（也许根本不行）的思路……求大神破解……
……
思路1：装备鱼竿的时候 按住L键钓鱼 松手会出结果
按住L的时候变量1不断增加  然后根据变量1的值出钓鱼结果（比如小于100就是啥也没钓上来、100-200是鱼1 当然这只是个栗子）
……
思路2：屏幕上出现一个横条（显示图片？）然后随机出现几个小圆点在横条上 下面再有个箭头什么的不停的左右走 速度很快
按L的时候箭头停住 如果指到小圆点就钓到了鱼……（这个完全没有想法）
作者: moe2333    时间: 2015-5-31 22:18
本帖最后由 moe2333 于 2015-5-31 22:30 编辑

题题好像挺可怜的，我来帮你解决吧~
请参照图片里的事件进行设置~
第一个脚本块里的脚本（抱怨一下，事件里的脚本编辑区域实在是太小了...）：
  1. timer = 0
  2. @fish  = nil
  3. while Input.press?(:C)
  4.   Fiber.yield
  5.   timer += 1
  6. end
  7. case timer
  8.   when   0..100; @fish = 1
  9.   # 按住C键0到100帧会获得1号物品，以此类推...
  10.   when 101..200; @fish = 2
  11.   when 201..300; @fish = 3
  12. end
复制代码
第二个：
  1. you_get_a_fish = "你钓到了..." # 成功时的前缀
  2. fail_message = "啥都没钓着..." # 失败时的提示
  3. if @fish
  4. item = $data_items[@fish]
  5. $game_party.gain_item(item, 1)
  6. $game_message.add(
  7. you_get_a_fish + item.name + " * 1！"
  8. )
  9. else
  10. $game_message.add(fail_message)
  11. end
复制代码
第三个：
  1. if @fish
  2. RPG::SE.new("Item1", 80, 100).play
  3. # 成功时播放的SE
  4. else
  5. Sound.play_cancel
  6. # 失败时播放的SE
  7. end
  8. @fish = nil
复制代码
触发条件请设置成“按确定键”~
只能更改有注释的地方对应的内容哦~否则后果自负~
有问题的话请告诉我~   

钓鱼.png (30.81 KB, 下载次数: 29)

钓鱼.png

测试效果.png (45 KB, 下载次数: 26)

测试效果.png

和测试效果.png (14.24 KB, 下载次数: 23)

和测试效果.png
作者: 992038293    时间: 2018-11-9 21:19
唉 =本菜鸡很难受

QQ截图20181109211803.png (16.06 KB, 下载次数: 15)

QQ截图20181109211803.png




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1