Coding Well Forum

by **Captain Thark** » Mon Feb 05, 2007 9:16 pm

A few more screens.

All games need a lava level.

Further blazing action.

by **Robopanda333** » Tue Feb 06, 2007 12:51 am

ok the problem you are haveing has to do with an invalid class call.
the class "game_party" does not exisit... so when trying to get the item member (game_party.item.key) the game is like OMG however the class "Game_Party" does exist but the item member is only an array it isn't a class and doesn't have members itself... i think this guy overloaded that class in another script and didn't tell anyone...
um a by pass for that (unless you have revive items in the game, as in when you did you don't) would be to skip all that item checking by commenting it out then just return true (i think it's true) so that when ever your HP goes to 0 you die

EDIT: ya what i just wrote does work... if you are confused check my screenshot, that is after editing. and the '#'s go all the way to the second to last end... NOT THE LAST ONE... ok good.

by **Captain Thark** » Tue Feb 06, 2007 1:07 am

Robopanda333 wrote:ok the problem you are haveing has to do with an invalid class call.
the class "game_party" does not exisit... so when trying to get the item member (game_party.item.key) the game is like OMG however the class "Game_Party" does exist but the item member is only an array it isn't a class and doesn't have members itself... i think this guy overloaded that class in another script and didn't tell anyone...
um a by pass for that (unless you have revive items in the game, as in when you did you don't) would be to skip all that item checking by commenting it out then just return true (i think it's true) so that when ever your HP goes to 0 you die

I actually tried just turning off the auto revive feature of the script. It didn't work.
There's no reason to use the part of the script that does that so if I'd love to delete it, but I don't know what to change wthout screwing up the whole thing.

by **tsuckow** » Tue Feb 06, 2007 4:54 pm

When, your done or have an actual non buggy version, ill see about making a full fleged installer.

by **Robopanda333** » Tue Feb 06, 2007 5:02 pm

Copy and paste the code REPLACING the old file's text with this... it should work

