按键秘籍--更新v1,1 额~附本脚本应用实例一个

幻の飞鱼 · 发表于 2007-7-4 03:27:38

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

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

x

最近看人讨论这个，就试了个

是模仿GTA做的，就是没有输入界面

任意时间都可以输入，任意一个字符都可以做为秘籍的开始- -{/fd}

感觉算法一般，有点冗余，不过至少效果实现了{/fd}

调用公共事件，就基本可以用键盘来实现事件页能做的所有事

使用方法
# 1.设置方法，所需要的秘籍，按照全键盘布局，输入193行处的$mj处，注意首单元为nil
# 默认设置了MONEY和ITEM两个秘籍，分别调用1号、2号公共事件
# 2.如果需要更多，就设置$mj[2]……
# 3.如果输对$mj[n]号秘籍，就会自动调用n+1号公共事件（谁要数组是从0开始- -|）
# 4.拓展：在下面标注了“成功处理”的地方修改就可以
# 如果不希望随时可用，写脚本再加一个开关控制一下就可以了。

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#
# 作者：幻の飞鱼
# 按键秘籍v1.1
# 配合了夏娜的全键盘使用
# 1.1修复了1.0遇到首字母相同，有一个秘籍不能使用的BUG,但设置秘籍的地方必须保证
# 首单元为nil
#
# 使用方法
# 1.设置方法，所需要的秘籍，按照全键盘布局，输入193行处的$mj处，注意首单元为nil
# 默认设置了MONEY和ITEM两个秘籍，分别调用1号、2号公共事件
# 2.如果需要更多，就设置$mj[2]……
# 3.如果输对$mj[n]号秘籍，就会自动调用n+1号公共事件（谁要数组是从0开始- -|）
# 4.拓展：在下面标注了“成功处理”的地方修改就可以
# 如果不希望随时可用，写脚本再加一个开关控制一下就可以了。
#==============================================================================
#==============================================================================
#全键盘
#==============================================================================
module Kboard
#==========================================================================
# 以下是全键盘按键列表
#--------------------------------------------------------------------------
$Rmouse_BUTTON_L = 0x01 # left mouse button
$Rmouse_BUTTON_R = 0x02 # right mouse button
$Rmouse_BUTTON_M = 0x04 # middle mouse button
$Rmouse_BUTTON_4 = 0x05 # 4th mouse button
$Rmouse_BUTTON_5 = 0x06 # 5th mouse button
#--------------------------------------------------------------------------
$R_Key_BACK = 0x08 # BACKSPACE key
$R_Key_TAB = 0x09 # TAB key
$R_Key_RETURN = 0x0D # ENTER key
$R_Key_SHIFT = 0x10 # SHIFT key
$R_Key_CTLR = 0x11 # CTLR key
$R_Key_ALT = 0x12 # ALT key
$R_Key_PAUSE = 0x13 # PAUSE key
$R_Key_CAPITAL = 0x14 # CAPS LOCK key
$R_Key_ESCAPE = 0x1B # ESC key
$R_Key_SPACE = 0x20 # SPACEBAR
$R_Key_PRIOR = 0x21 # PAGE UP key
$R_Key_NEXT = 0x22 # PAGE DOWN key
$R_Key_END = 0x23 # END key
$R_Key_HOME = 0x24 # HOME key
$R_Key_LEFT = 0x25 # LEFT ARROW key
$R_Key_UP = 0x26 # UP ARROW key
$R_Key_RIGHT = 0x27 # RIGHT ARROW key
$R_Key_DOWN = 0x28 # DOWN ARROW key
$R_Key_SELECT = 0x29 # SELECT key
$R_Key_PRINT = 0x2A # PRINT key
$R_Key_SNAPSHOT = 0x2C # PRINT SCREEN key
$R_Key_INSERT = 0x2D # INS key
$R_Key_DELETE = 0x2E # DEL key
#--------------------------------------------------------------------------
$R_Key_0 = 0x30 # 0 key
$R_Key_1 = 0x31 # 1 key
$R_Key_2 = 0x32 # 2 key
$R_Key_3 = 0x33 # 3 key
$R_Key_4 = 0x34 # 4 key
$R_Key_5 = 0x35 # 5 key
$R_Key_6 = 0x36 # 6 key
$R_Key_7 = 0x37 # 7 key
$R_Key_8 = 0x38 # 8 key
$R_Key_9 = 0x39 # 9 key
#--------------------------------------------------------------------------
$R_Key_A = 0x41 # A key
$R_Key_B = 0x42 # B key
$R_Key_C = 0x43 # C key
$R_Key_D = 0x44 # D key
$R_Key_E = 0x45 # E key
$R_Key_F = 0x46 # F key
$R_Key_G = 0x47 # G key
$R_Key_H = 0x48 # H key
$R_Key_I = 0x49 # I key
$R_Key_J = 0x4A # J key
$R_Key_K = 0x4B # K key
$R_Key_L = 0x4C # L key
$R_Key_M = 0x4D # M key
$R_Key_N = 0x4E # N key
$R_Key_O = 0x4F # O key
$R_Key_P = 0x50 # P key
$R_Key_Q = 0x51 # Q key
$R_Key_R = 0x52 # R key
$R_Key_S = 0x53 # S key
$R_Key_T = 0x54 # T key
$R_Key_U = 0x55 # U key
$R_Key_V = 0x56 # V key
$R_Key_W = 0x57 # W key
$R_Key_X = 0x58 # X key
$R_Key_Y = 0x59 # Y key
$R_Key_Z = 0x5A # Z key
#--------------------------------------------------------------------------
$R_Key_LWIN = 0x5B # Left Windows key (Microsoft Natural keyboard)
$R_Key_RWIN = 0x5C # Right Windows key (Natural keyboard)
$R_Key_APPS = 0x5D # Applications key (Natural keyboard)
#--------------------------------------------------------------------------
$R_Key_NUMPAD0 = 0x60 # Numeric keypad 0 key
$R_Key_NUMPAD1 = 0x61 # Numeric keypad 1 key
$R_Key_NUMPAD2 = 0x62 # Numeric keypad 2 key
$R_Key_NUMPAD3 = 0x63 # Numeric keypad 3 key
$R_Key_NUMPAD4 = 0x64 # Numeric keypad 4 key
$R_Key_NUMPAD5 = 0x65 # Numeric keypad 5 key
$R_Key_NUMPAD6 = 0x66 # Numeric keypad 6 key
$R_Key_NUMPAD7 = 0x67 # Numeric keypad 7 key
$R_Key_NUMPAD8 = 0x68 # Numeric keypad 8 key
$R_Key_NUMPAD9 = 0x69 # Numeric keypad 9 key
$R_Key_MULTIPLY = 0x6A # Multiply key (*)
$R_Key_ADD = 0x6B # Add key (+)
$R_Key_SEPARATOR = 0x6C # Separator key
$R_Key_SUBTRACT = 0x6D # Subtract key (-)
$R_Key_DECIMAL = 0x6E # Decimal key
$R_Key_DIVIDE = 0x6F # Divide key (/)
#--------------------------------------------------------------------------
$R_Key_F1 = 0x70 # F1 key
$R_Key_F2 = 0x71 # F2 key
$R_Key_F3 = 0x72 # F3 key
$R_Key_F4 = 0x73 # F4 key
$R_Key_F5 = 0x74 # F5 key
$R_Key_F6 = 0x75 # F6 key
$R_Key_F7 = 0x76 # F7 key
$R_Key_F8 = 0x77 # F8 key
$R_Key_F9 = 0x78 # F9 key
$R_Key_F10 = 0x79 # F10 key
$R_Key_F11 = 0x7A # F11 key
$R_Key_F12 = 0x7B # F12 key
#--------------------------------------------------------------------------
$R_Key_NUMLOCK = 0x90 # NUM LOCK key
$R_Key_SCROLL = 0x91 # SCROLL LOCK key
#--------------------------------------------------------------------------
$R_Key_LSHIFT = 0xA0 # Left SHIFT key
$R_Key_RSHIFT = 0xA1 # Right SHIFT key
$R_Key_LCONTROL = 0xA2 # Left CONTROL key
$R_Key_RCONTROL = 0xA3 # Right CONTROL key
$R_Key_L_ALT = 0xA4 # Left ALT key
$R_Key_R_ALT = 0xA5 # Right ALT key
#--------------------------------------------------------------------------
$R_Key_SEP = 0xBC # , key
$R_Key_DASH = 0xBD # - key
$R_Key_DOTT = 0xBE # . Key
#--------------------------------------------------------------------------
GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
GetKeyboardState = Win32API.new("user32","GetKeyState",['I'],'I')
GetSetKeyState = Win32API.new("user32","SetKeyboardState",['I'],'I')
#--------------------------------------------------------------------------
module_function
@R_Key_Hash = {}
@R_Key_Repeat = {}
GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
def press?(rkey)
return GetKeyState.call(rkey) != 0
end
def repeat?(rkey)
result = GetKeyState.call(rkey)
if result != 0
if @R_Key_Repeat[rkey].nil?
@R_Key_Repeat[rkey] = 0
return true
end
@R_Key_Repeat[rkey] += 1
else
@R_Key_Repeat[rkey] = nil
@R_Key_Hash[rkey] = 0
end
if !@R_Key_Repeat[rkey].nil? and @R_Key_Repeat[rkey] > 4 # 4乃准确数字
@R_Key_Repeat[rkey] = 0
return true
else
return false
end
end
def trigger?(rkey)
result = GetKeyState.call(rkey)
if @R_Key_Hash[rkey] == 1 and result != 0
return false
end
if result != 0
@R_Key_Hash[rkey] = 1
return true
else
@R_Key_Hash[rkey] = 0
return false
end
end
end
#==============================================================================
#以下是按键秘籍
#==============================================================================
$mj=[] #在下面设置秘籍
$mj[0] = [nil,$R_Key_M,$R_Key_O,$R_Key_N,$R_Key_E,$R_Key_Y]
$mj[1] = [nil,$R_Key_I,$R_Key_T,$R_Key_E,$R_Key_M]
class Scene_Map
alias old update
def update
n = 0
for i in 1..190
if Kboard.trigger?(i)
n = i
end
end
if n > 0
if $open
$open = false
for @k in @z
$open = true if n == $mj[@k][@j[@k]]
end
for @k in @z
if n == $mj[@k][@j[@k]]
@j[@k]+=1
if @j[@k]==$mj[@k].size
#-----成功处理，@k为成功的秘籍编号--------
$game_temp.common_event_id = @k+1 #按对后的功能
#------------------------------------------
@j[@k] = 0
end
else
@j[@k] = 0
end
end
end
end
if $open != true
@z = []
@j = []
for i in 0..$mj.size-1
if n == $mj[i][1]
@z.push(i)
@j[i] = 2
$open = true
end
end
end
old
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码

