Ho bisogno che qualche anima pia aggiunga a questo script una funzione che mi permetta di cliccare su alcuni eventi attivandoli, senza bisogno che l'eroe ci vada sopra... L'idea è quella di creare un punta e clicca con rpg...credo sia un idea mooolto innovativa...
Cmq posto qui lo script
Grazie in anticipo di ogni eventuale aiuto!
#==================================================================# GMUS Guedez Mouse Use System# Version: 1.0# Released: 26/5/2006 Last Update: 1/6/2006# Thx to: Cadafalso, Near Fantastica, and some guys from asylum!#==================================================================class Mouse_PositionCheck def initialize end def main get_pos end def get_window_index(window) window.get_rect_positions return -1 if window.index == -1 return -2 if window.index == -2 for i in 0...window.get_rect.size if window.get_rect[i][0] < $bg.x and window.get_rect[i][1] < $bg.y and window.get_rect[i][2] > $bg.x and window.get_rect[i][3] > $bg.y return i end end return -999999 end def set_pos(x,y) $setCursorPos.Call(x,y) end #==============================Thx to: Cadafalso=================== def get_pos lpPoint = " " * 8 # store two LONGs $getCursorPos.Call(lpPoint) $bg.x, $bg.y = lpPoint.unpack("LL") # get the actual values end#==================================================================end class Window_Selectable < Window_Base def get_rect_positions index = self.index @rect_position = [] if @rect_position == nil if @rect_position == [] for i in 0...(self.row_max * @column_max) self.index = i update_cursor_rect p = self.cursor_rect.to_s p.gsub!("($1,$2,$3,$4):rect","");p.gsub!("(", ""); p.gsub!(")", "") p = p.split(/,\s*/) @rect_position[i] = [p[0].to_i + self.x + 16, p[1].to_i - self.oy + self.y + 16, p[0].to_i + p[2].to_i + self.x + 16, p[1].to_i + p[3].to_i - self.oy + self.y + 16] end self.index = index end end def refresh_rect_positions @rect_position = [] get_rect_positions end def get_rect return @rect_position end alias guedez_update update def update get_rect_positions if self.active == true old_index = self.index new_index = $mouse.get_window_index(self) $game_system.se_play($data_system.cursor_se) if old_index != new_index and not new_index == -999999 @index = new_index if old_index != -1 self.cursor_rect.empty if new_index == -999999 self.index = new_index end guedez_update end end # Actualy my script only need the mouse stuff, but i dont think# the rest will bring any trouble :D, so i let the full script #==============================================================================# ** Keyboard Input Module#==============================================================================# Near Fantastica# Version 5# 29.11.05#==============================================================================# The Keyboard Input Module is designed to function as the default Input module# dose. It is better then other methods keyboard input because as a key is # tested it is not removed form the list. so you can test the same key multiple# times the same loop.#============================================================================== #------------------------------------------------------------------------------# * SDK Log Script#------------------------------------------------------------------------------#SDK.log("Keyboard Input", "Near Fantastica", 5, "29.11.05") #------------------------------------------------------------------------------# * Begin SDK Enable Test#------------------------------------------------------------------------------#if SDK.state("Keyboard Input") == true module Keyboard #-------------------------------------------------------------------------- @keys = [] @pressed = [] Mouse_Left = 1 Mouse_Right = 2 Back= 8 Tab = 9 Enter = 13 Shift = 16 Ctrl = 17 Alt = 18 Esc = 27 Space = 32 Numberkeys = {} Numberkeys[0] = 48 Numberkeys[1] = 49 Numberkeys[2] = 50 Numberkeys[3] = 51 Numberkeys[4] = 52 Numberkeys[5] = 53 Numberkeys[6] = 54 Numberkeys[7] = 55 Numberkeys[8] = 56 Numberkeys[9] = 57 Numberpad = {} Numberpad[0] = 45 Numberpad[1] = 35 Numberpad[2] = 40 Numberpad[3] = 34 Numberpad[4] = 37 Numberpad[5] = 12 Numberpad[6] = 39 Numberpad[7] = 36 Numberpad[8] = 38 Numberpad[9] = 33 Letters = {} Letters["A"] = 65 Letters["B"] = 66 Letters["C"] = 67 Letters["D"] = 68 Letters["E"] = 69 Letters["F"] = 70 Letters["G"] = 71 Letters["H"] = 72 Letters["I"] = 73 Letters["J"] = 74 Letters["K"] = 75 Letters["L"] = 76 Letters["M"] = 77 Letters["N"] = 78 Letters["O"] = 79 Letters["P"] = 80 Letters["Q"] = 81 Letters["R"] = 82 Letters["S"] = 83 Letters["T"] = 84 Letters["U"] = 85 Letters["V"] = 86 Letters["W"] = 87 Letters["X"] = 88 Letters["Y"] = 89 Letters["Z"] = 90 Fkeys = {} Fkeys[1] = 112 Fkeys[2] = 113 Fkeys[3] = 114 Fkeys[4] = 115 Fkeys[5] = 116 Fkeys[6] = 117 Fkeys[7] = 118 Fkeys[8] = 119 Fkeys[9] = 120 Fkeys[10] = 121 Fkeys[11] = 122 Fkeys[12] = 123 Collon = 186 Equal = 187 Comma = 188 Underscore = 189 Dot = 190 Backslash = 191 Lb = 219 Rb = 221 Quote = 222 State = Win32API.new("user32","GetKeyState",['i'],'i') Key = Win32API.new("user32","GetAsyncKeyState",['i'],'i') #-------------------------------------------------------------------------- def Keyboard.getstate(key) return true unless State.call(key).between?(0, 1) return false end #-------------------------------------------------------------------------- def Keyboard.testkey(key) Key.call(key) & 0x01 == 1 end #-------------------------------------------------------------------------- def Keyboard.update @keys = [] @keys.push(Keyboard::Mouse_Left) if Keyboard.testkey(Keyboard::Mouse_Left) @keys.push(Keyboard::Mouse_Right) if Keyboard.testkey(Keyboard::Mouse_Right) @keys.push(Keyboard::Back) if Keyboard.testkey(Keyboard::Back) @keys.push(Keyboard::Tab) if Keyboard.testkey(Keyboard::Tab) @keys.push(Keyboard::Enter) if Keyboard.testkey(Keyboard::Enter) @keys.push(Keyboard::Shift) if Keyboard.testkey(Keyboard::Shift) @keys.push(Keyboard::Ctrl) if Keyboard.testkey(Keyboard::Ctrl) @keys.push(Keyboard::Alt) if Keyboard.testkey(Keyboard::Alt) @keys.push(Keyboard::Esc) if Keyboard.testkey(Keyboard::Esc) @keys.push(Keyboard::Space) if Keyboard.testkey(Keyboard::Space) for key in Keyboard::Numberkeys.values @keys.push(key) if Keyboard.testkey(key) end for key in Keyboard::Numberpad.values @keys.push(key) if Keyboard.testkey(key) end for key in Keyboard::Letters.values @keys.push(key) if Keyboard.testkey(key) end for key in Keyboard::Fkeys.values @keys.push(key) if Keyboard.testkey(key) end @keys.push(Keyboard::Collon) if Keyboard.testkey(Keyboard::Collon) @keys.push(Keyboard::Equal) if Keyboard.testkey(Keyboard::Equal) @keys.push(Keyboard::Comma) if Keyboard.testkey(Keyboard::Comma) @keys.push(Keyboard::Underscore) if Keyboard.testkey(Keyboard::Underscore) @keys.push(Keyboard::Dot) if Keyboard.testkey(Keyboard::Dot) @keys.push(Keyboard::Backslash) if Keyboard.testkey(Keyboard::Backslash) @keys.push(Keyboard::Lb) if Keyboard.testkey(Keyboard::Lb) @keys.push(Keyboard::Rb) if Keyboard.testkey(Keyboard::Rb) @keys.push(Keyboard::Quote) if Keyboard.testkey(Keyboard::Quote) @pressed = [] @pressed.push(Keyboard::Mouse_Left) if Keyboard.getstate(Keyboard::Mouse_Left) @pressed.push(Keyboard::Mouse_Right) if Keyboard.getstate(Keyboard::Mouse_Right) @pressed.push(Keyboard::Back) if Keyboard.getstate(Keyboard::Back) @pressed.push(Keyboard::Tab) if Keyboard.getstate(Keyboard::Tab) @pressed.push(Keyboard::Enter) if Keyboard.getstate(Keyboard::Enter) @pressed.push(Keyboard::Shift) if Keyboard.getstate(Keyboard::Shift) @pressed.push(Keyboard::Ctrl) if Keyboard.getstate(Keyboard::Ctrl) @pressed.push(Keyboard::Alt) if Keyboard.getstate(Keyboard::Alt) @pressed.push(Keyboard::Esc) if Keyboard.getstate(Keyboard::Esc) @pressed.push(Keyboard::Space) if Keyboard.getstate(Keyboard::Space) for key in Keyboard::Numberkeys.values @pressed.push(key) if Keyboard.getstate(key) end for key in Keyboard::Numberpad.values @pressed.push(key) if Keyboard.getstate(key) end for key in Keyboard::Letters.values @pressed.push(key) if Keyboard.getstate(key) end for key in Keyboard::Fkeys.values @pressed.push(key) if Keyboard.getstate(key) end @pressed.push(Keyboard::Collon) if Keyboard.getstate(Keyboard::Collon) @pressed.push(Keyboard::Equal) if Keyboard.getstate(Keyboard::Equal) @pressed.push(Keyboard::Comma) if Keyboard.getstate(Keyboard::Comma) @pressed.push(Keyboard::Underscore) if Keyboard.getstate(Keyboard::Underscore) @pressed.push(Keyboard::Dot) if Keyboard.getstate(Keyboard::Dot) @pressed.push(Keyboard::Backslash) if Keyboard.getstate(Keyboard::Backslash) @pressed.push(Keyboard::Lb) if Keyboard.getstate(Keyboard::Lb) @pressed.push(Keyboard::Rb) if Keyboard.getstate(Keyboard::Rb) @pressed.push(Keyboard::Quote) if Keyboard.getstate(Keyboard::Quote) end #-------------------------------------------------------------------------- def Keyboard.trigger?(key) return true if @keys.include?(key) return false end #-------------------------------------------------------------------------- def Keyboard.pressed?(key) return true if @pressed.include?(key) return false end #end #------------------------------------------------------------------------------# * End SDK Enable Test#------------------------------------------------------------------------------end #=========================Game_Fixes============================= $showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ''$showm.call(18,0,0,0)$showm.call(13,0,0,0)$showm.call(13,0,2,0)$showm.call(18,0,2,0)$mouse = Mouse_PositionCheck.new$getCursorPos = Win32API.new("user32", "GetCursorPos", ['P'], 'V')$setCursorPos = Win32API.new("user32", "SetCursorPos", ['I','I'], 'V')$bg = Sprite.new$bg.bitmap = RPG::Cache.icon('Icon')$bg.z = 999999$bg.y = 0$bg.x = 0 module Input if @self_update == nil @self_update = method('update') @self_press = method('press?') @self_rep = method('repeat?') end def self.update @self_update.call $mouse.main Keyboard.update end def self.trigger?(key_code) if @self_press.call(key_code) return true end if key_code == C return Keyboard.trigger?(Keyboard::Mouse_Left) elsif key_code == B return Keyboard.trigger?(Keyboard::Mouse_Right) else return @self_press.call(key_code) end end def self.repeat?(key_code) if @self_rep.call(key_code) return true end if key_code == C return Keyboard.pressed?(Keyboard::Mouse_Left) elsif key_code == B return Keyboard.pressed?(Keyboard::Mouse_Right) else return @self_rep.call(key_code) end end end class Arrow_Enemy < Arrow_Base def update super $game_troop.enemies.size.times do break if self.enemy.exist? @index += 1 @index %= $game_troop.enemies.size end #size = 0 #for i in 0...$game_troop.enemies.size # size += 1 if $game_troop.enemies[i].hp > 0 #end size = $game_troop.enemies.size if size == nil @index = ((size / 640.0) * $bg.x.to_f).to_i if self.enemy != nil self.x = self.enemy.screen_x self.y = self.enemy.screen_y end end end class Arrow_Actor < Arrow_Base def update super @index = 0 if $bg.x > 0 and $bg.x <= 160 and 0 <= ($game_party.actors.size - 1) @index = 1 if $bg.x > 160 and $bg.x <= 320 and 1 <= ($game_party.actors.size - 1) @index = 2 if $bg.x > 320 and $bg.x <= 480 and 2 <= ($game_party.actors.size - 1) @index = 3 if $bg.x > 480 and $bg.x <= 640 and 3 <= ($game_party.actors.size - 1) if self.actor != nil self.x = self.actor.screen_x self.y = self.actor.screen_y end end end class Window_Target < Window_Selectable alias gupdate update def update @defaultx = 0 if @defaultx == nil if @defaultx != self.x @defaultx = self.x self.refresh_rect_positions return else gupdate end end def update_cursor_rect if @index == -1 self.cursor_rect.set(0, 0, self.width - 32, @item_max * 116 - 20) else self.cursor_rect.set(0, @index * 116, self.width - 32, 96) end end end class Scene_Battle def phase3_setup_command_window @party_command_window.active = false @party_command_window.visible = false @actor_command_window.active = true @actor_command_window.visible = true @actor_command_window.x = @actor_index * 160 @actor_command_window.refresh_rect_positions @actor_command_window.index = 0 end end class Scene_Equip def initialize(actor_index = 0, equip_index = 0) @actor_index = actor_index @equip_index = equip_index @actor = $game_party.actors[@actor_index] end alias gmain main def main @dummy = Window_EquipItem.new(@actor, 99) gmain @dummy.dispose end alias gupdate_right update_right def update_right if @right_window.index == -999999 if Input.trigger?(Input::C) $game_system.se_play($data_system.buzzer_se) end else gupdate_right end end def refresh @item_window1.visible = (@right_window.index == 0) @item_window2.visible = (@right_window.index == 1) @item_window3.visible = (@right_window.index == 2) @item_window4.visible = (@right_window.index == 3) @item_window5.visible = (@right_window.index == 4) @dummy.visible = (@right_window.index == -999999) item1 = @right_window.item case @right_window.index when 0 @item_window = @item_window1 when 1 @item_window = @item_window2 when 2 @item_window = @item_window3 when 3 @item_window = @item_window4 when 4 @item_window = @item_window5 when -999999 return end if @right_window.active @left_window.set_new_parameters(nil, nil, nil) end if @item_window.active item2 = @item_window.item last_hp = @actor.hp last_sp = @actor.sp @actor.equip(@right_window.index, item2 == nil ? 0 : item2.id) new_atk = @actor.atk new_pdef = @actor.pdef new_mdef = @actor.mdef @actor.equip(@right_window.index, item1 == nil ? 0 : item1.id) @actor.hp = last_hp @actor.sp = last_sp @left_window.set_new_parameters(new_atk, new_pdef, new_mdef) end end end class Scene_Skill def update_target if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @skill_window.active = true @target_window.visible = false @target_window.active = false return end if Input.trigger?(Input::C) unless @actor.skill_can_use?(@skill.id) $game_system.se_play($data_system.buzzer_se) return end if @target_window.index == -1 used = false for i in $game_party.actors used |= i.skill_effect(@actor, @skill) end end if @target_window.index == -2 target = $game_party.actors[@target_window.index + 10] used = target.skill_effect(@actor, @skill) end if @target_window.index <= -3 $game_system.se_play($data_system.buzzer_se) return end if @target_window.index >= 0 target = $game_party.actors[@target_window.index] used = target.skill_effect(@actor, @skill) end if used $game_system.se_play(@skill.menu_se) @actor.sp -= @skill.sp_cost @status_window.refresh @skill_window.refresh @target_window.refresh if $game_party.all_dead? $scene = Scene_Gameover.new return end if @skill.common_event_id > 0 $game_temp.common_event_id = @skill.common_event_id $scene = Scene_Map.new return end end unless used $game_system.se_play($data_system.buzzer_se) end return end end end class Scene_File def update @help_window.update for i in @savefile_windows i.update end if Input.trigger?(Input::C) if @file_index == -1 $game_system.se_play($data_system.buzzer_se) else on_decision(make_filename(@file_index)) $game_temp.last_file_index = @file_index return end end if Input.trigger?(Input::B) on_cancel return end if $bg.y > 64 and $bg.y < 168 if @savefile_windows[0].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = true @savefile_windows[1].selected = false @savefile_windows[2].selected = false @savefile_windows[3].selected = false @file_index = 0 elsif $bg.y > 168 and $bg.y < 272 if @savefile_windows[1].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = false @savefile_windows[1].selected = true @savefile_windows[2].selected = false @savefile_windows[3].selected = false @file_index = 1 elsif $bg.y > 272 and $bg.y < 376 if @savefile_windows[2].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = false @savefile_windows[1].selected = false @savefile_windows[2].selected = true @savefile_windows[3].selected = false @file_index = 2 elsif $bg.y > 376 and $bg.y < 480 if @savefile_windows[3].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = false @savefile_windows[1].selected = false @savefile_windows[2].selected = false @savefile_windows[3].selected = true @file_index = 3 else @file_index = -1 @savefile_windows[0].selected = false @savefile_windows[1].selected = false @savefile_windows[2].selected = false @savefile_windows[3].selected = false end end endclass Scene_Menu def update_status if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @command_window.active = true @status_window.active = false @status_window.index = -1 return end if Input.trigger?(Input::C) unless @status_window.index < 0 case @command_window.index when 1 if $game_party.actors[@status_window.index].restriction >= 2 $game_system.se_play($data_system.buzzer_se) return end $game_system.se_play($data_system.decision_se) $scene = Scene_Skill.new(@status_window.index) when 2 $game_system.se_play($data_system.decision_se) $scene = Scene_Equip.new(@status_window.index) when 3 $game_system.se_play($data_system.decision_se) $scene = Scene_Status.new(@status_window.index) end return end end end end class Game_Player def update last_moving = moving? unless moving? or $game_system.map_interpreter.running? or @move_route_forcing or $game_temp.message_window_showing or @cant_move case Input.dir4 when 2 move_down when 4 move_left when 6 move_right when 8 move_up end end last_real_x = @real_x last_real_y = @real_y super if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y $game_map.scroll_down(@real_y - last_real_y) end if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X $game_map.scroll_left(last_real_x - @real_x) end if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X $game_map.scroll_right(@real_x - last_real_x) end if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y $game_map.scroll_up(last_real_y - @real_y) end unless moving? if last_moving result = check_event_trigger_here([1,2]) if result == false unless $DEBUG and Input.press?(Input::CTRL) if @encounter_count > 0 @encounter_count -= 1 end end end end if Input.trigger?(Input::C) check_curor_field if (@field_x == self.x + 1 and @field_y == self.y and self.direction == 6) or (@field_x == self.x - 1 and @field_y == self.y and self.direction == 4) or (@field_x == self.x and @field_y == self.y + 1 and self.direction == 2) or (@field_x == self.x and @field_y == self.y - 1 and self.direction == 8) check_event_trigger_there([0,1,2]) end end if Input.repeat?(Input::C) check_curor_field unless moving? or $game_system.map_interpreter.running? or @move_route_forcing or $game_temp.message_window_showing or @cant_move and not (@field_x == self.x and @field_y == self.y) move_by_mouse end check_event_trigger_here([0]) end end end def check_curor_field dummyx = $game_map.display_x > 0 ? $bg.x + 16 : $bg.x @field_x = dummyx / 32 + $game_map.display_x / 128 @field_y = $bg.y / 32 + $game_map.display_y / 128 end def move_by_mouse dy = @field_x - self.x dx = self.y - @field_y if dx > 0 and dy > 0 #quarter 1 if dx > dy if passable?(self.x, self.y, 8) move_up else move_right end return elsif dx < dy if passable?(self.x, self.y, 6) move_right else move_up end return elsif dx == dy if passable?(self.x, self.y, 8) move_up else move_right end return end elsif dx > 0 and dy < 0 #quarter 2 if dx > -dy if passable?(self.x, self.y, 8) move_up else move_left end return elsif dx < -dy if passable?(self.x, self.y, 4) move_left else move_up end return elsif dx == -dy if passable?(self.x, self.y, 8) move_up else move_left end return end elsif dx < 0 and dy < 0 #quarter 2 if -dx > -dy if passable?(self.x, self.y, 2) move_down else move_left end return elsif -dx < -dy if passable?(self.x, self.y, 4) move_left else move_down end return elsif -dx == -dy if passable?(self.x, self.y, 2) move_down else move_left end return end elsif dx < 0 and dy > 0 #quarter 4 if -dx > dy if passable?(self.x, self.y, 2) move_down else move_right end return elsif -dx < dy if passable?(self.x, self.y, 6) move_right else move_down end return elsif -dx == dy if passable?(self.x, self.y, 2) move_down else move_right end return end elsif dx == 0 and dy < 0 move_left elsif dx == 0 and dy > 0 move_right elsif dx < 0 and dy == 0 move_down elsif dx > 0 and dy == 0 move_up end endend
Question
roste91
Ho bisogno che qualche anima pia aggiunga a questo script una funzione che mi permetta di cliccare su alcuni eventi attivandoli, senza bisogno che l'eroe ci vada sopra... L'idea è quella di creare un punta e clicca con rpg...credo sia un idea mooolto innovativa...
Cmq posto qui lo script
Grazie in anticipo di ogni eventuale aiuto!
#==================================================================# GMUS Guedez Mouse Use System# Version: 1.0# Released: 26/5/2006 Last Update: 1/6/2006# Thx to: Cadafalso, Near Fantastica, and some guys from asylum!#==================================================================class Mouse_PositionCheck def initialize end def main get_pos end def get_window_index(window) window.get_rect_positions return -1 if window.index == -1 return -2 if window.index == -2 for i in 0...window.get_rect.size if window.get_rect[i][0] < $bg.x and window.get_rect[i][1] < $bg.y and window.get_rect[i][2] > $bg.x and window.get_rect[i][3] > $bg.y return i end end return -999999 end def set_pos(x,y) $setCursorPos.Call(x,y) end #==============================Thx to: Cadafalso=================== def get_pos lpPoint = " " * 8 # store two LONGs $getCursorPos.Call(lpPoint) $bg.x, $bg.y = lpPoint.unpack("LL") # get the actual values end#==================================================================end class Window_Selectable < Window_Base def get_rect_positions index = self.index @rect_position = [] if @rect_position == nil if @rect_position == [] for i in 0...(self.row_max * @column_max) self.index = i update_cursor_rect p = self.cursor_rect.to_s p.gsub!("($1,$2,$3,$4):rect","");p.gsub!("(", ""); p.gsub!(")", "") p = p.split(/,\s*/) @rect_position[i] = [p[0].to_i + self.x + 16, p[1].to_i - self.oy + self.y + 16, p[0].to_i + p[2].to_i + self.x + 16, p[1].to_i + p[3].to_i - self.oy + self.y + 16] end self.index = index end end def refresh_rect_positions @rect_position = [] get_rect_positions end def get_rect return @rect_position end alias guedez_update update def update get_rect_positions if self.active == true old_index = self.index new_index = $mouse.get_window_index(self) $game_system.se_play($data_system.cursor_se) if old_index != new_index and not new_index == -999999 @index = new_index if old_index != -1 self.cursor_rect.empty if new_index == -999999 self.index = new_index end guedez_update end end # Actualy my script only need the mouse stuff, but i dont think# the rest will bring any trouble :D, so i let the full script #==============================================================================# ** Keyboard Input Module#==============================================================================# Near Fantastica# Version 5# 29.11.05#==============================================================================# The Keyboard Input Module is designed to function as the default Input module# dose. It is better then other methods keyboard input because as a key is # tested it is not removed form the list. so you can test the same key multiple# times the same loop.#============================================================================== #------------------------------------------------------------------------------# * SDK Log Script#------------------------------------------------------------------------------#SDK.log("Keyboard Input", "Near Fantastica", 5, "29.11.05") #------------------------------------------------------------------------------# * Begin SDK Enable Test#------------------------------------------------------------------------------#if SDK.state("Keyboard Input") == true module Keyboard #-------------------------------------------------------------------------- @keys = [] @pressed = [] Mouse_Left = 1 Mouse_Right = 2 Back= 8 Tab = 9 Enter = 13 Shift = 16 Ctrl = 17 Alt = 18 Esc = 27 Space = 32 Numberkeys = {} Numberkeys[0] = 48 Numberkeys[1] = 49 Numberkeys[2] = 50 Numberkeys[3] = 51 Numberkeys[4] = 52 Numberkeys[5] = 53 Numberkeys[6] = 54 Numberkeys[7] = 55 Numberkeys[8] = 56 Numberkeys[9] = 57 Numberpad = {} Numberpad[0] = 45 Numberpad[1] = 35 Numberpad[2] = 40 Numberpad[3] = 34 Numberpad[4] = 37 Numberpad[5] = 12 Numberpad[6] = 39 Numberpad[7] = 36 Numberpad[8] = 38 Numberpad[9] = 33 Letters = {} Letters["A"] = 65 Letters["B"] = 66 Letters["C"] = 67 Letters["D"] = 68 Letters["E"] = 69 Letters["F"] = 70 Letters["G"] = 71 Letters["H"] = 72 Letters["I"] = 73 Letters["J"] = 74 Letters["K"] = 75 Letters["L"] = 76 Letters["M"] = 77 Letters["N"] = 78 Letters["O"] = 79 Letters["P"] = 80 Letters["Q"] = 81 Letters["R"] = 82 Letters["S"] = 83 Letters["T"] = 84 Letters["U"] = 85 Letters["V"] = 86 Letters["W"] = 87 Letters["X"] = 88 Letters["Y"] = 89 Letters["Z"] = 90 Fkeys = {} Fkeys[1] = 112 Fkeys[2] = 113 Fkeys[3] = 114 Fkeys[4] = 115 Fkeys[5] = 116 Fkeys[6] = 117 Fkeys[7] = 118 Fkeys[8] = 119 Fkeys[9] = 120 Fkeys[10] = 121 Fkeys[11] = 122 Fkeys[12] = 123 Collon = 186 Equal = 187 Comma = 188 Underscore = 189 Dot = 190 Backslash = 191 Lb = 219 Rb = 221 Quote = 222 State = Win32API.new("user32","GetKeyState",['i'],'i') Key = Win32API.new("user32","GetAsyncKeyState",['i'],'i') #-------------------------------------------------------------------------- def Keyboard.getstate(key) return true unless State.call(key).between?(0, 1) return false end #-------------------------------------------------------------------------- def Keyboard.testkey(key) Key.call(key) & 0x01 == 1 end #-------------------------------------------------------------------------- def Keyboard.update @keys = [] @keys.push(Keyboard::Mouse_Left) if Keyboard.testkey(Keyboard::Mouse_Left) @keys.push(Keyboard::Mouse_Right) if Keyboard.testkey(Keyboard::Mouse_Right) @keys.push(Keyboard::Back) if Keyboard.testkey(Keyboard::Back) @keys.push(Keyboard::Tab) if Keyboard.testkey(Keyboard::Tab) @keys.push(Keyboard::Enter) if Keyboard.testkey(Keyboard::Enter) @keys.push(Keyboard::Shift) if Keyboard.testkey(Keyboard::Shift) @keys.push(Keyboard::Ctrl) if Keyboard.testkey(Keyboard::Ctrl) @keys.push(Keyboard::Alt) if Keyboard.testkey(Keyboard::Alt) @keys.push(Keyboard::Esc) if Keyboard.testkey(Keyboard::Esc) @keys.push(Keyboard::Space) if Keyboard.testkey(Keyboard::Space) for key in Keyboard::Numberkeys.values @keys.push(key) if Keyboard.testkey(key) end for key in Keyboard::Numberpad.values @keys.push(key) if Keyboard.testkey(key) end for key in Keyboard::Letters.values @keys.push(key) if Keyboard.testkey(key) end for key in Keyboard::Fkeys.values @keys.push(key) if Keyboard.testkey(key) end @keys.push(Keyboard::Collon) if Keyboard.testkey(Keyboard::Collon) @keys.push(Keyboard::Equal) if Keyboard.testkey(Keyboard::Equal) @keys.push(Keyboard::Comma) if Keyboard.testkey(Keyboard::Comma) @keys.push(Keyboard::Underscore) if Keyboard.testkey(Keyboard::Underscore) @keys.push(Keyboard::Dot) if Keyboard.testkey(Keyboard::Dot) @keys.push(Keyboard::Backslash) if Keyboard.testkey(Keyboard::Backslash) @keys.push(Keyboard::Lb) if Keyboard.testkey(Keyboard::Lb) @keys.push(Keyboard::Rb) if Keyboard.testkey(Keyboard::Rb) @keys.push(Keyboard::Quote) if Keyboard.testkey(Keyboard::Quote) @pressed = [] @pressed.push(Keyboard::Mouse_Left) if Keyboard.getstate(Keyboard::Mouse_Left) @pressed.push(Keyboard::Mouse_Right) if Keyboard.getstate(Keyboard::Mouse_Right) @pressed.push(Keyboard::Back) if Keyboard.getstate(Keyboard::Back) @pressed.push(Keyboard::Tab) if Keyboard.getstate(Keyboard::Tab) @pressed.push(Keyboard::Enter) if Keyboard.getstate(Keyboard::Enter) @pressed.push(Keyboard::Shift) if Keyboard.getstate(Keyboard::Shift) @pressed.push(Keyboard::Ctrl) if Keyboard.getstate(Keyboard::Ctrl) @pressed.push(Keyboard::Alt) if Keyboard.getstate(Keyboard::Alt) @pressed.push(Keyboard::Esc) if Keyboard.getstate(Keyboard::Esc) @pressed.push(Keyboard::Space) if Keyboard.getstate(Keyboard::Space) for key in Keyboard::Numberkeys.values @pressed.push(key) if Keyboard.getstate(key) end for key in Keyboard::Numberpad.values @pressed.push(key) if Keyboard.getstate(key) end for key in Keyboard::Letters.values @pressed.push(key) if Keyboard.getstate(key) end for key in Keyboard::Fkeys.values @pressed.push(key) if Keyboard.getstate(key) end @pressed.push(Keyboard::Collon) if Keyboard.getstate(Keyboard::Collon) @pressed.push(Keyboard::Equal) if Keyboard.getstate(Keyboard::Equal) @pressed.push(Keyboard::Comma) if Keyboard.getstate(Keyboard::Comma) @pressed.push(Keyboard::Underscore) if Keyboard.getstate(Keyboard::Underscore) @pressed.push(Keyboard::Dot) if Keyboard.getstate(Keyboard::Dot) @pressed.push(Keyboard::Backslash) if Keyboard.getstate(Keyboard::Backslash) @pressed.push(Keyboard::Lb) if Keyboard.getstate(Keyboard::Lb) @pressed.push(Keyboard::Rb) if Keyboard.getstate(Keyboard::Rb) @pressed.push(Keyboard::Quote) if Keyboard.getstate(Keyboard::Quote) end #-------------------------------------------------------------------------- def Keyboard.trigger?(key) return true if @keys.include?(key) return false end #-------------------------------------------------------------------------- def Keyboard.pressed?(key) return true if @pressed.include?(key) return false end #end #------------------------------------------------------------------------------# * End SDK Enable Test#------------------------------------------------------------------------------end #=========================Game_Fixes============================= $showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ''$showm.call(18,0,0,0)$showm.call(13,0,0,0)$showm.call(13,0,2,0)$showm.call(18,0,2,0)$mouse = Mouse_PositionCheck.new$getCursorPos = Win32API.new("user32", "GetCursorPos", ['P'], 'V')$setCursorPos = Win32API.new("user32", "SetCursorPos", ['I','I'], 'V')$bg = Sprite.new$bg.bitmap = RPG::Cache.icon('Icon')$bg.z = 999999$bg.y = 0$bg.x = 0 module Input if @self_update == nil @self_update = method('update') @self_press = method('press?') @self_rep = method('repeat?') end def self.update @self_update.call $mouse.main Keyboard.update end def self.trigger?(key_code) if @self_press.call(key_code) return true end if key_code == C return Keyboard.trigger?(Keyboard::Mouse_Left) elsif key_code == B return Keyboard.trigger?(Keyboard::Mouse_Right) else return @self_press.call(key_code) end end def self.repeat?(key_code) if @self_rep.call(key_code) return true end if key_code == C return Keyboard.pressed?(Keyboard::Mouse_Left) elsif key_code == B return Keyboard.pressed?(Keyboard::Mouse_Right) else return @self_rep.call(key_code) end end end class Arrow_Enemy < Arrow_Base def update super $game_troop.enemies.size.times do break if self.enemy.exist? @index += 1 @index %= $game_troop.enemies.size end #size = 0 #for i in 0...$game_troop.enemies.size # size += 1 if $game_troop.enemies[i].hp > 0 #end size = $game_troop.enemies.size if size == nil @index = ((size / 640.0) * $bg.x.to_f).to_i if self.enemy != nil self.x = self.enemy.screen_x self.y = self.enemy.screen_y end end end class Arrow_Actor < Arrow_Base def update super @index = 0 if $bg.x > 0 and $bg.x <= 160 and 0 <= ($game_party.actors.size - 1) @index = 1 if $bg.x > 160 and $bg.x <= 320 and 1 <= ($game_party.actors.size - 1) @index = 2 if $bg.x > 320 and $bg.x <= 480 and 2 <= ($game_party.actors.size - 1) @index = 3 if $bg.x > 480 and $bg.x <= 640 and 3 <= ($game_party.actors.size - 1) if self.actor != nil self.x = self.actor.screen_x self.y = self.actor.screen_y end end end class Window_Target < Window_Selectable alias gupdate update def update @defaultx = 0 if @defaultx == nil if @defaultx != self.x @defaultx = self.x self.refresh_rect_positions return else gupdate end end def update_cursor_rect if @index == -1 self.cursor_rect.set(0, 0, self.width - 32, @item_max * 116 - 20) else self.cursor_rect.set(0, @index * 116, self.width - 32, 96) end end end class Scene_Battle def phase3_setup_command_window @party_command_window.active = false @party_command_window.visible = false @actor_command_window.active = true @actor_command_window.visible = true @actor_command_window.x = @actor_index * 160 @actor_command_window.refresh_rect_positions @actor_command_window.index = 0 end end class Scene_Equip def initialize(actor_index = 0, equip_index = 0) @actor_index = actor_index @equip_index = equip_index @actor = $game_party.actors[@actor_index] end alias gmain main def main @dummy = Window_EquipItem.new(@actor, 99) gmain @dummy.dispose end alias gupdate_right update_right def update_right if @right_window.index == -999999 if Input.trigger?(Input::C) $game_system.se_play($data_system.buzzer_se) end else gupdate_right end end def refresh @item_window1.visible = (@right_window.index == 0) @item_window2.visible = (@right_window.index == 1) @item_window3.visible = (@right_window.index == 2) @item_window4.visible = (@right_window.index == 3) @item_window5.visible = (@right_window.index == 4) @dummy.visible = (@right_window.index == -999999) item1 = @right_window.item case @right_window.index when 0 @item_window = @item_window1 when 1 @item_window = @item_window2 when 2 @item_window = @item_window3 when 3 @item_window = @item_window4 when 4 @item_window = @item_window5 when -999999 return end if @right_window.active @left_window.set_new_parameters(nil, nil, nil) end if @item_window.active item2 = @item_window.item last_hp = @actor.hp last_sp = @actor.sp @actor.equip(@right_window.index, item2 == nil ? 0 : item2.id) new_atk = @actor.atk new_pdef = @actor.pdef new_mdef = @actor.mdef @actor.equip(@right_window.index, item1 == nil ? 0 : item1.id) @actor.hp = last_hp @actor.sp = last_sp @left_window.set_new_parameters(new_atk, new_pdef, new_mdef) end end end class Scene_Skill def update_target if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @skill_window.active = true @target_window.visible = false @target_window.active = false return end if Input.trigger?(Input::C) unless @actor.skill_can_use?(@skill.id) $game_system.se_play($data_system.buzzer_se) return end if @target_window.index == -1 used = false for i in $game_party.actors used |= i.skill_effect(@actor, @skill) end end if @target_window.index == -2 target = $game_party.actors[@target_window.index + 10] used = target.skill_effect(@actor, @skill) end if @target_window.index <= -3 $game_system.se_play($data_system.buzzer_se) return end if @target_window.index >= 0 target = $game_party.actors[@target_window.index] used = target.skill_effect(@actor, @skill) end if used $game_system.se_play(@skill.menu_se) @actor.sp -= @skill.sp_cost @status_window.refresh @skill_window.refresh @target_window.refresh if $game_party.all_dead? $scene = Scene_Gameover.new return end if @skill.common_event_id > 0 $game_temp.common_event_id = @skill.common_event_id $scene = Scene_Map.new return end end unless used $game_system.se_play($data_system.buzzer_se) end return end end end class Scene_File def update @help_window.update for i in @savefile_windows i.update end if Input.trigger?(Input::C) if @file_index == -1 $game_system.se_play($data_system.buzzer_se) else on_decision(make_filename(@file_index)) $game_temp.last_file_index = @file_index return end end if Input.trigger?(Input::B) on_cancel return end if $bg.y > 64 and $bg.y < 168 if @savefile_windows[0].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = true @savefile_windows[1].selected = false @savefile_windows[2].selected = false @savefile_windows[3].selected = false @file_index = 0 elsif $bg.y > 168 and $bg.y < 272 if @savefile_windows[1].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = false @savefile_windows[1].selected = true @savefile_windows[2].selected = false @savefile_windows[3].selected = false @file_index = 1 elsif $bg.y > 272 and $bg.y < 376 if @savefile_windows[2].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = false @savefile_windows[1].selected = false @savefile_windows[2].selected = true @savefile_windows[3].selected = false @file_index = 2 elsif $bg.y > 376 and $bg.y < 480 if @savefile_windows[3].selected == false $game_system.se_play($data_system.cursor_se) end @savefile_windows[0].selected = false @savefile_windows[1].selected = false @savefile_windows[2].selected = false @savefile_windows[3].selected = true @file_index = 3 else @file_index = -1 @savefile_windows[0].selected = false @savefile_windows[1].selected = false @savefile_windows[2].selected = false @savefile_windows[3].selected = false end end endclass Scene_Menu def update_status if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @command_window.active = true @status_window.active = false @status_window.index = -1 return end if Input.trigger?(Input::C) unless @status_window.index < 0 case @command_window.index when 1 if $game_party.actors[@status_window.index].restriction >= 2 $game_system.se_play($data_system.buzzer_se) return end $game_system.se_play($data_system.decision_se) $scene = Scene_Skill.new(@status_window.index) when 2 $game_system.se_play($data_system.decision_se) $scene = Scene_Equip.new(@status_window.index) when 3 $game_system.se_play($data_system.decision_se) $scene = Scene_Status.new(@status_window.index) end return end end end end class Game_Player def update last_moving = moving? unless moving? or $game_system.map_interpreter.running? or @move_route_forcing or $game_temp.message_window_showing or @cant_move case Input.dir4 when 2 move_down when 4 move_left when 6 move_right when 8 move_up end end last_real_x = @real_x last_real_y = @real_y super if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y $game_map.scroll_down(@real_y - last_real_y) end if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X $game_map.scroll_left(last_real_x - @real_x) end if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X $game_map.scroll_right(@real_x - last_real_x) end if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y $game_map.scroll_up(last_real_y - @real_y) end unless moving? if last_moving result = check_event_trigger_here([1,2]) if result == false unless $DEBUG and Input.press?(Input::CTRL) if @encounter_count > 0 @encounter_count -= 1 end end end end if Input.trigger?(Input::C) check_curor_field if (@field_x == self.x + 1 and @field_y == self.y and self.direction == 6) or (@field_x == self.x - 1 and @field_y == self.y and self.direction == 4) or (@field_x == self.x and @field_y == self.y + 1 and self.direction == 2) or (@field_x == self.x and @field_y == self.y - 1 and self.direction == 8) check_event_trigger_there([0,1,2]) end end if Input.repeat?(Input::C) check_curor_field unless moving? or $game_system.map_interpreter.running? or @move_route_forcing or $game_temp.message_window_showing or @cant_move and not (@field_x == self.x and @field_y == self.y) move_by_mouse end check_event_trigger_here([0]) end end end def check_curor_field dummyx = $game_map.display_x > 0 ? $bg.x + 16 : $bg.x @field_x = dummyx / 32 + $game_map.display_x / 128 @field_y = $bg.y / 32 + $game_map.display_y / 128 end def move_by_mouse dy = @field_x - self.x dx = self.y - @field_y if dx > 0 and dy > 0 #quarter 1 if dx > dy if passable?(self.x, self.y, 8) move_up else move_right end return elsif dx < dy if passable?(self.x, self.y, 6) move_right else move_up end return elsif dx == dy if passable?(self.x, self.y, 8) move_up else move_right end return end elsif dx > 0 and dy < 0 #quarter 2 if dx > -dy if passable?(self.x, self.y, 8) move_up else move_left end return elsif dx < -dy if passable?(self.x, self.y, 4) move_left else move_up end return elsif dx == -dy if passable?(self.x, self.y, 8) move_up else move_left end return end elsif dx < 0 and dy < 0 #quarter 2 if -dx > -dy if passable?(self.x, self.y, 2) move_down else move_left end return elsif -dx < -dy if passable?(self.x, self.y, 4) move_left else move_down end return elsif -dx == -dy if passable?(self.x, self.y, 2) move_down else move_left end return end elsif dx < 0 and dy > 0 #quarter 4 if -dx > dy if passable?(self.x, self.y, 2) move_down else move_right end return elsif -dx < dy if passable?(self.x, self.y, 6) move_right else move_down end return elsif -dx == dy if passable?(self.x, self.y, 2) move_down else move_right end return end elsif dx == 0 and dy < 0 move_left elsif dx == 0 and dy > 0 move_right elsif dx < 0 and dy == 0 move_down elsif dx > 0 and dy == 0 move_up end endendLink to comment
Share on other sites
1 answer to this question
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now