Code: Select all: #============================================================================ # * Mr.Mo's ABS #============================================================================ # Mr.Mo "Muhammet Sivri" # Version 4.0 # 09.16.06 # Thanks to Near Fantastica's methods; # - In Range?, Get Range, In Direction?, enemy_dead?, treasure # - Class Game_Range(highly modified for convinience) # - Scene_Skill(main, update_shk) # Most were modified by me to my style and to increase performance and # cleaner code. # # Give Credit to Near Fantastica as well, those methods saved me time and helped. # # Edited BY: ROBOPANDA333 (commented buggy auto revive, so don't use auto revive # items... word) #============================================================================ # Intoduction #============================================================================ # I wasnt happy with the current version of Near's ABS, and he wasn't going to # update it anymore. So instead I made an ABS. # Detailed Tutorial on the ABS and HUD modification tutorials added. #============================================================================ # Explanation #============================================================================ #--Skill Casting : # If the skill is not ranged and its suppose to attack one enemy, it will attack # the closest enemy. # If the skill scope is more then 1 enemy, it can be ranged. It will just attack # the enemies in that range. # The skill animations can be assigned in the Constants section # The default skill animation suffix is _cast. If you want a skill to have the # default animation(_casT) just don't do anything for it :) #--Enemy AI : # 0 = Dummy - Will not attack but can be attacked # 1 = See Range - Will attack only if it can see an enemy # 2 = Hear Range - WIll attack only if it can hear an enemy # 3 = Hear or See Range - Will attack if it can see or hear enemy # 4 = Ally Under Attack - Will attack if its ally is under attack and if it can # see or hear the enemy # #--Comment List : # To add a comment, click on the event command list, in the first tab, you should # see the [ Comment... ] button. It should look similar to this. # # V = value # # Comment: ABS - Required for recognizing enemies. # Comment: ID V - Enemy ID from the database. # Comment: Behavior V - Refer to Enemy AI. # Comment: Sight V - See range the enemy can hear. # Comment: Sound V - Sound range the enemy can hear. # Comment: Aggressiveness V - How fast will the enemy attack. # Comment: Speed V - How fast will the enemy move when in battle # Comment: Frequency V - What rate will the enemy move when in battle # Comment: Trigger V - Refer to Triggers. # Comment: Respawn V # # Example: # # Comment: ABS # Comment: ID 1 # Comment: Behavior 1 # Comment: Sight 5 # Comment: Sound 5 # Comment: Aggressiveness 1 # Comment: Speed 4 # Comment: Frequency 4 # Comment: Trigger 0 # Comment: Respawn 0 # #--Triggers : # Trigger 0 - Will erase the event. # Trigger 1 2 - Will turn on a switch with the ID of 2. # Trigger 2 5 9 - Will change the Varaible's value with the ID of 5 to 9. If 9 is # set to 0, the the Variable 5 will be added 1. # Trigger 3 1 - Will change the local switch of the enemy to 1("A"). # 1 = A # 2 = B # 3 = C # 4 = D # #--Startegy Usage : # You can make an event a dummy, it can still be attacked, but it won't retaliate. # This is usefull for practices, or teacing the player how to fight. It can also # be used for NPC's. # #--Default Animations # charactername_melee - melee attacks # charactername_cast - skills #============================================================================ #-------------------------------------------------------------------------- # * SDK Log Script #-------------------------------------------------------------------------- SDK.log("Mr.Mo's ABS", "Mr.Mo", 1, "09.16.06") #-------------------------------------------------------------------------- # * Begin SDK Enable Test #-------------------------------------------------------------------------- if SDK.state("Mr.Mo's ABS") == true #-------------------------------------------------------------------------- # * Constants - MAKE YOUR EDITS HERE #-------------------------------------------------------------------------- CAN_DASH = true #Can the player Dash? CAN_SNEAK = true #Can the player sneak? #-------------------------------------------------------------------------- ATTACK_KEY = Input::Letters["S"] #-------------------------------------------------------------------------- # Do not change the '=> 0', part. # To Add more just make a new line; there are 10 examples :P # Besides Numberkeys, you can use; # Input::Letters["LETTER"] Make sure the letter is in CAPS. # Input::Numberpad[number] # Input::Fkeys[number] # For more keys look in to the Input Script SKILL_KEYS = {Input::Numberkeys[0] => 0, Input::Numberkeys[1] => 0, Input::Numberkeys[2] => 0, Input::Numberkeys[3] => 0, Input::Numberkeys[4] => 0, Input::Numberkeys[5] => 0, Input::Numberkeys[6] => 0, Input::Numberkeys[7] => 0, Input::Numberkeys[8] => 0, Input::Numberkeys[9] => 0, Input::Letters["A"] => 0, } # You can use a skill key for item key as well, but I used some other keys here # as well. ITEM_KEYS = {Input::Numberkeys[0] => 0, Input::Numberkeys[1] => 0, Input::Letters["B"] => 0, } # NOTE: IF you don't plan to use item or skill hot keys just deleted inside { }. #-------------------------------------------------------------------------- SNEAK_KEY = Input::Letters["Z"] DASH_KEY = Input::Letters["X"] #-------------------------------------------------------------------------- # Add Dash and Sneak animation_suffix here. DASH_ANIMATION = "_dash" SNEAK_ANIMATION = "_sneak" # Change characterset when dash or sneak? DASH_SHO_AN = false SNEAK_SHO_AN = false #-------------------------------------------------------------------------- # You do not need to add the animation suffixes if you don't want the player # to animate when attacking. #-------------------------------------------------------------------------- #Ranged Weapons RANGE_WEAPONS = {} # RANGE_WEAPONS[Weapon_ID] = [Character Set Name, Move Speed, Animation, Ammo, Range, # Mash Time(in seconds), Kick Back(in tiles),Animation Suffix] # Leave kickback 0 if you don't want kick back effect. RANGE_WEAPONS[17] = ["Ammo", 10, 4, 0, 10, 3, 1, "_bow"] RANGE_WEAPONS[18] = ["Ammo", 10, 4, 33, 10, 1, 0, "_bow"] #------------------------------------------------------------------------- #Ranged Skills RANGE_SKILLS = {} # RANGE_SKILLS[Skill_ID] = [Range, Move Speed, Character Set Name, Mash Time(in seconds), Kick Back(in tiles)] RANGE_SKILLS[7] = [10, 5, "Magic Balls", 3, 1] #-------------------------------------------------------------------------- #Ranged Explosives RANGE_EXPLODE = {} # RANGE_EXPLODE[Skill_ID] = [Range, Move Speed, Character Set Name, Explosive Range, Mash Time(in seconds), Kick Back(in tiles)] RANGE_EXPLODE[8] = [10, 6, "183-Rock02", 5, 3, 2] #-------------------------------------------------------------------------- # Since Melee weapons aren't listed I made this for customazation of melee weapons. MELEE_CUSTOM = {} # if left blank the default mash time will be MASH_TIME(below) # No need to use the animation suffix if you don't plan to animate the player's character set. # MELEE_CUSTOM[Weapon_ID] = [Mash Time(in seconds), Kick Back(in tiles), animation suffix] MELEE_CUSTOM[1] = [3, 0, "_melee"] MELEE_CUSTOM[2] = [10, 1] #-------------------------------------------------------------------------- # Since some skills won't be listed(i.e non-ranged) I made this for customazation of melee weapons. SKILL_CUSTOM = {} # if left blank the default mash time will be MASH_TIME(below) # No need to use the animation suffix if you don't plan to animate the player's character set. # SKILL_CUSTOM[Skill_ID] = [Mash Time(in seconds), Kick Back(in tiles), animation suffix] SKILL_CUSTOM[1] = [3, 0] SKILL_CUSTOM[7] = [3, 0] SKILL_CUSTOM[8] = [3, 0, "_cast"] #-------------------------------------------------------------------------- #Game over once the player is dead? GAME_OVER_DEAD = true # When the leader dies and there are alive members, change party leader? NEXT_LEADER = false #-------------------------------------------------------------------------- #Mash Time #Determines the cool down period between attacks of the player, in seconds. MASH_TIME = 3 #-------------------------------------------------------------------------- #Should it display damage? DISPLAY_DAMAGE = true #-------------------------------------------------------------------------- #Hotkey should say HOTKEY_SAY = "Assigned to key!" #-------------------------------------------------------------------------- #Terrain Tag PASS_TAG = 1 #-------------------------------------------------------------------------- ANIMATE_PLAYER = false ANIMATE_ENEMY = false #-------------------------------------------------------------------------- DASH_SPEED = 5 SNEAK_SPEED = 3 #-------------------------------------------------------------------------- #Max frames the player can run or sneak DASH_MAX = 100 SNEAK_MAX = 100 #-------------------------------------------------------------------------- #Should the states be gone after a while? STATES_UPDATE = true #If true STATES = {} #STATES[STATE_ID] = [DURATION in FRAMES, 0] #if Duration is 0 the state will stay there until healed(item, skill). #10 frames = 1 sec STATES[1] = 0 #Until Healed STATES[2] = 200 #20 seconds STATES[3] = 200 #20 seconds STATES[4] = 200 #20 seconds STATES[5] = 200 #20 seconds STATES[6] = 200 #20 seconds STATES[7] = 200 #20 seconds STATES[8] = 200 #20 seconds STATES[9] = 200 #20 seconds STATES[10] = 200 #20 seconds STATES[17] = 200 #20 seconds STATES[18] = 200 #20 seconds STATES[19] = 200 #20 seconds #-------------------------------------------------------------------------- # Allow state effects? STATE_EFFECTS = true # Assign the ID of states to each variable. Each effect is described. You can # add more then one id to each to get the effect you want. STUN_EFFECT = [2] # No movement/atk/skill, and can't use items. DAZZLE_EFFECT = [4] # Makes the screen bright. MUTE_EFFECT = [5] # Can't use skill. CONFUSE_EFFECT = [6] # Controls randomly don't work. SLEEP_EFFECT = [7] # Can't move until you get hit. PARALAYZE_EFFECT = [8] # Move slowly, cant attack or use skills. CLUMSY_EFFECT = [9,10] # Can't run or sneak. DELAY_EFFECT = [11] # Walk slow, can't run. BLIND_EFFECT = [17] # Make screen darker. SPEED_UP = [18] # Can run without depleting the bar. LIGHT_FEET =[19] # Can sneak without depleting the bar. #-------------------------------------------------------------------------- #Display Level UP? DISPLAY_LEVELUP = true #Level Up Music, leave "" if no music LEVELUP_MUSIC = "" #-------------------------------------------------------------------------- #Fade dead? FADE_DEAD = true #-------------------------------------------------------------------------- ANIMATION_DIVIDE = 2 #-------------------------------------------------------------------------- DAMAGE_FONT_NAME = "Arial Black" #-------------------------------------------------------------------------- DAMAGE_FONT_SIZE = 22 #-------------------------------------------------------------------------- # To change the color you need to adjust the numbers below. # The numbers reperesnt 3 colors, red, greend and blue. All you have to do is # just change the numbers. # Color.new(RED,GREEN,BLUE) DAMAGE_FONT_COLOR = Color.new(0,0,0) #-------------------------------------------------------------------------- # If the party has a revive item, than the player will revive after death. REVIVE = false # Death(Knockout) state Id DEATH_STATE_ID = 1 #-------------------------------------------------------------------------- # * Class Mo ABS - DO NOT EDIT BELOW, if you don't know what you are doing :) #-------------------------------------------------------------------------- class MrMo_ABS #-------------------------------------------------------------------------- # * Public Instance Variables #-------------------------------------------------------------------------- attr_accessor :active #The ABS Active Boolean attr_accessor :enemies #Enemy List attr_accessor :can_dash #Player Dash Boolean attr_accessor :can_sneak #Player Sneak Boolean attr_accessor :can_update_states # Can Update States attr_accessor :attack_key #Attack Key attr_accessor :skill_keys #Skill Keys attr_accessor :item_keys #Item Keys attr_accessor :range attr_accessor :damage_display attr_accessor :dash_max attr_accessor :dash_min attr_accessor :sneak_max attr_accessor :sneak_min #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(con=true) #ABS Active Boolean @active = con #ABS Enemy Variables @enemies = {} #Dash @can_dash = CAN_DASH #Sneak @can_sneak = CAN_SNEAK #States @can_update_states = STATES_UPDATE #Attack Key @attack_key = ATTACK_KEY #Skill Keys @skill_keys = SKILL_KEYS #Item Keys @item_keys = ITEM_KEYS #Button Mash @button_mash = 0 #Ranged Skills and Weapons @range = [] #Display Demage true:false @damage_display = DISPLAY_DAMAGE #Game Over? @game_over = GAME_OVER_DEAD #Player Animated? @player_ani = ANIMATE_PLAYER #Enemy Animated? @enemy_ani = ANIMATE_ENEMY # Dashing @dashing = false @dash_max = DASH_MAX @dash_min = @dash_max @dash_speed = DASH_SPEED # Sneaking @sneaking = false @sneak_max = SNEAK_MAX @sneak_min = @sneak_max @sneak_speed = SNEAK_SPEED # Old Speed @old_speed = 4 #PvP - N+ Only @pvp_active = true end #-------------------------------------------------------------------------- # * Range Weapons #-------------------------------------------------------------------------- def RANGE_WEAPONS return RANGE_WEAPONS end #-------------------------------------------------------------------------- # * Range Skills #-------------------------------------------------------------------------- def RANGE_SKILLS return RANGE_SKILLS end #-------------------------------------------------------------------------- # * Range Explode #-------------------------------------------------------------------------- def RANGE_EXPLODE return RANGE_EXPLODE end #-------------------------------------------------------------------------- # * Hotkey #-------------------------------------------------------------------------- def HOTKEY_SAY return HOTKEY_SAY end #-------------------------------------------------------------------------- # * Pass Tag #-------------------------------------------------------------------------- def PASS_TAG return PASS_TAG end #-------------------------------------------------------------------------- # * Animation Divide #-------------------------------------------------------------------------- def ANIMATION_DIVIDE return ANIMATION_DIVIDE end #-------------------------------------------------------------------------- # * Damage Font Size #-------------------------------------------------------------------------- def DAMAGE_FONT_SIZE return DAMAGE_FONT_SIZE end #-------------------------------------------------------------------------- # * Damage Font Color #-------------------------------------------------------------------------- def DAMAGE_FONT_COLOR return DAMAGE_FONT_COLOR end #-------------------------------------------------------------------------- # * Damage Font NAme #-------------------------------------------------------------------------- def DAMAGE_FONT_NAME return DAMAGE_FONT_NAME end #-------------------------------------------------------------------------- # * ABS Refresh(Event, List, Characterset Name #-------------------------------------------------------------------------- def refresh(event, list, character_name) @get_hate = true #Delete the event from the list @enemies.delete(event.id) #Skip the event if its invisible or doesn't contain a list return if character_name == "" or list == nil #Get the parameters parameters = SDK.event_comment_input(event, 9, "ABS") #Skip if the paramete is NIL return if parameters.nil? #Get Enemy ID id = parameters[0].split #Get Enemy enemy = $data_enemies[id[1].to_i] #Skip If Enemy is NIL return if enemy == nil @enemies[event.id] = ABS_Enemy.new(enemy.id) #Set Event ID @enemies[event.id].event_id = event.id #Get Event @enemies[event.id].event = event #Set Behavior behavior = parameters[1].split @enemies[event.id].behavior = behavior[1].to_i #Set See Range see_range = parameters[2].split @enemies[event.id].see_range = see_range[1].to_i #Set Hear Range hear_range = parameters[3].split @enemies[event.id].hear_range = hear_range[1].to_i #Set Aggresiveness aggressiveness = parameters[4].split @enemies[event.id].aggressiveness = aggressiveness[1].to_i #Set Speed speed = parameters[5].split @enemies[event.id].temp_speed = speed[1].to_i #Set Frequency freq = parameters[6].split @enemies[event.id].temp_frequency = freq[1].to_i #Set Trigger trigger = parameters[7].split @enemies[event.id].trigger= [trigger[1].to_i, trigger[2].to_i, trigger[3].to_i] #Respawn if parameters[8] != nil respawn = parameters[8].split @enemies[event.id].respawn = respawn[1].to_i * 10 end end #-------------------------------------------------------------------------- # * Update(Frame) #-------------------------------------------------------------------------- def update #Update Player update_player if @active #Update Enemy AI update_enemy if @enemies != {} and @active #Update Dash update_dash if @can_dash #Update Sneak update_sneak if @can_sneak #Update States update_states if @can_update_states #Update Ranged for range in @range next if range == nil range.update end end #-------------------------------------------------------------------------- # * Revive Actor #-------------------------------------------------------------------------- def revive_actor $game_temp.gameover = @game_over # items = [] # # Get the item that revives # for i in $Game_Party.items.key # next if $Game_Party.items[i] == 0 or $Game_Party.items[i] == nil # item = $data_items[i] # next if !item.minus_state_set.include?(DEATH_STATE_ID) or item.scope < 3 # items.push(i) # end # # If list is empty # if items == [] or items == nil or !REVIVE # $game_temp.gameover = @game_over # else # i = rand(items.size) # item = $data_items[items[i]] # # If effect scope is an ally # if item.scope >= 3 # # Apply item use effects to target actor # target = @actor # used = target.item_effect(item) # # If an item was used # if used # #Show animation on player # $game_player.animation_id = item.animation1_id # # Play item use SE # $game_system.se_play(item.menu_se) # # If consumable; Decrease used items by 1 # $game_party.lose_item(item.id, 1) if item.consumable # # If all party members are dead; Switch to game over screen # return $scene = Scene_Gameover.new if $game_party.all_dead? # # If common event ID is valid; Common event call reservation # return $game_temp.common_event_id = item.common_event_id if item.common_event_id > 0 # # If effect scope is other than an ally # end # else # # If command event ID is valid # if item.common_event_id > 0 # # Command event call reservation # $game_temp.common_event_id = item.common_event_id # # Play item use SE # $game_system.se_play(item.menu_se) # # If consumable; Decrease used items by 1 # $game_party.lose_item(item.id, 1) if item.consumable # end # end # end end #-------------------------------------------------------------------------- # * Update States(Frame) #-------------------------------------------------------------------------- def update_states # For Player actor = $game_party.actors[0] for id in $game_party.actors[0].states next if !STATES.has_key?(id) state = STATES[id] next if state == 0 add_state_effect(state,id) if actor.state_time == 0 actor.state_time += 1 if actor.state_time >= state $game_party.actors[0].remove_state(id) actor.state_time = 0 remove_state_effects(id) return end update_states_effects(id) end if actor.hp > 0 and actor.slip_damage? and Graphics.frame_count % (40) == 0 and !$game_player.moving? actor.hp -= [actor.maxhp / 100, 1].max if actor.hp == 0 $game_system.se_play($data_system.actor_collapse_se) if NEXT_LEADER and !$game_party.all_dead? move_forward else revive_actor end end $game_screen.start_flash(Color.new(255,0,0,128), 4) end end #-------------------------------------------------------------------------- # * Add State Effect(State, ID) #-------------------------------------------------------------------------- def add_state_effect(state,id) if STATE_EFFECTS if DAZZLE_EFFECT.include?(id) $game_screen.start_tone_change(Tone.new(200, 200, 130, 0), 20) elsif BLIND_EFFECT.include?(id) $game_screen.start_tone_change(Tone.new(-200,-200,-200, 0), 50) elsif STUN_EFFECT.include?(id) $game_player.movable = false elsif SLEEP_EFFECT.include?(id) $game_player.movable = false elsif PARALAYZE_EFFECT.include?(id) @old_speed = $game_player.move_speed elsif DELAY_EFFECT.include?(id) @old_speed = $game_player.move_speed end end end #-------------------------------------------------------------------------- # * Update State Effect(State, ID) #-------------------------------------------------------------------------- def update_states_effects(id) return if !STATE_EFFECTS if PARALAYZE_EFFECT.include?(id) $game_player.move_speed = 1 elsif DELAY_EFFECT.include?(id) $game_player.move_speed = 2 elsif SPEED_UP.include?(id) @dash_min = @dash_max elsif LIGHT_FEET.include?(id) @sneak_min = @sneak_max end end #-------------------------------------------------------------------------- # * Removve State Effect(State, ID) #-------------------------------------------------------------------------- def remove_state_effects(id) return if !STATE_EFFECTS if STUN_EFFECT.include?(id) $game_player.movable = true elsif DAZZLE_EFFECT.include?(id) $game_screen.start_tone_change(Tone.new(0, 0, 0, 0), 50) elsif BLIND_EFFECT.include?(id) $game_screen.start_tone_change(Tone.new(0, 0, 0, 0), 50) elsif SLEEP_EFFECT.include?(id) $game_player.movable = true elsif PARALAYZE_EFFECT.include?(id) $game_player.move_speed = @old_speed elsif DELAY_EFFECT.include?(id) $game_player.move_speed = @old_speed end end #-------------------------------------------------------------------------- # * Update Respawn(enemy) #-------------------------------------------------------------------------- def update_respawn(enemy) event = enemy.event return if enemy.respawn == 0 or event.erased == false enemy.respawn -= 1 if enemy.respawn == 0 event.moveto(event.event.x,event.event.y) event.erased = false event.refresh end end #-------------------------------------------------------------------------- # * Update Enemy AI(Frame) #-------------------------------------------------------------------------- def update_enemy #Get all the enemies on the list for enemy in @enemies.values #Skip NIL values next if enemy == nil if enemy.dead? update_respawn(enemy) next end #Update Enemy State update_enemy_state(enemy) #Skip if not on screen next if !in_screen?(enemy.event) next if !enemy.in_battle and !update_enemy_ai(enemy) update_enemy_battle(enemy) if enemy.in_battle and enemy.behavior != 0 end end #-------------------------------------------------------------------------- # * Update Enemy State(Enemy) #-------------------------------------------------------------------------- def update_enemy_state(enemy) for id in enemy.states next if !STATES.has_key?(id) state = STATES[id] next if state == 0 enemy.state_time += 1 if enemy.state_time >= state enemy.remove_state(id) enemy.state_time = 0 return end end if enemy.hp > 0 and enemy.slip_damage? and Graphics.frame_count % (40) == 0 enemy.hp -= [enemy.maxhp / 100, 1].max if enemy.hp <= 0 enemy_dead?(enemy,nil) end end end #-------------------------------------------------------------------------- # * Update Enemy Battle(Enemy) #-------------------------------------------------------------------------- def update_enemy_battle(enemy) #If the enemy can't see it's enemy, skip the enemy if !in_range?(enemy.event, enemy.attacking.event, enemy.see_range) and !in_range?(enemy.event, enemy.attacking.event, enemy.hear_range) #Restore movement restore_movement(enemy) #Take it out off battle enemy.in_battle = false enemy.attacking = nil return end #Update the enemy attack or follow update_enemy_attack(enemy,enemy.attacking) if Graphics.frame_count % (enemy.aggressiveness * 30) == 0 #Skip this if the attack killed the enemy return if enemy == nil or enemy.attacking == nil or enemy.event.moving? enemy.event.move_to(enemy.attacking.event) if !in_range?(enemy.event, enemy.attacking.event, 1) enemy.event.turn_to(enemy.attacking.event) if !in_direction?(enemy.event, enemy.attacking.event) and in_range?(enemy.event, enemy.attacking.event, 1) end #-------------------------------------------------------------------------- # * Update Enemy AI(Enemy) #-------------------------------------------------------------------------- def update_enemy_ai(enemy) #Get the enemy behavior b = enemy.behavior return true if b == 0 # Dummy #Next enemy if this enemy can't see the player return true if b == 1 and !can_enemy_see(enemy) #Next enemy if this enemy can't hear the player return true if b == 2 and !can_enemy_hear(enemy) #Next enemy if this enemy can't see or hear the player return true if b == 3 and !can_enemy_see(enemy) and !can_enemy_hear(enemy) #Next if its not return true if b == 4 and !enemy_ally_in_battle?(enemy) #Next enemy if this enemy can't see or hear the player return true if b == 5 and !can_enemy_see(enemy) and !can_enemy_hear(enemy) and !enemy_ally_in_battle?(enemy) #Return false return false end #-------------------------------------------------------------------------- # * Update Enemy Attack(Enemy) #-------------------------------------------------------------------------- def update_enemy_attack(e,actor) #Return if the enemy can't attack return if e.actions == nil or e.actions == [] #Get all actions for action in e.actions #Next if enemy can't attack next if enemy_pre_attack(e, action) #Get the current action kind case action.kind when 0 # Basic #Get the action case action.basic when 0 #Attack next if !in_range?(e.event, actor.event, 1) or !in_direction?(e.event, actor.event) #Attack it's enemy a = actor if actor.is_a?(ABS_Enemy) a = $game_party.actors[0] if !actor.is_a?(ABS_Enemy) a.attack_effect(e) #Animate the enemy e.event.animation_id = e.animation1_id animate(e.event, e.event.character_name+"_melee") if @enemy_ani #Show Animation hit_enemy(actor,e) if a.damage != "Miss" and a.damage != 0 #Check if enemy's enemy is dead return if enemy_dead?(a,e) #Make enemy return if !a.is_a?(ABS_Enemy) return if a.attacking == e and a.in_battle #Set the new target for the enemy a.attacking = e #The enemy is now in battle a.in_battle = true #Setup movement setup_movement(e) return when 1..3 #Nothing return end when 1..2 #Skill #Get the skill skill = $data_skills[action.skill_id] #Return if the skill is NIL return if skill == nil #Get the skill scope case skill.scope when 1 # One Enemy return if Graphics.frame_count % (e.aggressiveness * 30) != 0 next if !in_direction?(e.event, actor.event) next if !e.can_use_skill?(skill) #Animate the enemy e.event.animation_id = skill.animation1_id animate(e.event, e.event.character_name+"_cast") if @enemy_ani if RANGE_SKILLS.has_key?(skill.id) @range.push(Game_Ranged_Skill.new(e.event, e, skill)) e.sp -= skill.sp_cost return end #Attack the closest one $game_player.actor.effect_skill(e, skill) #Take off SP e.sp -= skill.sp_cost #Show Animetion on enemy hit_enemy($game_player, e, skill.animation2_id) if $game_player.actor.damage != "Miss" and $game_player.actor.damage != 0 #Return if enemy is dead return if enemy_dead?($game_player.actor,e) return when 3..4, 7 # User return if Graphics.frame_count % (e.aggressiveness * 100) != 0 next if e.hp > skill.power.abs #Animate the enemy e.event.animation_id = skill.animation1_id animate(e.event, e.event.character_name+"_cast") if @enemy_ani e.effect_skill(e, skill) e.sp -= skill.sp_cost e.event.animation_id = skill.animation2_id return end return end end end #-------------------------------------------------------------------------- # * Update Player #-------------------------------------------------------------------------- def update_player #Keep the current party leader updated @actor = $game_party.actors[0] #Update click time @button_mash -= 1 if @button_mash > 0 return if @button_mash > 0 #Check Ranged attack if Input.trigger?(@attack_key) #Check State Effect if STATE_EFFECTS for id in $game_party.actors[0].states return if STUN_EFFECT.include?(id) or PARALAYZE_EFFECT.include?(id) end end return player_range if RANGE_WEAPONS.has_key?(@actor.weapon_id) return player_melee end return if @enemies == {} #Check for Skill attacks for key in @skill_keys.keys next if @skill_keys[key] == nil or @skill_keys[key] == 0 next if !Input.trigger?(key) if STATE_EFFECTS for i in $game_party.actors[0].states return if STUN_EFFECT.include?(i) or PARALAYZE_EFFECT.include?(i) or MUTE_EFFECT.include?(i) end end id = @skill_keys[key] if RANGE_EXPLODE.has_key?(id) return player_explode(id) else return player_skill(id) end end #Check Item check_item end #-------------------------------------------------------------------------- # * Player Ranged Attack #-------------------------------------------------------------------------- def player_range #Get the weapon w = RANGE_WEAPONS[@actor.weapon_id] #Return if the ammo isn't there return if w[3] != 0 and $game_party.item_number(w[3]) == 0 # Show Weapon Aniamtion $game_player.animation_id = $data_weapons[@actor.weapon_id].animation1_id #Add mash time @button_mash = (w[5] == nil ? MASH_TIME*10 : w[5]*10) #Delete an ammo $game_party.lose_item(w[3], 1) if w[3] != 0 #Make the attack @range.push(Game_Ranged_Weapon.new($game_player, @actor, @actor.weapon_id)) #Animate return if w[7] == nil animate($game_player, $game_player.character_name+w[7].to_s) if @player_ani return end #-------------------------------------------------------------------------- # * Check Item #-------------------------------------------------------------------------- def check_item #Check for item usage for key in @item_keys.keys next if @item_keys[key] == nil or @item_keys[key] == 0 next if !Input.trigger?(key) if STATE_EFFECTS for i in $game_party.actors[0].states return if STUN_EFFECT.include?(i) end end item = $data_items[@item_keys[key]] return $game_system.se_play($data_system.buzzer_se) if !$game_party.item_can_use?(item.id) # If items are used up; Play buzzer SE return $game_system.se_play($data_system.buzzer_se) if $game_party.item_number(item.id) == 0 # If effect scope is an ally if item.scope >= 3 # Apply item use effects to target actor target = $game_party.actors[0] used = target.item_effect(item) # If an item was used if used #Show animation on player $game_player.animation_id = item.animation1_id # Play item use SE $game_system.se_play(item.menu_se) # If consumable; Decrease used items by 1 $game_party.lose_item(item.id, 1) if item.consumable # If all party members are dead; Switch to game over screen return $scene = Scene_Gameover.new if $game_party.all_dead? # If common event ID is valid; Common event call reservation return $game_temp.common_event_id = item.common_event_id if item.common_event_id > 0 # If effect scope is other than an ally end else # If command event ID is valid if item.common_event_id > 0 # Command event call reservation $game_temp.common_event_id = item.common_event_id # Play item use SE $game_system.se_play(item.menu_se) # If consumable; Decrease used items by 1 $game_party.lose_item(item.id, 1) if item.consumable end end end end #-------------------------------------------------------------------------- # * Player Melee Attack #-------------------------------------------------------------------------- def player_melee return if $data_weapons[@actor.weapon_id] == nil #Get all enemies for e in @enemies.values #Skip NIL values or dead enemies next if e == nil or e.dead? #Skip the enemy if its not close by or not facing next if !in_direction?($game_player, e.event) or !in_range?($game_player, e.event, 1) # Show Weapon Aniamtion $game_player.animation_id = $data_weapons[@actor.weapon_id].animation1_id #Add mash time m = MELEE_CUSTOM[@actor.weapon_id] if m != nil and m[0] != nil @button_mash = m[0]*10 else @button_mash = MASH_TIME*10 end #Attack the enemy e.attack_effect(@actor) #Get Animation a = $data_weapons[@actor.weapon_id].animation2_id #Hit enemy if the attack succeeds hit_enemy(e, @actor, a) if e.damage != "Miss" and e.damage != 0 #Jump jump(e.event, $game_player, MELEE_CUSTOM[@actor.weapon_id][1]) if e.damage != "Miss" and e.damage != 0 and MELEE_CUSTOM[@actor.weapon_id] != nil #Animate the player if MELEE_CUSTOM[@actor.weapon_id] != nil and MELEE_CUSTOM[@actor.weapon_id][2] == nil animate($game_player, $game_player.character_name+"_melee") if @player_ani elsif MELEE_CUSTOM[@actor.weapon_id] != nil m = MELEE_CUSTOM[@actor.weapon_id][2] animate($game_player, $game_player.character_name+m.to_s) if @player_ani end #Return if the enemy is dead return if enemy_dead?(e,@actor) #Set the new target for the enemy e.attacking = $game_player #The enemy is now in battle e.in_battle = true #Setup movement setup_movement(e) end end #-------------------------------------------------------------------------- # * Player Skill Attack #-------------------------------------------------------------------------- def player_skill(id) #Get Skill skill = $data_skills[id] #Return if the skill doesn't exist return if skill == nil #Return if the actor doesn't have the skill return if !@actor.skills.include?(skill.id) #Return if the actor can't use the skill return if !@actor.can_use_skill?(skill) # Show Animation $game_player.animation_id = skill.animation1_id #Animate if SKILL_CUSTOM.has_key?(id) l = SKILL_CUSTOM[id] animate($game_player, $game_player.character_name+l[2].to_s) if @player_ani else animate($game_player, $game_player.character_name+"_cast") if @player_ani end id = skill.id #Activate Common Event if skill.common_event_id > 0 # Common event call reservation $game_temp.common_event_id = skill.common_event_id end #Get the skill scope case skill.scope when 1 #Enemy #If the skill is ranged if RANGE_SKILLS.has_key?(skill.id) #Add to range @range.push(Game_Ranged_Skill.new($game_player, @actor, skill)) #Take off SP @actor.sp -= skill.sp_cost w = RANGE_SKILLS[id] #Add mash time @button_mash = (w[3] == nil ? MASH_TIME*10 : w[3]*10) return end if SKILL_CUSTOM[id] != nil @button_mash = (SKILL_CUSTOM[id] == nil ? MASH_TIME*10 : SKILL_CUSTOM[id] != nil and SKILL_CUSTOM[id][0] != nil ? SKILL_CUSTOM[id][0]*10 : MASH_TIME*10) else @button_mash = MASH_TIME*10 end #If the skill is not ranged enemies = [] #Get all enemies for enemy in @enemies.values next if enemy == nil or enemy == e enemies.push(enemy) end e = $game_player #Order them from closest to the farthest enemies.sort! {|a,b| get_range(e,a.event) - get_range(e,b.event) } #Attack the closest one enemies[0].effect_skill(@actor, skill) #Take off SP @actor.sp -= skill.sp_cost #Show Animetion on enemy hit_enemy(enemies[0], @actor, skill.animation2_id) if enemies[0].damage != "Miss" and enemies[0].damage != 0 e = enemies[0] jump(e.event, $game_player, SKILL_CUSTOM[id][1]) if SKILL_CUSTOM[id] != nil and e.damage != "Miss" and e.damage != 0 #Return if enemy is dead return if enemy_dead?(enemies[0],@actor) #If its alive, put it in battle enemies[0].in_battle = true #Make it attack the player enemies[0].attacking = $game_player #Setup movement setup_movement(enemies[0]) return when 2 #All Emenies #Play the animation on player $game_player.animation_id = skill.animation2_id #Take off SP @actor.sp -= skill.sp_cost #If the skill is ranged if RANGE_SKILLS.has_key?(skill.id) enemies = get_all_range(@actor.event, RANGE_SKILLS[skill.id][0]) w = RANGE_SKILLS[id] #Add mash time @button_mash = (w[3] == nil ? MASH_TIME*10 : w[3]*10) else if SKILL_CUSTOM[id] != nil @button_mash = (SKILL_CUSTOM[id] == nil ? MASH_TIME*10 : SKILL_CUSTOM[id] != nil and SKILL_CUSTOM[id][0] != nil ? SKILL_CUSTOM[id][0]*10 : MASH_TIME*10) else @button_mash = MASH_TIME*10 end enemies = @enemies end #Get all enemies for e in enemies.values #Skip NIL values next if e== nil #Attack enemy e.effect_skill(@actor, skill) #Show Animetion on enemy hit_enemy(e, @actor, 0) if e.damage != "Miss" and e.damage != 0 jump(e.event, $game_player, SKILL_CUSTOM[id][1]) if SKILL_CUSTOM[id] != nil and e.damage != "Miss" and e.damage != 0 #Skip this enemy if its dead next if enemy_dead?(e,@actor) #If its alive, put it in battle e.in_battle = true #Make it attack the player e.attacking = $game_player #Setup movement setup_movement(e) end return when 3..4, 7 #User if SKILL_CUSTOM[id] != nil @button_mash = (SKILL_CUSTOM[id] == nil ? MASH_TIME*10 : SKILL_CUSTOM[id] != nil and SKILL_CUSTOM[id][0] != nil ? SKILL_CUSTOM[id][0]*10 : MASH_TIME*10) else @button_mash = MASH_TIME*10 end #Use the skill on the player @actor.effect_skill(@actor, skill) #Take off SP @actor.sp -= skill.sp_cost #Play animation $game_player.animation_id = skill.animation2_id return end end #-------------------------------------------------------------------------- # * Player Explode Attack #-------------------------------------------------------------------------- def player_explode(id) #Get Skill skill = $data_skills[id] #Return if the skill doesn't exist return if skill == nil #Return if the actor doesn't have the skill return if !@actor.skills.include?(skill.id) #Return if the actor can't use the skill return if !@actor.can_use_skill?(skill) w = RANGE_EXPLODE[skill.id] #Add mash time @button_mash = (w[4] == nil ? MASH_TIME*10 : w[4]*10) # Show Weapon Aniamtion $game_player.animation_id = $data_weapons[@actor.weapon_id].animation1_id # Show Animation $game_player.animation_id = skill.animation1_id #Animate if SKILL_CUSTOM.has_key?(id) l = SKILL_CUSTOM[id] animate($game_player, $game_player.character_name+l[2].to_s) if @player_ani else animate($game_player, $game_player.character_name+"_cast") if @player_ani end #Add to range @range.push(Game_Ranged_Explode.new($game_player, @actor, skill)) #Take off SP @actor.sp -= skill.sp_cost return end #-------------------------------------------------------------------------- # * Enemy Dead?(Enemy) or (Player) #-------------------------------------------------------------------------- def enemy_dead?(e,a) #Return a new method if e is an actor return player_dead?(e,a) if e.is_a?(Game_Actor) #Return false if enemy dead return false if !e.dead? enemy = e treasure(enemy) if a != nil and a.is_a?(Game_Actor) a.attacking = nil if a != nil and !a.is_a?(Game_Actor) a.in_battle = false if a != nil and !a.is_a?(Game_Actor) id = enemy.event_id #Remove from list @enemies.delete(id) if @enemies[id].respawn == 0 event = enemy.event case enemy.trigger[0] when 0 event.fade = true if FADE_DEAD if !FADE_DEAD event.character_name = "" event.erase end when 1 event.fade = true if FADE_DEAD print "EVENT " + event.id.to_s + "Trigger Not Set Right ~!" if enemy.trigger[1] == 0 $game_switches[enemy.trigger[1]] = true $game_map.need_refresh = true when 2 event.fade = true if FADE_DEAD print "EVENT " + event.id.to_s + "Trigger Not Set Right ~!" if enemy.trigger[1] == 0 if enemy.trigger[2] == 0 $game_variables[enemy.trigger[1]] += 1 $game_map.need_refresh = true else $game_variables[enemy.trigger[1]] = enemy.trigger[2] $game_map.need_refresh = true end when 3 event.fade = true if FADE_DEAD value = "A" if enemy.trigger[1] == 1 value = "B" if enemy.trigger[1] == 2 value = "C" if enemy.trigger[1] == 3 value = "D" if enemy.trigger[1] == 4 print "EVENT " + event.id.to_s + "Trigger Not Set Right ~!" if value == 0 key = [$game_map.map_id, event.id, value] $game_self_switches[key] = true $game_map.need_refresh = true end #Return true if the e is dead return true end #-------------------------------------------------------------------------- # * Player Dead(Player,Enemy) #-------------------------------------------------------------------------- def player_dead?(a,e) #Check State Effect if STATE_EFFECTS for id in $game_party.actors[0].states $game_player.movable = true if SLEEP_EFFECT.include?(id) $game_party.actors[0].states.delete(id) if SLEEP_EFFECT.include?(id) end end #return if the player is not dead return false if !a.dead? #If the player is dead; e.in_battle = false if e != nil and !e.is_a?(Game_Actor) e.attacking = nil if e != nil and !e.is_a?(Game_Actor) #Game Over? if NEXT_LEADER and !$game_party.all_dead? move_forward else revive_actor end return true end #-------------------------------------------------------------------------- # * Move Forward #-------------------------------------------------------------------------- def move_forward # Return if party size is 1 return if $game_party.actors.size == 1 # Record current actor. actor = $game_party.actors[0] # Remove actor $game_party.actors.delete(actor) $game_party.actors.compact # Check if everyone except leader is dead if $game_party.all_dead? $game_party.actors.insert(0,actor) return end $game_player.end_animate # Insert leader to last place $game_party.actors.push(actor) # Loop members until alive for a in $game_party.actors next if a == nil if a.dead? $game_party.actors.delete(a) $game_party.actors.push(a) else break end end # Refreshe game player $game_player.refresh end #-------------------------------------------------------------------------- # * Treasure(Enemy) #-------------------------------------------------------------------------- def treasure(enemy) exp = 0 gold = 0 treasures = [] unless enemy.hidden exp += enemy.exp gold += enemy.gold if rand(100) < enemy.treasure_prob if enemy.item_id > 0 treasures.push($data_items[enemy.item_id]) end if enemy.weapon_id > 0 treasures.push($data_weapons[enemy.weapon_id]) end if enemy.armor_id > 0 treasures.push($data_armors[enemy.armor_id]) end end end treasures = treasures[0..5] for i in 0...$game_party.actors.size actor = $game_party.actors[i] if actor.cant_get_exp? == false last_level = actor.level actor.exp += exp if actor.level > last_level actor.hp = actor.maxhp actor.sp = actor.maxsp #Show LEvel Up if need to actor.damage = "~Level Up~" if DISPLAY_LEVELUP Audio.me_play("Audio/ME/" + LEVELUP_MUSIC.to_s, 100, 100) if LEVELUP_MUSIC != "" end end end $game_party.gain_gold(gold) for item in treasures case item when RPG::Item $game_party.gain_item(item.id, 1) when RPG::Weapon $game_party.gain_weapon(item.id, 1) when RPG::Armor $game_party.gain_armor(item.id, 1) end end end #-------------------------------------------------------------------------- # * Hit Enemy(Enemy) or (Player) #-------------------------------------------------------------------------- def hit_enemy(e,a,animation=nil) return if animation == 0 # Animate player animate(e,e.character_name+"_hit") if e.is_a?(Game_Player) and @player_ani # Animate Enemy animate(e.event, e.event.character_name+"_hit") if e.is_a?(ABS_Enemy) and @enemy_ani if animation == nil e.event.animation_id = a.animation2_id else e.event.animation_id = animation end end #-------------------------------------------------------------------------- # * Enemy Pre-Attack(Enemy,Actions) - Checks action conditions to see if the # enemy can attack. #-------------------------------------------------------------------------- def enemy_pre_attack(enemy, actions) return true if enemy.hp * 100.0 / enemy.maxhp > actions.condition_hp return true if $game_party.max_level < actions.condition_level switch_id = actions.condition_switch_id return true if actions.condition_switch_id > 0 and $game_switches[switch_id] == false n = rand(11) return true if actions.rating < n return false end #-------------------------------------------------------------------------- # * Can Enemy See(Enemy) #-------------------------------------------------------------------------- def can_enemy_see(e) return if !in_range?(e.event, $game_player, e.see_range) or !in_direction?(e.event, $game_player) #Add to enemy attack list e.attacking = $game_player #Enemy is now in battle e.in_battle = true #Setup the movement setup_movement(e) #Return true return true end #-------------------------------------------------------------------------- # * Setup the Movement Type to 0(Enemy) #-------------------------------------------------------------------------- def setup_movement(e) #Set Speed e.event.move_speed = e.temp_speed #Set Frequency e.event.move_frequency = e.temp_frequency #Set Move Type e.temp_move_type = e.event.move_type e.event.move_type = 0 end #-------------------------------------------------------------------------- # * Restore the Movement Type(Enemy) #-------------------------------------------------------------------------- def restore_movement(e) #Restore Speed e.temp_speed = e.event.move_speed #Restore Frequency e.temp_frequency = e.event.move_frequency #Restore Move Type e.event.move_type = e.temp_move_type e.temp_move_type = 0 end #-------------------------------------------------------------------------- # * Can Enemy Hear(Enemy) #-------------------------------------------------------------------------- def can_enemy_hear(e) d = 0 d = DASH_SPEED if @dashing return if !in_range?(e.event, $game_player, e.hear_range+d) #Add to enemy attack list e.attacking = $game_player #Enemy is now in battle e.in_battle = true #Setup the movement setup_movement(e) #Return true return true end #-------------------------------------------------------------------------- # * Enemy Ally in_battle?(Enemy) #-------------------------------------------------------------------------- def enemy_ally_in_battle?(enemy) #Start list allies = [] #Get all allies for ally in @enemies.values #Skip NIL Value or value is in hate group next if ally == nil #Skip if the ally is not in_battle or the enemy can't see ally next if !ally.in_battle or !in_range?(enemy.event, ally.event, enemy.see_range) #Skip if the enemy can't hear ally next if !in_range?(enemy.event, ally.event, enemy.hear_range) #Add to enemy attack list enemy.attacking = ally.attacking #Enemy is now in battle enemy.in_battle = true #Setup the movement setup_movement(enemy) #Return True return true end #Return False return false end #-------------------------------------------------------------------------- # * Update Dash #-------------------------------------------------------------------------- def update_dash return if @sneaking if Input.pressed?(DASH_KEY) #Check State Effect if STATE_EFFECTS for id in $game_party.actors[0].states return if CLUMSY_EFFECT.include?(id) or PARALAYZE_EFFECT.include?(id) or DELAY_EFFECT.include?(id) end end if $game_player.moving? @old_speed = $game_player.move_speed if !@dashing $game_player.character_name = "#{$game_player.character_name}#{DASH_ANIMATION}" if !@dashing and DASH_SHO_AN @dashing = true $game_player.move_speed = DASH_SPEED @dash_min -= 1 if @dash_min <= 0 @dashing = false $game_player.move_speed = 4 end end elsif @dashing @dashing = false $game_player.move_speed = @old_speed if !@sneaking $game_player.character_name = $game_player.character_name.sub(/#{DASH_ANIMATION}/){} if DASH_SHO_AN else @dash_min += 1 if @dash_min < @dash_max end end #-------------------------------------------------------------------------- # * Update Sneak #-------------------------------------------------------------------------- def update_sneak return if @dashing if Input.pressed?(SNEAK_KEY) #Check State Effect if STATE_EFFECTS for id in $game_party.actors[0].states return if CLUMSY_EFFECT.include?(id) or PARALAYZE_EFFECT.include?(id) or DELAY_EFFECT.include?(id) end end if $game_player.moving? @old_speed = $game_player.move_speed if !@sneaking $game_player.character_name = "#{$game_player.character_name}#{SNEAK_ANIMATION}" if !@sneaking and SNEAK_SHO_AN @sneaking = true $game_player.move_speed = SNEAK_SPEED @sneak_min -= 1 if @sneak_min <= 0 @sneaking = false $game_player.move_speed = 4 end end elsif @sneaking @sneaking = false $game_player.move_speed = @old_speed if !@dashing $game_player.character_name = $game_player.character_name.sub(/#{SNEAK_ANIMATION}/){} if SNEAK_SHO_AN else @sneak_min += 1 if @sneak_min < @sneak_max end end #-------------------------------------------------------------------------- # * Get Range(Element, Object) - Near Fantastica #-------------------------------------------------------------------------- def get_range(element, object) x = (element.x - object.x) * (element.x - object.x) y = (element.y - object.y) * (element.y - object.y) r = x + y #r = Math.sqrt(r) return r.to_i end #-------------------------------------------------------------------------- # * Checks the object range #-------------------------------------------------------------------------- def in_screen?(object) screne_x = $game_map.display_x screne_x -= 256 screne_y = $game_map.display_y screne_y -= 256 screne_width = $game_map.display_x screne_width += 2816 screne_height = $game_map.display_y screne_height += 2176 return false if object.real_x <= screne_x return false if object.real_x >= screne_width return false if object.real_y <= screne_y return false if object.real_y >= screne_height return true end #-------------------------------------------------------------------------- # * In Range?(Element, Object, Range) - Near Fantastica #-------------------------------------------------------------------------- def in_range?(element, object, range) x = (element.x - object.x) * (element.x - object.x) y = (element.y - object.y) * (element.y - object.y) r = x + y return true if r <= (range * range) return false end #-------------------------------------------------------------------------- # * Get ALL Range(Element, Range) #-------------------------------------------------------------------------- def get_all_range(element, range) objects = [] for e in @enemies.values objects.push(e) if in_range?(element, e.event, range) end return objects end #-------------------------------------------------------------------------- # * In Direction?(Element, Object) - Near Fantastica #-------------------------------------------------------------------------- def in_direction?(element, object) return true if element.direction == 2 and object.y >= element.y and object.x == element.x return true if element.direction == 4 and object.x <= element.x and object.y == element.y return true if element.direction == 6 and object.x >= element.x and object.y == element.y return true if element.direction == 8 and object.y <= element.y and object.x == element.x return false end #-------------------------------------------------------------------------- # * In Direction?(Element, Object) - Near Fantastica #-------------------------------------------------------------------------- def check_pos(element, object) return 2 if object.y >= element.y #If below return 4 if object.x <= element.x #left return 6 if object.x >= element.x #right return 8 if object.y <= element.y #above return 0 end #-------------------------------------------------------------------------- # * Jump #-------------------------------------------------------------------------- def jump(object,attacker,plus) return if plus == nil n_plus = plus-(plus*2) d = attacker.direction # Calculate new pos new_x = (d == 6 ? plus : d == 4 ? n_plus : 0) new_y = (d == 2 ? plus : d == 8 ? n_plus : 0) # Jump object.jump_nt(new_x,new_y) end #-------------------------------------------------------------------------- # * Animate(object, name) #-------------------------------------------------------------------------- def animate(object, name) object.set_animate(name) end #-------------------------------------------------------------------------- # * End of class #-------------------------------------------------------------------------- end #============================================================================ # * Range Base #============================================================================ class Range_Base < Game_Character attr_accessor :range attr_accessor :draw attr_accessor :stop #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(parent, actor, attack) @step = 0 @parent = parent @actor = actor @draw = true @stop = false @range = 0 @explosive = false @showing_ani = false super() @move_direction = @parent.direction @direction = @move_direction moveto(@parent.x, @parent.y) end #-------------------------------------------------------------------------- # * Refresh #-------------------------------------------------------------------------- def refresh @character_name = @range_weapon[0] @move_speed = @range_weapon[1] @range = @range_weapon[4] end #-------------------------------------------------------------------------- # * Force Movement #-------------------------------------------------------------------------- def force_movement m = @move_direction @y += 1 if m == 2 @x -= 1 if m == 4 @x += 1 if m == 6 @y -= 1 if m == 8 end #-------------------------------------------------------------------------- # * Update #------------------------------------------------------------------------- def update super return if @explosive #Return if moving return if moving? # Get new coordinates d = @move_direction new_x = @x + (d == 6 ? 1 : d == 4 ? -1 : 0) new_y = @y + (d == 2 ? 1 : d == 8 ? -1 : 0) return force_movement if $game_map.terrain_tag(new_x, new_y) == $ABS.PASS_TAG and no_one? m = @move_direction move_down if m == 2 move_left if m == 4 move_right if m == 6 move_up if m == 8 #Stop if it came to range return @stop = true if @step >= @range #Increase step @step += 1 end #-------------------------------------------------------------------------- # * No One #------------------------------------------------------------------------- def no_one? #Get All Events objects = {} for event in $game_map.events.values next if event == nil objects[event.id] = event end objects[0] = $game_player # Get new coordinates d = @move_direction new_x = @x + (d == 6 ? 1 : d == 4 ? -1 : 0) new_y = @y + (d == 2 ? 1 : d == 8 ? -1 : 0) #Get all pos for o in objects.values next if o == nil return false if o.x == new_x and o.y == new_y end #Return False if no one was found return true end end #============================================================================ # * Game Ranged Explode #============================================================================ class Game_Ranged_Explode < Range_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(parent, actor, skill) super(parent,actor,skill) @range_skill = $ABS.RANGE_EXPLODE[skill.id] @range = @range_skill[0] @opacity = 10 if @range == 1 @move_speed = @range_skill[1] @character_name = @range_skill[2] @skill = skill @explosive = true end #-------------------------------------------------------------------------- # * Check Event Trigger Touch(x,y) #-------------------------------------------------------------------------- def check_event_trigger_touch(x, y) return end #-------------------------------------------------------------------------- # * Update #-------------------------------------------------------------------------- def update super #Return if moving return if moving? # Get new coordinates d = @move_direction new_x = x + (d == 6 ? 1 : d == 4 ? -1 : 0) new_y = y + (d == 2 ? 1 : d == 8 ? -1 : 0) return force_movement if $game_map.terrain_tag(new_x, new_y) == $ABS.PASS_TAG and no_one? #Stop if can't move return blow if !passable?(@x, @y, @move_direction) m = @move_direction move_down if m == 2 move_left if m == 4 move_right if m == 6 move_up if m == 8 #Stop if it came to range return blow if @step >= @range #Increase step @step += 1 end #-------------------------------------------------------------------------- # * In Range?(Element, Object, Range) - Near Fantastica #-------------------------------------------------------------------------- def in_range?(element, object, range) x = (element.x - object.x) * (element.x - object.x) y = (element.y - object.y) * (element.y - object.y) r = x + y return true if r <= (range * range) return false end #-------------------------------------------------------------------------- # * Get ALL Range(Element, Range) #-------------------------------------------------------------------------- def get_all_range(element, range) objects = [] for e in $ABS.enemies.values next if e == nil objects.push(e) if in_range?(element, e.event, range) end objects.push($game_player) if in_range?(element, $game_player, range) return objects end #-------------------------------------------------------------------------- # * Blow #-------------------------------------------------------------------------- def blow #Stop @stop = true #Play Animation #Show animation on event self.animation_id = @skill.animation2_id @showing_ani = true #Get Everyone in Range of the Explosive Skill objects = get_all_range(self, @range_skill[3]) #Hit Everyone hit_player if objects.include?($game_player) #Hit Enemies for e in objects next if e == nil next if e == $game_player #Hit hit_event(e.event_id) end end #-------------------------------------------------------------------------- # * Hit Player #-------------------------------------------------------------------------- def hit_player @stop = true #Get Actor actor = $game_party.actors[0] #Get Enemy enemy = @actor #Attack Actor actor.effect_skill(enemy, @skill) #Jump $ABS.jump($game_player,self,$ABS.RANGE_EXPLODE[@skill.id][5]) if actor.damage != "Miss" and actor.damage != 0 #Check if enemy is dead $ABS.enemy_dead?(actor, enemy) end #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def hit_event(id) @stop = true #Get enemy actor = $ABS.enemies[id] #Return if actor has NIL value return if actor == nil #If the parent is player if @parent.is_a?(Game_Player) #Get enemy enemy = $game_party.actors[0] #Attack It's enemy actor.effect_skill(enemy, @skill) #Jump e=actor $ABS.jump(e.event,self,$ABS.RANGE_EXPLODE[@skill.id][5]) if actor.damage != "Miss" and actor.damage != 0 return if $ABS.enemy_dead?(actor, enemy) #Put enemy in battle actor.in_battle = true actor.attacking = $game_player $ABS.setup_movement(actor) return end #Get enemy enemy = $ABS.enemies[@parent.id] return if enemy == nil #Attack It's enemy actor.effect_skill(enemy, @skill) #Show animation on event actor.event.animation_id = @skill.animation2_id if actor.damage != "Miss" and actor.damage != 0 #Jump e=actor $ABS.jump(e.event,self,$ABS.RANGE_EXPLODE[@skill.id][5]) if actor.damage != "Miss" and actor.damage != 0 #return if enemy is dead return if $ABS.enemy_dead?(actor, enemy) actor.in_battle = true actor.attacking = enemy $ABS.setup_movement(actor) end end #============================================================================ # * Game Ranged Skill #============================================================================ class Game_Ranged_Skill < Range_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(parent, actor, skill) super(parent,actor,skill) @range_skill = $ABS.RANGE_SKILLS[skill.id] @range = @range_skill[0] @opacity = 10 if @range == 1 @move_speed = @range_skill[1] @character_name = @range_skill[2] @skill = skill end #-------------------------------------------------------------------------- # * Check Event Trigger Touch(x,y) #-------------------------------------------------------------------------- def check_event_trigger_touch(x, y) return if @stop hit_player if x == $game_player.x and y == $game_player.y for event in $game_map.events.values if event.x == x and event.y == y if event.character_name == "" or ($ABS.enemies[event.id] != nil and $ABS.enemies[event.id].dead?) or event.erased force_movement else hit_event(event.id) end end end end #-------------------------------------------------------------------------- # * Hit Player #-------------------------------------------------------------------------- def hit_player @stop = true #Get Actor actor = $game_party.actors[0] #Get Enemy enemy = @actor #Attack Actor actor.effect_skill(enemy, @skill) #Show animation on player $game_player.animation_id = @skill.animation2_id if actor.damage != "Miss" and actor.damage != 0 #Jump $ABS.jump($game_player,self,@range_skill[4]) if actor.damage != "Miss" and actor.damage != 0 #Check if enemy is dead $ABS.enemy_dead?(actor, enemy) end #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def hit_event(id) @stop = true #Get enemy actor = $ABS.enemies[id] #Return if actor has NIL value return if actor == nil #If the parent is player if @parent.is_a?(Game_Player) #Get enemy enemy = $game_party.actors[0] #Attack It's enemy actor.effect_skill(enemy, @skill) #Show animation on event actor.event.animation_id = @skill.animation2_id if actor.damage != "Miss" and actor.damage != 0 #Jump $ABS.jump($game_map.events[id],self,@range_skill[4]) if actor.damage != "Miss" and actor.damage != 0 return if $ABS.enemy_dead?(actor, enemy) #Put enemy in battle actor.in_battle = true actor.attacking = $game_player $ABS.setup_movement(actor) return end #Get enemy enemy = $ABS.enemies[@parent.id] return if enemy == nil #Attack It's enemy actor.effect_skill(enemy, @skill) #Show animation on event actor.event.animation_id = @skill.animation2_id if actor.damage != "Miss" and actor.damage != 0 #Jump $ABS.jump($game_map.events[id],self,@range_skill[4]) if actor.damage != "Miss" and actor.damage != 0 #return if enemy is dead return if $ABS.enemy_dead?(actor, enemy) actor.in_battle = true actor.attacking = enemy $ABS.setup_movement(actor) end end #============================================================================ # * Game Ranged Weapons #============================================================================ class Game_Ranged_Weapon < Range_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(parent, actor, attack) super(parent,actor,attack) @range_weapon = $ABS.RANGE_WEAPONS[attack] @character_name = @range_weapon[0] @move_speed = @range_weapon[1] @range = @range_weapon[4] end #-------------------------------------------------------------------------- # * Check Event Trigger Touch(x,y) #-------------------------------------------------------------------------- def check_event_trigger_touch(x, y) return if @stop hit_player if x == $game_player.x and y == $game_player.y for event in $game_map.events.values next if event.x != x or event.y != y if event.character_name == "" or ($ABS.enemies[event.id] != nil and $ABS.enemies[event.id].dead?) or event.erased force_movement else hit_event(event.id) end end end #-------------------------------------------------------------------------- # * Hit Player #-------------------------------------------------------------------------- def hit_player @stop = true #Get Actor actor = $game_party.actors[0] #Get Enemy enemy = @actor #Attack Actor actor.attack_effect(enemy) #Show animation on player $game_player.animation_id = @range_weapon[2] if actor.damage != "Miss" and actor.damage != 0 #jump $ABS.jump($game_player, self, @range_weapon[6]) if actor.damage != "Miss" and actor.damage != 0 #Check if enemy is dead $ABS.enemy_dead?(actor, enemy) end #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def hit_event(id) @stop = true #Get enemy actor = $ABS.enemies[id] #Return if actor has NIL value return if actor == nil #If the parent is player if @parent.is_a?(Game_Player) #Get enemy enemy = $game_party.actors[0] #Attack It's enemy actor.attack_effect(enemy) #Show animation on event actor.event.animation_id = @range_weapon[2] if actor.damage != "Miss" and actor.damage != 0 $ABS.jump(actor.event, self, @range_weapon[6]) if actor.damage != "Miss" and actor.damage != 0 return if $ABS.enemy_dead?(actor, enemy) #Put enemy in battle actor.in_battle = true actor.attacking = $game_player $ABS.setup_movement(actor) return end #Get enemy enemy = $ABS.enemies[@parent.id] return if enemy == nil #Attack It's enemy actor.attack_effect(enemy) #Show animation on event actor.event.animation_id = @skill.animation2_id if actor.damage != "Miss" and actor.damage != 0 #jump $ABS.jump(actor.event, self, @range_weapon[6]) if actor.damage != "Miss" and actor.damage != 0 #return if enemy is dead return if $ABS.enemy_dead?(actor, enemy) actor.in_battle = true actor.attacking = enemy $ABS.setup_movement(actor) end end #============================================================================ # * Game Event - Near Fantastica #============================================================================ class Game_Event < Game_Character attr_reader :event attr_accessor :erased attr_reader :page #-------------------------------------------------------------------------- # * Alias #-------------------------------------------------------------------------- alias mrmo_abs_game_event_refresh_set_page refresh_set_page #-------------------------------------------------------------------------- # * Event Name #-------------------------------------------------------------------------- def name return @event.name end #-------------------------------------------------------------------------- # * Event ID #-------------------------------------------------------------------------- def id return @id end #-------------------------------------------------------------------------- # * Refreshes Page #-------------------------------------------------------------------------- def refresh_set_page mrmo_abs_game_event_refresh_set_page $ABS.refresh(self, @list, @character_name) end end #============================================================================ # * Scene Load #============================================================================ class Scene_Load < Scene_File #-------------------------------------------------------------------------- alias mrmo_abs_scene_load_read_data read_data #-------------------------------------------------------------------------- def read_data(file) mrmo_abs_scene_load_read_data(file) $ABS = Marshal.load(file) # Change Animation Size for an in $data_animations next if an == nil frames = an.frames for i in 0...frames.size for j in 0...frames[i].cell_max frames[i].cell_data[j, 1] /= $ABS.ANIMATION_DIVIDE frames[i].cell_data[j, 2] /= $ABS.ANIMATION_DIVIDE frames[i].cell_data[j, 3] /= $ABS.ANIMATION_DIVIDE end end end end end #============================================================================ # * Scene Save #============================================================================ class Scene_Save < Scene_File #-------------------------------------------------------------------------- alias mrmo_abs_scene_save_write_data write_data #-------------------------------------------------------------------------- def write_data(file) mrmo_abs_scene_save_write_data(file) Marshal.dump($ABS, file) end end #============================================================================ # * Scene Title #============================================================================ class Scene_Title #-------------------------------------------------------------------------- alias mrmo_abs_scene_title_cng command_new_game #-------------------------------------------------------------------------- def command_new_game $ABS = MrMo_ABS.new # Change Animation Size for an in $data_animations next if an == nil frames = an.frames for i in 0...frames.size for j in 0...frames[i].cell_max frames[i].cell_data[j, 1] /= $ABS.ANIMATION_DIVIDE frames[i].cell_data[j, 2] /= $ABS.ANIMATION_DIVIDE frames[i].cell_data[j, 3] /= $ABS.ANIMATION_DIVIDE end end end mrmo_abs_scene_title_cng end end #============================================================================ # * Scene Map #============================================================================ class Scene_Map #-------------------------------------------------------------------------- alias mrmo_abs_scene_map_update update alias mrmo_abs_scene_map_transfer_player transfer_player #-------------------------------------------------------------------------- def update $ABS.update mrmo_abs_scene_map_update end #-------------------------------------------------------------------------- # * Player Place Move #-------------------------------------------------------------------------- def transfer_player $ABS.enemies = {} if $game_map.map_id != $game_temp.player_new_map_id mrmo_abs_scene_map_transfer_player end end #============================================================================ # * Scene Map #============================================================================ class Game_Player #-------------------------------------------------------------------------- alias mrmo_abs_game_player_initialize initialize alias mrmo_abs_game_player_upm update_player_movement alias mrmo_sbabs_game_player_update update #-------------------------------------------------------------------------- attr_accessor :event_id attr_accessor :event attr_accessor :actor attr_accessor :enemy_id attr_accessor :movable def initialize super @event_id = 0 @event = self @enemy_id = 0 @actor = $game_party.actors[0] @movable = true mrmo_abs_game_player_initialize end #-------------------------------------------------------------------------- # * Update #-------------------------------------------------------------------------- def update # Record leader actor. @actor = $game_party.actors[0] mrmo_sbabs_game_player_update end #-------------------------------------------------------------------------- # * Player Movement Update #-------------------------------------------------------------------------- def update_player_movement return if !@movable mrmo_abs_game_player_upm end end #============================================================================ # * RPG::Sprite #============================================================================ module RPG class Sprite < ::Sprite def initialize(viewport = nil) super(viewport) @_whiten_duration = 0 @_appear_duration = 0 @_escape_duration = 0 @_collapse_duration = 0 @_collapse_erase_duration = 0 @_damage_duration = 0 @_animation_duration = 0 @_blink = false @force_opacity = false @stop_animation = true end def update_animation if @_animation_duration > 0 frame_index = @_animation.frame_max - @_animation_duration cell_data = @_animation.frames[frame_index].cell_data position = @_animation.position animation_set_sprites(@_animation_sprites, cell_data, position) for timing in @_animation.timings if timing.frame == frame_index animation_process_timing(timing, @_animation_hit) end end else @stop_animation = true dispose_animation end end def animation(animation, hit) @stop_animation = false dispose_animation @_animation = animation return if @_animation == nil @_animation_hit = hit @_animation_duration = @_animation.frame_max animation_name = @_animation.animation_name animation_hue = @_animation.animation_hue bitmap = RPG::Cache.animation(animation_name, animation_hue) if @@_reference_count.include?(bitmap) @@_reference_count[bitmap] += 1 else @@_reference_count[bitmap] = 1 end @_animation_sprites = [] if @_animation.position != 3 or not @@_animations.include?(animation) for i in 0..15 sprite = ::Sprite.new(self.viewport) sprite.bitmap = bitmap sprite.visible = false @_animation_sprites.push(sprite) end unless @@_animations.include?(animation) @@_animations.push(animation) end end update_animation end def stop_animation? return @stop_animation end #------------------------------------------------------------------------- alias mrmo_abs_sprite_update_collapse update #------------------------------------------------------------------------- def update mrmo_abs_sprite_update_collapse #Update Duration if @_collapse_erase_duration > 0 @_collapse_erase_duration -= 1 @force_opacity = true self.opacity = 256 - (36 - @_collapse_erase_duration) * 10 @force_opacity = false if @_collapse_erase_duration == 0 @collapse_character.character_name = "" self.opacity = 256 self.color.set(0, 0, 0, 0) self.blend_type = 0 @collapse_character.erase end end end #-------------------------------------------------------------------------- # * Collapse and Erase #-------------------------------------------------------------------------- def collapse_erase(character) self.blend_type = 1 self.color.set(255, 64, 64, 255) self.opacity = 255 @collapse_character = character @_collapse_erase_duration = 36 @_collapse_duration = 0 @_whiten_duration = 0 @_appear_duration = 0 @_escape_duration = 0 @_loop_animation = nil dispose_loop_animation end #-------------------------------------------------------------------------- # * Opacity #-------------------------------------------------------------------------- def opacity=(o) return if @_collapse_erase_duration > 0 and !@force_opacity super(o) end #-------------------------------------------------------------------------- # * Damage #-------------------------------------------------------------------------- def damage(value, critical) dispose_damage if value.is_a?(Numeric) damage_string = value.abs.to_s else damage_string = value.to_s end bitmap = Bitmap.new(160, 48) bitmap.font.name = $ABS.DAMAGE_FONT_NAME bitmap.font.size = $ABS.DAMAGE_FONT_SIZE bitmap.font.color = $ABS.DAMAGE_FONT_COLOR bitmap.draw_text(-1, 12-1, 160, 36, damage_string, 1) bitmap.draw_text(+1, 12-1, 160, 36, damage_string, 1) bitmap.draw_text(-1, 12+1, 160, 36, damage_string, 1) bitmap.draw_text(+1, 12+1, 160, 36, damage_string, 1) if value.is_a?(Numeric) and value < 0 bitmap.font.color.set(176, 255, 144) else bitmap.font.color.set(255, 255, 255) end bitmap.draw_text(0, 12, 160, 36, damage_string, 1) if critical bitmap.font.size = 20 bitmap.font.color.set(0, 0, 0) bitmap.draw_text(-1, -1, 160, 20, "CRITICAL", 1) bitmap.draw_text(+1, -1, 160, 20, "CRITICAL", 1) bitmap.draw_text(-1, +1, 160, 20, "CRITICAL", 1) bitmap.draw_text(+1, +1, 160, 20, "CRITICAL", 1) bitmap.font.color.set(255, 255, 255) bitmap.draw_text(0, 0, 160, 20, "CRITICAL", 1) end @_damage_sprite = ::Sprite.new(self.viewport) @_damage_sprite.bitmap = bitmap @_damage_sprite.ox = 80 @_damage_sprite.oy = 20 @_damage_sprite.x = self.x @_damage_sprite.y = self.y - self.oy / 2 @_damage_sprite.z = 3000 @_damage_duration = 40 end end end #============================================================================== # ** Sprite_Character #------------------------------------------------------------------------------ # This sprite is used to display the character.It observes the Game_Character # class and automatically changes sprite conditions. #============================================================================== class Sprite_Character < RPG::Sprite #-------------------------------------------------------------------------- alias mrmo_abs_sc_int initialize alias mrmo_abs_sc_update update alias mrmo_abs_sc_dispose dispose #-------------------------------------------------------------------------- # * Object Initialization # viewport : viewport # character : character (Game_Character) #-------------------------------------------------------------------------- def initialize(viewport, character = nil) @state_animation_id = 0 @page = nil mrmo_abs_sc_int(viewport, character) end #-------------------------------------------------------------------------- # * Dispose #-------------------------------------------------------------------------- def dispose # End every animation and update if @_collapse_erase_duration > 0 @collapse_character.character_name = "" self.opacity = 256 self.color.set(0, 0, 0, 0) self.blend_type = 0 @collapse_character.erase end super end #-------------------------------------------------------------------------- # * Update #-------------------------------------------------------------------------- def update if @_damage_duration <= 0 and @_damage_sprite != nil and !@_damage_sprite.disposed? dispose_damage end mrmo_abs_sc_update #Skip if no demage or dead; if !@character.is_a?(Game_Player) and $ABS.enemies[@character.id] != nil #Show State Animation id = @character.id if $ABS.enemies[id].damage == nil and $ABS.enemies[id].state_animation_id != @state_animation_id @state_animation_id = $ABS.enemies[id].state_animation_id loop_animation($data_animations[@state_animation_id]) end elsif @character.is_a?(Game_Player) a = $game_party.actors[0] #Show State Animation if a.damage == nil and a.state_animation_id != @state_animation_id @state_animation_id = a.state_animation_id loop_animation($data_animations[@state_animation_id]) end end #Check fade if @character.fade if @character.is_a?(Game_Event) and @character.page != @page @page = @character.page elsif @character.is_a?(Game_Event) or @character.is_a?(Game_Player) collapse_erase(@character) end @character.fade = false end if @character.is_a?(Game_Event) and @character.page != @page @page = @character.page end id = @character.id #if demage not displayed if $ABS.damage_display #Skip if no demage or dead; if !@character.is_a?(Game_Player) and $ABS.enemies[id] != nil #Display damage damage($ABS.enemies[id].damage, $ABS.enemies[id].critical) if $ABS.enemies[id].damage != nil #Make Damage nil $ABS.enemies[id].damage = nil elsif @character.is_a?(Game_Player) a = $game_party.actors[0] #Display damage damage(a.damage, a.critical) if !a.dead? or a.damage != nil #Make Damage nil a.damage = nil end end end end #============================================================================== # ** Spriteset_Map #------------------------------------------------------------------------------ # This class brings together map screen sprites, tilemaps, etc. # It's used within the Scene_Map class. #============================================================================== class Spriteset_Map #-------------------------------------------------------------------------- alias mrmo_spriteset_map_init_characters init_characters alias mrmo_spriteset_map_update_character_sprites update_character_sprites alias mrmo_spriteset_map_dispose dispose #-------------------------------------------------------------------------- # * Character Sprite Initialization #-------------------------------------------------------------------------- def init_characters mrmo_spriteset_map_init_characters # Make character sprites @ranged_sprites = [] for range in $ABS.range #Skip NIL Values next if range == nil and !range.draw sprite = Sprite_Character.new(@viewport1, range) @ranged_sprites.push(sprite) end end #-------------------------------------------------------------------------- # * Dispose #-------------------------------------------------------------------------- def dispose # Dispose ranged sprites for range in @ranged_sprites #Skip NIL Values next if range == nil range.dispose end mrmo_spriteset_map_dispose end #-------------------------------------------------------------------------- # * Update Character Sprites #-------------------------------------------------------------------------- def update_character_sprites mrmo_spriteset_map_update_character_sprites # Update ranged sprites for range in @ranged_sprites #Skip NIL Values next if range == nil range.update #If its stop if range.character.stop and range.stop_animation? @ranged_sprites.delete(range) range.dispose $ABS.range.delete(range.character) elsif range.character.stop range.character.character_name = "" end end # Draw Sprite for range in $ABS.range #Skip NIL Values next if range == nil and !range.draw #If its draw sprite = Sprite_Character.new(@viewport1, range) @ranged_sprites.push(sprite) range.draw = false end end end #============================================================================== # ** Game_Battler (part 3) #------------------------------------------------------------------------------ # This class deals with battlers. It's used as a superclass for the Game_Actor # and Game_Enemy classes. #============================================================================== class Game_Battler attr_accessor :state_time #-------------------------------------------------------------------------- alias mrmo_abs_gb_int initialize #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize mrmo_abs_gb_int @state_time = 0 end #-------------------------------------------------------------------------- # * Determine Usable Skills # skill_id : skill ID #-------------------------------------------------------------------------- def can_use_skill?(skill) # If there's not enough SP, the skill cannot be used. return false if skill.sp_cost > self.sp # Unusable if incapacitated return false if dead? # If silent, only physical skills can be used return false if skill.atk_f == 0 and self.restriction == 1 # Get usable time occasion = skill.occasion case occasion when 0..1 return true when 2..3 return false end end #-------------------------------------------------------------------------- # * Apply Skill Effects # user : the one using skills (battler) # skill : skill #-------------------------------------------------------------------------- def effect_skill(user, skill) # Clear critical flag self.critical = false # If skill scope is for ally with 1 or more HP, and your own HP = 0, # or skill scope is for ally with 0, and your own HP = 1 or more if ((skill.scope == 3 or skill.scope == 4) and self.hp == 0) or ((skill.scope == 5 or skill.scope == 6) and self.hp >= 1) # End Method return false end # Clear effective flag effective = false # Set effective flag if common ID is effective effective |= skill.common_event_id > 0 # First hit detection hit = skill.hit if skill.atk_f > 0 hit *= user.hit / 100 end hit_result = (rand(100) < hit) # Set effective flag if skill is uncertain effective |= hit < 100 # If hit occurs if hit_result == true # Calculate power power = skill.power + user.atk * skill.atk_f / 100 if power > 0 power -= self.pdef * skill.pdef_f / 200 power -= self.mdef * skill.mdef_f / 200 power = [power, 0].max end # Calculate rate rate = 20 rate += (user.str * skill.str_f / 100) rate += (user.dex * skill.dex_f / 100) rate += (user.agi * skill.agi_f / 100) rate += (user.int * skill.int_f / 100) # Calculate basic damage self.damage = power * rate / 20 # Element correction self.damage *= elements_correct(skill.element_set) self.damage /= 100 # If damage value is strictly positive if self.damage > 0 # Guard correction if self.guarding? self.damage /= 2 end end # Dispersion if skill.variance > 0 and self.damage.abs > 0 amp = [self.damage.abs * skill.variance / 100, 1].max self.damage += rand(amp+1) + rand(amp+1) - amp end # Second hit detection eva = 8 * self.agi / user.dex + self.eva hit = self.damage < 0 ? 100 : 100 - eva * skill.eva_f / 100 hit = self.cant_evade? ? 100 : hit hit_result = (rand(100) < hit) # Set effective flag if skill is uncertain effective |= hit < 100 end # If hit occurs if hit_result == true # If physical attack has power other than 0 if skill.power != 0 and skill.atk_f > 0 # State Removed by Shock remove_states_shock # Set to effective flag effective = true end # Substract damage from HP last_hp = self.hp self.hp -= self.damage effective |= self.hp != last_hp # State change @state_changed = false effective |= states_plus(skill.plus_state_set) effective |= states_minus(skill.minus_state_set) # If power is 0 if skill.power == 0 # Set damage to an empty string self.damage = "" # If state is unchanged unless @state_changed # Set damage to "Miss" self.damage = "Miss" end end # If miss occurs else # Set damage to "Miss" self.damage = "Miss" end # End Method return effective end end #============================================================================== # ** Game_Character (part 1) #------------------------------------------------------------------------------ # This class deals with characters. It's used as a superclass for the # Game_Player and Game_Event classes. #============================================================================== class Game_Character attr_accessor :move_type attr_accessor :move_speed attr_accessor :move_frequency attr_accessor :character_name attr_accessor :animating attr_accessor :frame attr_accessor :fade #-------------------------------------------------------------------------- # * Jump # x_plus : x-coordinate plus value # y_plus : y-coordinate plus value #-------------------------------------------------------------------------- def jump_nt(x_plus, y_plus) # Calculate new coordinates new_x = @x + x_plus new_y = @y + y_plus # If plus value is (0,0) or jump destination is passable if (x_plus == 0 and y_plus == 0) or passable?(new_x, new_y, 0) # Straighten position straighten # Update coordinates @x = new_x @y = new_y # Calculate distance distance = Math.sqrt(x_plus * x_plus + y_plus * y_plus).round # Set jump count @jump_peak = 10 + distance - @move_speed @jump_count = @jump_peak * 2 # Clear stop count @stop_count = 0 end end #-------------------------------------------------------------------------- # * Set Animation #-------------------------------------------------------------------------- def set_animate(name) return if @animating @frame = 4 @old_char = @character_name @character_name = name @animating = true @anim_wait = 40 @pattern = 0 @direction_fix = true end #-------------------------------------------------------------------------- alias mrmo_abs_game_character_update update #-------------------------------------------------------------------------- # * Frame Update #-------------------------------------------------------------------------- def update return animate_pose if @animating mrmo_abs_game_character_update end #-------------------------------------------------------------------------- # * Frame Update Pose #-------------------------------------------------------------------------- def animate_pose if @anim_wait >= 8 @pattern = (@pattern + 1) % 4 @frame -= 1 @anim_wait = 0 end @anim_wait += 1 if @anim_wait < 18 - @move_speed * 2 if @frame == 0 end_animate return end update_jump if jumping? end #-------------------------------------------------------------------------- # * End Animate #-------------------------------------------------------------------------- def end_animate @animating = false @character_name = @old_char @direction_fix = false end #-------------------------------------------------------------------------- # * Move toward B #-------------------------------------------------------------------------- def move_to(b) # Get difference in player coordinates sx = @x - b.x sy = @y - b.y # If coordinates are equal if sx == 0 and sy == 0 return end # Get absolute value of difference abs_sx = sx.abs abs_sy = sy.abs # If horizontal and vertical distances are equal if abs_sx == abs_sy # Increase one of them randomly by 1 rand(2) == 0 ? abs_sx += 1 : abs_sy += 1 end # If horizontal distance is longer if abs_sx > abs_sy # Move towards player, prioritize left and right directions sx > 0 ? move_left : move_right if not moving? and sy != 0 sy > 0 ? move_up : move_down end # If vertical distance is longer else # Move towards player, prioritize up and down directions sy > 0 ? move_up : move_down if not moving? and sx != 0 sx > 0 ? move_left : move_right end end turn_to(b) end #-------------------------------------------------------------------------- # * Turn Towards B #-------------------------------------------------------------------------- def turn_to(b) # Get difference in player coordinates sx = @x - b.x sy = @y - b.y # If coordinates are equal if sx == 0 and sy == 0 return end # If horizontal distance is longer if sx.abs > sy.abs # Turn to the right or left towards player sx > 0 ? turn_left : turn_right # If vertical distance is longer else # Turn up or down towards player sy > 0 ? turn_up : turn_down end end end #============================================================================== # ** Game_Party #------------------------------------------------------------------------------ # This class handles the party. It includes information on amount of gold # and items. Refer to "$game_party" for the instance of this class. #============================================================================== class Game_Party #-------------------------------------------------------------------------- alias mrmo_abs_game_party_setup_starting_members setup_starting_members #-------------------------------------------------------------------------- # * Initial Party Setup #-------------------------------------------------------------------------- def setup_starting_members mrmo_abs_game_party_setup_starting_members $game_player.actor = $game_party.actors[0] end end #============================================================================ # * ABS Enemy #============================================================================ class ABS_Enemy < Game_Battler #-------------------------------------------------------------------------- attr_accessor :event_id attr_accessor :enemy_id attr_accessor :behavior attr_accessor :see_range attr_accessor :hear_range attr_accessor :aggressiveness attr_accessor :trigger attr_accessor :closest_enemy attr_accessor :in_battle attr_accessor :ranged attr_accessor :event attr_accessor :attacking attr_accessor :temp_move_type attr_accessor :temp_speed attr_accessor :temp_frequency attr_accessor :actor attr_accessor :respawn #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(enemy_id) super() @event_id= 0 @see_range = 0 @hear_range = 0 @aggressiveness = 1 @trigger = [] @enemy_id = enemy_id @in_battle = false @hp = maxhp @sp = maxsp @closest_enemy = false @ranged = nil @event = nil @attacking = nil @temp_move_type = 0 @temp_speed = 0 @temp_frequency = 0 @actor = self @respawn = 0 end #-------------------------------------------------------------------------- # * Get Enemy ID #-------------------------------------------------------------------------- def id return @enemy_id end #-------------------------------------------------------------------------- # * Get Index #-------------------------------------------------------------------------- def index return @member_index end #-------------------------------------------------------------------------- # * Get Name #-------------------------------------------------------------------------- def name return $data_enemies[@enemy_id].name end #-------------------------------------------------------------------------- # * Get Basic Maximum HP #-------------------------------------------------------------------------- def base_maxhp return $data_enemies[@enemy_id].maxhp end #-------------------------------------------------------------------------- # * Get Basic Maximum SP #-------------------------------------------------------------------------- def base_maxsp return $data_enemies[@enemy_id].maxsp end #-------------------------------------------------------------------------- # * Get Basic Strength #-------------------------------------------------------------------------- def base_str return $data_enemies[@enemy_id].str end #-------------------------------------------------------------------------- # * Get Basic Dexterity #-------------------------------------------------------------------------- def base_dex return $data_enemies[@enemy_id].dex end #-------------------------------------------------------------------------- # * Get Basic Agility #-------------------------------------------------------------------------- def base_agi return $data_enemies[@enemy_id].agi end #-------------------------------------------------------------------------- # * Get Basic Intelligence #-------------------------------------------------------------------------- def base_int return $data_enemies[@enemy_id].int end #-------------------------------------------------------------------------- # * Get Basic Attack Power #-------------------------------------------------------------------------- def base_atk return $data_enemies[@enemy_id].atk end #-------------------------------------------------------------------------- # * Get Basic Physical Defense #-------------------------------------------------------------------------- def base_pdef return $data_enemies[@enemy_id].pdef end #-------------------------------------------------------------------------- # * Get Basic Magic Defense #-------------------------------------------------------------------------- def base_mdef return $data_enemies[@enemy_id].mdef end #-------------------------------------------------------------------------- # * Get Basic Evasion #-------------------------------------------------------------------------- def base_eva return $data_enemies[@enemy_id].eva end #-------------------------------------------------------------------------- # * Get Offensive Animation ID for Normal Attack #-------------------------------------------------------------------------- def animation1_id return $data_enemies[@enemy_id].animation1_id end #-------------------------------------------------------------------------- # * Get Target Animation ID for Normal Attack #-------------------------------------------------------------------------- def animation2_id return $data_enemies[@enemy_id].animation2_id end #-------------------------------------------------------------------------- # * Get Element Revision Value # element_id : Element ID #-------------------------------------------------------------------------- def element_rate(element_id) # Get a numerical value corresponding to element effectiveness table = [0,200,150,100,50,0,-100] result = table[$data_enemies[@enemy_id].element_ranks[element_id]] # If protected by state, this element is reduced by half for i in @states if $data_states[i].guard_element_set.include?(element_id) result /= 2 end end # End Method return result end #-------------------------------------------------------------------------- # * Get State Effectiveness #-------------------------------------------------------------------------- def state_ranks return $data_enemies[@enemy_id].state_ranks end #-------------------------------------------------------------------------- # * Determine State Guard # state_id : state ID #-------------------------------------------------------------------------- def state_guard?(state_id) return false end #-------------------------------------------------------------------------- # * Get Normal Attack Element #-------------------------------------------------------------------------- def element_set return [] end #-------------------------------------------------------------------------- # * Get Normal Attack State Change (+) #-------------------------------------------------------------------------- def plus_state_set return [] end #-------------------------------------------------------------------------- # * Get Normal Attack State Change (-) #-------------------------------------------------------------------------- def minus_state_set return [] end #-------------------------------------------------------------------------- # * Aquire Actions #-------------------------------------------------------------------------- def actions return $data_enemies[@enemy_id].actions end #-------------------------------------------------------------------------- # * Get EXP #-------------------------------------------------------------------------- def exp return $data_enemies[@enemy_id].exp end #-------------------------------------------------------------------------- # * Get Gold #-------------------------------------------------------------------------- def gold return $data_enemies[@enemy_id].gold end #-------------------------------------------------------------------------- # * Get Item ID #-------------------------------------------------------------------------- def item_id return $data_enemies[@enemy_id].item_id end #-------------------------------------------------------------------------- # * Get Weapon ID #-------------------------------------------------------------------------- def weapon_id return $data_enemies[@enemy_id].weapon_id end #-------------------------------------------------------------------------- # * Get Armor ID #-------------------------------------------------------------------------- def armor_id return $data_enemies[@enemy_id].armor_id end #-------------------------------------------------------------------------- # * Get Treasure Appearance Probability #-------------------------------------------------------------------------- def treasure_prob return $data_enemies[@enemy_id].treasure_prob end end #============================================================================== # ** Scene_Skill #------------------------------------------------------------------------------ # This class performs skill screen processing. #============================================================================== class Scene_Skill #-------------------------------------------------------------------------- alias mrmo_moabs_scene_skill_main main alias mrmo_moabs_scene_skill_update update alias mrmo_moabs_scene_skill_update_skill update_skill #-------------------------------------------------------------------------- # * Main Processing #-------------------------------------------------------------------------- def main @shk_window = Window_Command.new(250, [$ABS.HOTKEY_SAY.to_s]) @shk_window.visible = false @shk_window.active = false @shk_window.x = 200 @shk_window.y = 250 @shk_window.z = 1500 mrmo_moabs_scene_skill_main @shk_window.dispose end #-------------------------------------------------------------------------- # * Frame Update #-------------------------------------------------------------------------- def update @shk_window.update if @shk_window.active mrmo_moabs_scene_skill_update return update_shk if @shk_window.active end #-------------------------------------------------------------------------- # * Frame Update (if skill window is active) #-------------------------------------------------------------------------- def update_skill mrmo_moabs_scene_skill_update_skill #Get all the keys for key in $ABS.skill_keys.keys #Check is the the key is pressed next if !Input.trigger?(key) #Play decision $game_system.se_play($data_system.decision_se) #Record Skill $ABS.skill_keys[key] = @skill_window.skill.id @skill_window.active = false @shk_window.active = @shk_window.visible = true end end #-------------------------------------------------------------------------- # * Frame Update Skill Hot Key #-------------------------------------------------------------------------- def update_shk #Return if Enter isn't pressed return if !Input.trigger?(Input::C) #Play decision $game_system.se_play($data_system.decision_se) @shk_window.active = @shk_window.visible = false @skill_window.active = true $scene = Scene_Skill.new(@actor_index) end end #============================================================================== # ** Scene_Item #============================================================================== class Scene_Item #-------------------------------------------------------------------------- alias mrmo_moabs_scene_item_main main alias mrmo_moabs_scene_item_update update alias mrmo_moabs_scene_item_update_item update_item #-------------------------------------------------------------------------- # * Main Processing #-------------------------------------------------------------------------- def main @ihk_window = Window_Command.new(250, [$ABS.HOTKEY_SAY.to_s]) @ihk_window.visible = false @ihk_window.active = false @ihk_window.x = 200 @ihk_window.y = 250 @ihk_window.z = 1500 mrmo_moabs_scene_item_main @ihk_window.dispose end #-------------------------------------------------------------------------- # * Frame Update #-------------------------------------------------------------------------- def update @ihk_window.update if @ihk_window.active mrmo_moabs_scene_item_update return update_ihk if @ihk_window.active end #-------------------------------------------------------------------------- # * Frame Update (if item window is active) #-------------------------------------------------------------------------- def update_item mrmo_moabs_scene_item_update_item #Get all the keys for key in $ABS.item_keys.keys next if !@item_window.item.is_a?(RPG::Item) or @item_window.item.occasion == 3 #Check is the the key is pressed next if !Input.trigger?(key) #Play decision $game_system.se_play($data_system.decision_se) #Record Item $ABS.item_keys[key] = @item_window.item.id @item_window.active = false @ihk_window.active = @ihk_window.visible = true end end #-------------------------------------------------------------------------- # * Frame Update Item Hot Key #-------------------------------------------------------------------------- def update_ihk #Return if Enter isn't pressed return if !Input.trigger?(Input::C) #Play decision $game_system.se_play($data_system.decision_se) @ihk_window.active = false @ihk_window.visible = false @item_window.active = true $scene = Scene_Item.new end end #-------------------------------------------------------------------------- # * SDK End #-------------------------------------------------------------------------- end class Interpreter #-------------------------------------------------------------------------- # * Script #-------------------------------------------------------------------------- def command_355 # Set first line to script script = @list[@index].parameters[0] + "\n" # Loop loop do # If next event command is second line of script or after if @list[@index+1].code == 655 # Add second line or after to script script += @list[@index+1].parameters[0] + "\n" # If event command is not second line or after else # Abort loop break end # Advance index @index += 1 end # Evaluation result = eval(script) # Continue return true end end