附个范例：http://rpg.blue/upload_program/files/按键秘籍v1.1.rar

============华丽的分割==================
这个就是实例了~

最近在做进度缓慢的断指系列，因为这个脚本的出现

搞笑的出了一个“死亡打字员特别版”，就纯粹娱乐一下了- -||

http://rpg.blue/viewthread.php?tid=59293

　　　　　　　　　　　　　　[本贴由叶舞枫于 2007-7-5 10:43:01 进行了编辑]

小真·爱舞 · 发表于 2007-7-5 23:19:45

拓展性的话...我唯一喜欢的就是音乐游戏了....

鲁鲁 · 发表于 2007-7-5 19:46:51

不错～支持下

叶舞枫 · 发表于 2007-7-5 18:42:41

发布完毕
http://rpg.blue/web/htm/news765.htm
VIP　２

gpra8764 · 发表于 2007-7-5 07:31:42

提示: 作者被禁止或删除内容自动屏蔽

幻の飞鱼 · 发表于 2007-7-5 07:12:27

以下引用亿万星辰于2007-7-4 17:03:50的发言：

以下引用幻の飞鱼于2007-7-4 12:46:05的发言：

是的，我在想的是一些拓展功能
并不是局限于秘籍这一块

比如把我那个断指守卫改成个打字游戏？
每个怪物头上带一个单词
输入对了就可以把怪物灭了，哈哈
我的创意果然够无聊……

