// char.c //#pragma save_binary #include #include #include #include #include #include #include #include #include #include inherit F_ACTION; inherit F_ALIAS; inherit F_APPRENTICE; inherit F_ATTACK; inherit F_ATTRIBUTE; inherit F_COMMAND; inherit F_CONDITION; inherit F_DAMAGE; inherit F_DBASE; inherit F_EDIT; inherit F_FINANCE; inherit F_MESSAGE; inherit F_MORE; inherit F_MOVE; inherit F_NAME; inherit F_SKILL; inherit F_TEAM; //inherit F_COMPETE; // Use a tick with longer period than heart beat to save cpu's work static int tick; void create() { seteuid(0); // so LOGIN_D can export uid to us } // Use this function to identify if an object is a character. int is_character() { return 1; } // setup: used to configure attributes that aren't known by this_object() // at create() time such as living_name (and so can't be done in create()). void setup() { seteuid(getuid(this_object())); set_heart_beat(1); tick = 5 + random(10); enable_player(); CHAR_D->setup_char( this_object() ); } void heart_beat() { int t; int period; int wimpy_ratio, cnd_flag; mapping my; object ob; object me; string prompt; int is_player; me = this_object(); my = query_entire_dbase(); // If we are dying because of mortal wounds? if( my["eff_qi"] < 0 || my["eff_jing"] < 0) { remove_all_enemy(); die(); return; } // If we're dying or falling unconcious? if( my["qi"] < 0 || my["jing"] < 0) { remove_all_enemy(); if( !living(this_object()) ) die(); else unconcious(); return; } // Do attack if we are fighting. continue_action(); if( is_busy() ) { // halt from healing if (query_temp("qi_heal") && is_fighting() && !userp(this_object())) this_object()->interrupt_me(); // We don't want heart beat be halt eventually, so return here. return; } else { // Is it time to flee? if( is_fighting() && intp(wimpy_ratio = (int)query("env/wimpy")) && wimpy_ratio > 0 && ( my["qi"] * 100 / my["max_qi"] || my["jing"] * 100 / my["max_jing"] GO_CMD->do_flee(this_object()); // Do attack or clean up enemy if we have fleed. attack(); } if (query("szj/passed") && query("szj/over200") && is_fighting() && !random(3) && (int)query_skill("shenzhao-jing", 1) > 100) { if (my["max_neili"] && my["neili"] < my["max_neili"] * 3 / 2 && random(2)==0) { tell_object(this_object(), MAG"你体内日月之力运转不息，使你感觉内力更充盈！\n"NOR); my["neili"] += query_skill("shenzhao-jing", 1) / 2 + random(query_skill("shenzhao-jing", 1)); if( my["neili"] > my["max_neili"] * 3 / 2) my["neili"] = my["max_neili"] * 3 / 2; } } if (!this_object()) return; if( !userp(this_object()) && living(this_object()) ) { this_object()->chat(); // chat() may do anything -- include destruct(this_object()) } if( tick-- ) return; else tick = 5 + random(10); if( !this_object() ) return; cnd_flag = update_condition(); if( !this_object() ) return; // If we are compeletely in peace, turn off heart beat. // heal_up() must be called prior to other two to make sure it is called // because the && operator is lazy :P if( (cnd_flag & CND_NO_HEAL_UP) || !heal_up()); if (! cnd_flag && ! is_fighting() && ! is_busy() && ! interactive(this_object())) { if (environment() && query("chat_msg")) { ob = first_inventory(environment()); while (ob && ! interactive(ob)) ob = next_inventory(ob); } else ob = 0; if (! ob) set_heart_beat(0); } if (! me ) return; if( !interactive(this_object()) ) return; // Make us a bit older. Only player's update_age is defined. // Note: update_age() is no need to be called every heart_beat, it // remember how much time has passed since last call. this_object()->update_age(); if(query_idle(this_object()) > IDLE_TIMEOUT)// && !wizardp(this_object())) this_object()->user_dump(DUMP_IDLE); } int visible(object ob) { int lvl, invis; // Modified by Doing Lu 1998/11/7 // Optimize for speed if (!userp(this_object())) return 1; // Finish if(wizardp(ob)) { lvl = wiz_level(this_object()); if( lvl > wiz_level(ob) ) return 1; invis = (int)ob->query("env/invisibility"); if( intp(invis) && (invis > lvl) ) return 0; } /* if( ob->is_ghost() ) { if( is_ghost() ) return 1; if( query_temp("apply/astral_vision") ) return 1; return 0; } */ return 1; }