yes it is alot of code... deal.
the reason i think what you did wasn't working is that some part of the script is necicary, namely the line "$game_temp.gameover = @game_over" because that part of the script is like o you have no health... do you have an auto revive item... Yes, then you not dead.... No... wel you are..
what i did is o you have no health... you dead fool.

by **Captain Thark** » Tue Feb 06, 2007 5:03 pm

Cool, thanks! Very Happy

I'll put you guys in the credit for this.

by **tsuckow** » Tue Feb 06, 2007 5:12 pm

Wow, you so could have put that in, i dont know a txt file...

And im not sure about them ingame yet (downloading runtime) but im pretty sure we could work on those 2 sounds to

A) Make them smaller
B) Get better version of them

by **Robopanda333** » Tue Feb 06, 2007 5:29 pm

sorry... i would have just copied it out of the directory but it is stroed insome kind of data base... and i am lazy

by **tsuckow** » Tue Feb 06, 2007 9:50 pm

Ok, I couldn't help myself and had to do it anyway.

http://defcon1.hopto.org.nyud.net:8080/DumOne_setup.exe

If you don't have the runtime, don't worry. Just check the checkbox and it will download it automaticly.

by **Omnis** » Wed Feb 07, 2007 9:08 am

So Thark Did you get the glitches out yet

Coding Well Forum

From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Re: From the files of the Pessimistic Romantic

Who is online