死亡打字员RM....以前做过...

为什么找不到下载呢- -我还想看看怎么做的

我自己的也做好了

搞的都不好意思发了

感觉想断指的番外篇一样的界面，不一样的游戏方式- -

亿万星辰 · 发表于 2007-7-5 01:03:50

以下引用幻の飞鱼于2007-7-4 12:46:05的发言：

是的，我在想的是一些拓展功能
并不是局限于秘籍这一块

比如把我那个断指守卫改成个打字游戏？
每个怪物头上带一个单词
输入对了就可以把怪物灭了，哈哈
我的创意果然够无聊……

死亡打字员RM....以前做过...

幻の飞鱼 · 发表于 2007-7-4 20:46:05

是的，我在想的是一些拓展功能
并不是局限于秘籍这一块

比如把我那个断指守卫改成个打字游戏？
每个怪物头上带一个单词
输入对了就可以把怪物灭了，哈哈
我的创意果然够无聊……

亿万星辰 · 发表于 2007-7-4 14:39:48

以下引用小真·爱舞于2007-7-4 3:26:41的发言：

这个东西...我真的感觉没有实用价值。
RM游戏...做得再优秀，也不过是个RM游戏，除了特别的有爱的玩家是不会玩得那么认真的。
何况不优秀的游戏？
大多数在讨论需要这个功能的制作者...大多数不是很有能力制作出优秀RMgame的人啊...
所以...只有鸡肋的感觉...
鸡肋..鸡肋..

不见得,我稍微把思路换一下就会是另一种效果.......
比如我那个范例里的,站到台子上才能输入,就可以设置成类似地牢围攻里的吟唱系统

小真·爱舞 · 发表于 2007-7-4 11:26:41

这个东西...我真的感觉没有实用价值。
RM游戏...做得再优秀，也不过是个RM游戏，除了特别的有爱的玩家是不会玩得那么认真的。
何况不优秀的游戏？
大多数在讨论需要这个功能的制作者...大多数不是很有能力制作出优秀RMgame的人啊...
所以...只有鸡肋的感觉...
鸡肋..鸡肋..

帐号		自动登录	找回密码
密码			注册会员

按键秘籍--更新v1,1 额~附本脚本应用实例一个

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

开拓者

贵宾