コード例 #1
0
hire() {
    int cost;
    object bodyguard;

    if (!this_player())
	return 0;
    cost = COST;
    if (!antonio)
	write("But Antonio is not here, so he cannot assign a bodyguard to you.\n");
    else if (this_player()->query_money(0) < cost)
	write("You don't have " + cost + " gold coins, so you cannot hire a bodyguard.\n");
    else if (this_player()->query_name() == "Someone")
	write("Due to technical reasons, we cannot handle invisible clients.\n");
    else {

	bodyguard = make_bodyguard(this_player());
	if (!bodyguard) {
	    write("Sorry, all bodyguards are busy.\n");
	    return 1;
	}
	log_file("padrone", ctime(time()) + ": " + this_player()->query_name() +
		 " hired a bodyguard.\n");
	this_player()->add_money(-cost);

	/* Before moving the bodyguard here, or he could attack Antonio: */
	tell_room(this_object(), "A bodyguard arrives.\n");
	move_object(bodyguard, this_object());
	/* To start the heartbeat in the monster: */
	move_object(this_player(), this_object());
	tell_object(bodyguard, "Padrone tells you: report\n");
    }

    return 1;
} /* hire */
コード例 #2
0
extra_reset() {
    if (!rakshasa || !living(rakshasa)) {
	rakshasa = clone_object ("obj/monster");
	call_other (rakshasa, "set_name", "rakshasa");
	call_other (rakshasa, "set_race", "demon");
	call_other (rakshasa, "set_short", "An evil rakshasa");
	call_other (rakshasa, "set_long",
		"A fearsome rakshasa, one of the tiger-demons of India.\n");
	call_other (rakshasa, "set_level", 18);
	call_other (rakshasa, "set_ep", 400000); /* Was 1125000 Pell */
	call_other (rakshasa, "set_hp", 400); /* Was 600 */
	call_other (rakshasa, "set_ac", 7); /* Was 8 */
	call_other (rakshasa, "set_wc", 20); /* Was 25 */
	call_other (rakshasa, "set_al", -1000);
	call_other (rakshasa, "set_aggressive", 1);
	call_other (rakshasa, "set_spell_mess1", /* Pell */
		"The demon screams for your soul, chilling your body."); /* Pell */
	call_other (rakshasa, "set_spell_mess2",
		"The demon sucks out part of your soul, chilling your body.");
	call_other (rakshasa, "set_chance", 2);
	call_other (rakshasa, "set_spell_dam", 60); /* Was 80 */
	move_object (rakshasa, this_object());

	scroll = clone_object ("obj/money");
	call_other (scroll, "set_money", 1000 + random(1000));
	move_object (scroll, rakshasa);
    }
}
コード例 #3
0
ファイル: quicktyper.c プロジェクト: BrewerGit/ldmud
int refresh(object obj) {

    int	may_need_warning;

    may_need_warning = 0;

    if(is_debug) {
        tell_object(obj, "Refreshing Quicktyper,");
    }
    if(first_inventory(obj) != this_object()) {
        may_need_warning = 1;
    }
    refreshing = 1;

    move_object(this_object(), "room/storage");

    if(is_debug) {
        tell_object(obj, "moved to storage,");
    }

    move_object(this_object(), obj);

    if(is_debug) {
        tell_object(obj, "back again\n");
    }

    if(may_need_warning && obj->query_level() > 19)  {
        tell_object(obj, "Quicktyper: Your inventory has been rearranged.\n");
    }
    refreshing = 0;
    needs_refresh = 0;

    return 1;
}
コード例 #4
0
extra_reset() {
    object treasure;
    if (!dragon || !living(dragon)) {
	dragon = clone_object("obj/monster");
	call_other(dragon, "set_name", "dragon");
	call_other(dragon, "set_alias", "wyrm");
	call_other(dragon, "set_level", 19);
        call_other(dragon, "set_hp", 200);
	call_other(dragon, "set_short", "A gold dragon");
	call_other(dragon, "set_wc", 22);
	call_other(dragon, "set_ac", 5);
	call_other(dragon, "set_al", 900);
	call_other(dragon, "set_aggressive", 0);
        call_other(dragon, "set_chance",20);
        call_other(dragon, "set_spell_mess1",
                   "The dragon breathes fire.");
        call_other(dragon, "set_spell_mess2",
                   "The dragon breathes fire on you.");
        call_other(dragon, "set_spell_dam",30);
	move_object(dragon, this_object());
	treasure = clone_object("obj/treasure");
	call_other(treasure, "set_id", "diamond");
	call_other(treasure, "set_alias", "gem");
	call_other(treasure, "set_short", "A giant diamond");
	call_other(treasure, "set_weight", 3);
	call_other(treasure, "set_value", 1000);
	move_object(treasure, dragon);
    }
}
コード例 #5
0
extra_reset() {
    if (!the_guard) {
        object the_weapon, the_money;

        the_guard = clone_object("obj/monster");
        the_guard->set_name("security guard");
        the_guard->set_alias("guard");
        the_guard->set_level(4);
        the_guard->set_hp(100);
        the_guard->set_wc(5);
        the_guard->set_al(-10);
        the_guard->set_short("A security guard");
        the_guard->set_long("This is a security guard in a dark suit, tie and sunglasses.\n" +
                            "He is responsible for the security here.\n");
        the_guard->set_aggressive(1);
        the_guard->set_male();
        the_guard->set_spell_mess1("The guard yells: This is a private area! Get out, terrorist!");
        the_guard->set_spell_mess2("The guard yells at you: This is a private area! Get out, terrorist!");
        the_guard->set_chance(50);
        move_object(the_guard, this_object());

        the_weapon = clone_object("players/padrone/obj/m16");
        the_weapon->set_monsters_reload_at_reset(1);
        move_object(the_weapon, the_guard);
        the_guard->init_command("wield m16");

        the_money = clone_object("obj/money");
        the_money->set_money(random(50));
        move_object(the_money, the_guard);
    }
}
コード例 #6
0
ファイル: pool.c プロジェクト: Shea690901/Castles_and_Quests
extra_reset() {
    if (!slug2 || !living(slug2)) {
	slug2 = clone_object("obj/monster");
	call_other(slug2, "set_name", "slime puddle");
	call_other(slug2, "set_alias", "puddle");
	call_other(slug2, "set_level", 14);
        call_other(slug2, "set_hp", 150);
	call_other(slug2, "set_short", "A puddle of slime");
	call_other(slug2, "set_wc", 12);
	call_other(slug2, "set_ac", 4);
	call_other(slug2, "set_al", -350);
	call_other(slug2, "set_aggressive", 1);
	move_object(slug2, this_object());
    }
    if (!slug1 || !living(slug1)) {
	slug1 = clone_object("obj/monster");
	call_other(slug1, "set_name", "slug");
	call_other(slug1, "set_alias", "slime slug");
	call_other(slug1, "set_level", 14);
        call_other(slug1, "set_hp", 150);
	call_other(slug1, "set_short", "A slime slug");
	call_other(slug1, "set_wc", 12);
	call_other(slug1, "set_ac", 4);
	call_other(slug1, "set_al", -350);
	call_other(slug1, "set_aggressive", 1);
	move_object(slug1, this_object());
    }
}
コード例 #7
0
ファイル: GSPIDER.C プロジェクト: dharmabumstead/vrmud
init() {
    ::init();
    if(!present("hide"))
       move_object(clone_object(OBJ+"gspiplat"), this_object());

// Added clonep check cuz of stupid unique bug - Picard: Easter of 97
    if(!present("stinger") && clonep(this_object()))
       move_object(clone_object(OBJ+"gstinger"), this_object());
}
コード例 #8
0
make_golem() {
    object temp;

    golem = clone_object("obj/monster");	/* NEW, IMPROVED monster class! */
    golem->set_name("golem-padrone");
    golem->set_alias("golem");
    golem->set_level(21);
    golem->set_ep(120000);
    golem->set_hp(1000);
    golem->set_ac(5);
    golem->set_ac(5);
    golem->set_al(0);
    golem->set_short("Padrone the Wizard of Law and Balance (grey lord)");
    golem->set_long("The famous wizard doesn't have time to sit here and wait all day.\n" +
		    "Therefore he made this golem, named it Golem-padrone, and put\n" +
		    "it here. It is a silicon golem, and it is equipped with a\n" +
		    "limited amount of intelligence.\n");
    
    golem->set_aggressive(0);

    /* The NEW, IMPROVED monster calls: */
    if (!chat_str)
	setup_arrays();
    golem->load_chat(10, chat_str);
    golem->load_a_chat(20, a_chat_str);
    golem->set_match(this_object(), function, type, match);

    move_object(call_other("players/padrone/outside/front_yard", "make_ticket"), golem);
    move_object(golem, this_object());

    temp = clone_object("players/padrone/obj/wizardshat");
    move_object(temp, golem);
    golem->init_command("wear hat");
    golem->init_command("say lux");

    temp = clone_object("obj/weapon");
    temp->set_name("debugging tool");
    temp->set_alt_name("tool");
    temp->set_alias("debugger");
    temp->set_class(10);
    temp->set_value(100);
    temp->set_weight(3);
    temp->set_short("A debugging tool");
    temp->set_long("This is a debugging tool.\n" +
		   "One of the wizards probably made it to take care of all\n" +
		   "the bugs that crawl into his correct and beautiful programs\n" +
		   "as soon as he's looking the other way.\n" +
		   "It looks like a big iron hammer with an extra wide head.\n");
    temp->set_hit_func(this_object());
    move_object(temp, golem);

    golem->set_ac(10);		/* After all wear commands! */
} /* make_robot_padrone */
コード例 #9
0
ファイル: request.c プロジェクト: alepharchives/simplehttp
PyObject*
parse_request(PyObject* ignored, PyObject* args)
{
    PyObject* self;
    PyObject* source;
    PyObject* port = NULL;
    PyObject* ret = NULL;
    int status;

    if(!PyArg_ParseTuple(args, "OO", &self, &source)) return NULL;

    request_t* req = create_request(source);
    if(req == NULL) goto done;

    status = do_parse(req);
    if(status < 0) goto done;
    if(status == 0)
    {
        destroy_request(req);
        Py_RETURN_NONE;
    }
    
    // Move objects to self

    if(move_object(self, "method", &(req->method)) != 0) goto done;
    if(move_object(self, "uri", &(req->uri)) != 0) goto done;
    if(move_object(self, "scheme", &(req->scheme)) != 0) goto done;
    if(move_object(self, "host", &(req->host)) != 0) goto done;
    
    port = PyInt_FromLong(req->port);
    if(port == NULL) goto done;
    if(move_object(self, "port", &port) != 0) goto done;

    if(move_object(self, "path", &(req->path)) != 0) goto done;
    if(move_object(self, "query", &(req->query)) != 0) goto done;
    if(move_object(self, "fragment", &(req->fragment)) != 0) goto done;
    if(move_object(self, "version", &(req->version)) != 0) goto done;
    if(move_object(self, "headers", &(req->headers)) != 0) goto done;

    if(req->buflen > 0)
    {
        ret = PyString_FromStringAndSize(req->buffer, req->buflen);
    }
    else
    {
        ret = PyString_FromString("");
    }

done:
    Py_XDECREF(port);
    if(req != NULL) destroy_request(req);
    return ret;
}
コード例 #10
0
extra_reset() {
    if (!paladin || !living(paladin)) {
        paladin = clone_object("obj/monster");
        call_other(paladin, "set_name", "paladin");
        call_other(paladin, "set_alias", "knight");
        call_other(paladin, "set_level", 19);
        call_other(paladin, "set_hp", 300);
        call_other(paladin, "set_al", 1000);
        call_other(paladin, "set_short", "A noble knight");
        call_other(paladin, "set_long", "A noble paladin.\n");
	move_object(paladin, this_object());
        weapon = clone_object("obj/weapon");
        call_other(weapon, "set_name", "glowing sword");
        call_other(weapon, "set_short", "A softly glowing sword");
        call_other(weapon, "set_alias", "sword");
        call_other(weapon, "set_long",
"It is a long sword of finest workmanship, and it glows with goodness.\n");
        call_other(weapon, "set_class", 20);
        call_other(weapon, "set_value", 1000);
        call_other(weapon, "set_weight", 3);
        call_other(weapon, "set_hit_func", this_object());
        call_other(weapon, "set_wield_func", this_object());
	transfer(weapon, paladin);
	call_other(paladin, "init_command", "wield sword");
    }
}
コード例 #11
0
extra_reset() {
    if (!present("world map")) {
        map = clone_object("obj/treasure");
        call_other(map, "set_id", "world map");
        call_other(map, "set_alias", "map");
        call_other(map, "set_short", "A map of the world");
        call_other(map, "set_weight", 30);
        call_other(map, "set_value", 2000);
        call_other(map, "set_long",
"The map looks roughly like this:\n\n" +
"      + *\n" +
"      + +\n" +
"      ++++\n" +
"       +++\n" +
"   +++++++++\n" +
"       |||\n" +
"       +++*      *+ +\n" +
" +      |         |+++  +   *\n" +
" +      +         | |   |   |\n" +
" +-+-+--+-+-*-+-+-+-+---+-+-+-*\n" +
"   +    |           |   |\n" +
" ++++   +*          |   +\n" +
" | |    +          +*++\n" +
" +++    +           +\n" +
" +     +++\n" +
" *      *\n\n" +
"The *'s refer to other maps, most of which are not here\n");
        move_object(map, this_object());
    }
}
コード例 #12
0
extra_reset() {
    object book;
    if (!present("book")) {
        book=clone_object("players/morgar/book");
        move_object(book,this_object());
    }
}
コード例 #13
0
extra_reset() {
    if (!witness) {
	witness = clone_object("obj/monster");
	witness->set_name("witness");
	witness->set_alias("witness of jehova");
	witness->set_level(3);
	witness->set_al(100);
	witness->set_short("One of Jehova's Witnesses");
	witness->set_long("This is person is a Witness of Jehova.\n" +
			  "He is not actually ugly, and he shows no obvious signs of insanity,\n" +
			  "but he has that unmistakable look of a disciple of Jehova.\n" +
			  "If he came knocking on your door,\n" +
			  "you wouldn't let him in.\n");
	witness->set_aggressive(0);
	witness->set_male();

	witness->set_spell_mess1("Witness tries to exorcise a demon from his attacker.");
	witness->set_spell_mess2("Witness tries to exorcise a demon from you. Ouch! That hurt!");
	witness->set_chance(20);
	witness->set_spell_dam(10);

	if (!chat_str)
	    setup_arrays();
	witness->load_chat(50, chat_str);
	witness->load_a_chat(50, a_chat_str);
	move_object(witness, this_object());
    }
} /* extra_reset */
コード例 #14
0
ファイル: plane9_frog.c プロジェクト: nfarrar/mudfiles
void reset(int arg) {
  ::reset(arg);
  if( !arg ) {
    object crown;

    set_name("frog");
    set_alias("toad");
    set_short("a frog");
    set_long("It is your typical frog: small, green, and warty.  However,\n"+
	"perched atop its head is a tiny crown.  Perhaps it is a prince\n"+
	"or princess enchanted by some witch?\n");
    set_race("frog");
    set_level(1);
    set_frog(1);
    set_wc(4);

    crown = clone_object("/std/simple_armour");
    crown->set_name("crown");
    crown->add_alias("iron crown");
    crown->set_short("An iron crown");
    crown->set_long("Actually, it is made of iron and seems to only be "+
	"painted gold.\nIt is tiny and would barely fit you.\n");
    crown->set_class(1);
    crown->set_weight(2);
    crown->set_type("helmet"); /* Added by Banshee. 960118 */
    crown->set_value(18);
    move_object(crown, this_object());
    command("wear crown");
  }
}
コード例 #15
0
ファイル: monsterwell.c プロジェクト: smokeless/eotl
void makeone()
{
    object socialism = find_player( "socialism" );
    
    string *locations = get_dir( FROOM "*1.c" );
    object monster;
    object room = load_object( locations[ random( sizeof(
      locations) )] );
      
    tell_player( socialism, "Loaded random room." );
    
    int gotime = random( 300 ) + 4;
    if( monster = present_clone( FMONS "tent2.c", room ) )
    {
      tell_object( room, "The tendrils recede into the ground." );
      destruct( monster );
      call_out( "makeone", gotime );
      tell_player( socialism, "Tent already in this room.\n" );
      return;
    }
    move_object( clone_object( FMONS "tent2" ), room );
    tell_object( room, "Tendrils erupt from the ground!\n" );
    call_out( "makeone", gotime );
    tell_player( socialism, "Cloned a monster in a room." );
    return;
}
コード例 #16
0
ファイル: playgrid.c プロジェクト: badomm/energieffektive_ex3
playgrid_legal move_player(playgrid_direction direction, int x_new, int y_new, PlayGrid* grid, Square_list* updated){
	playgrid_object new_object;	//object at new square
	
	new_object = get_Playgrid_object(x_new,y_new,grid);
	
	//is the new square legal to move to	
	switch(new_object){
		case ROCK://try to move the rock
			if(ILLEGAL == move_object(x_new, y_new, direction, grid, updated) ){
				return ILLEGAL;			
			}
		break;

		case EMPTY://EMPTY is fine
		break;		
			
		default:
			return ILLEGAL;
		break;
	}
	//everything seems fine, move player

	update_square( grid, EMPTY,grid->player_x, grid->player_y, updated);
	update_square( grid, PLAYER,x_new, y_new, updated);
	return LEGAL;
}
コード例 #17
0
ファイル: TSHIRT.C プロジェクト: dharmabumstead/vrmud
go_slider() {
   write("You say the magic word and are transported to Slider's workroom.\n");

   move_object(this_player(), "/players/slider/workroom");
   this_player()->look();                  
   return(1);
}
コード例 #18
0
extra_reset() {
    if (!mirror) {
        mirror = clone_object("players/morgar/mirror");
        call_other(mirror, "roomset", this_object());
        move_object(mirror, "players/morgar/mazeworld/entry");
    }
}
コード例 #19
0
ファイル: chat.c プロジェクト: shentino/simud
/** Stops listening to a channel, and resets this chat object. \a chan may be any string.
 * \return True on success, false otherwise (no such channel).
 */
int remove_channel(string chan) {
   DAEMON->exit(chan,this_player());
   this_player()->remove_env_var_item("channels", chan);
   if (environment(this_object()))
      move_object(this_object(), environment(this_object()));
   return 1;
}
コード例 #20
0
ファイル: base.c プロジェクト: Hobbitron/tmi2_fluffos_v3
    int
move(mixed dest)
{
    // add code here to prevent disallowed moves (target is full, object
    // is immovable, etc.).
    move_object(dest);
}
コード例 #21
0
ファイル: client.c プロジェクト: be9/oop_course_tasks
MDS_DATA StopwatchMsgProc(void *obj, int message, MDS_DATA extra_data)
{
    Stopwatch *stopwatch = (Stopwatch *)obj;
    if (!stopwatch->alive)
        return NULL_DATA;
    switch (message)
    {
    case MESSAGE_RENDER:
        // single rendering if extra_data == 0
        // erasing rendering if extra_data == -1

        con_gotoXY(stopwatch->pos.x, stopwatch->pos.y);
        if (extra_data.integer == 0)
        {
            char *buffer = (char *)malloc(stopwatch->size.x + 1);
            int s = stopwatch->msec / 1000;
            if (buffer == NULL)
                break;


            sprintf(buffer, "%02i:%02i:%02i", s / 3600, (s % 3600) / 60, s % 60);

            if (stopwatch->active)
                con_outTxt("<%*s>", stopwatch->size.x-2, buffer);
            else
                con_outTxt("[%*s]", stopwatch->size.x-2, buffer);
            free(buffer);
        }
        else
            con_outTxt("%*s", stopwatch->size.x, "");
        break;
    case MESSAGE_MOVE:
        move_object((Object *)stopwatch, extra_data.integer);
        break;
    case MDS_MESSAGE_KEY_PRESSED:
        process_keys((Object *)stopwatch, extra_data.integer);
        break;
    case MESSAGE_FOCUS:
        set_activity((Object *)stopwatch, extra_data.integer);
        break;
    case MESSAGE_STOPWATCH_START:
        stopwatch->running = !stopwatch->running;
        if (stopwatch->running)
        {
            ++(stopwatch->msg_id.integer);
            MDS_postMessage(stopwatch, MESSAGE_STOPWATCH_INC, stopwatch->msg_id, STOPWATCH_INC);
        }
        break;
    case MESSAGE_STOPWATCH_INC:
        if (extra_data.integer == stopwatch->msg_id.integer)
        {
            stopwatch->msec += STOPWATCH_INC;
            if (stopwatch->running)
                MDS_postMessage(stopwatch, MESSAGE_STOPWATCH_INC, stopwatch->msg_id, STOPWATCH_INC);
        }
        break;
    }
    return NULL_DATA;
}
コード例 #22
0
ファイル: paula.c プロジェクト: smokeless/eotl
void extra_create()
{
   object ob;

   set_name(  "Paula Spleen" );
   add_alias( "paula" );
   add_alias( "spleen" );
   add_alias( "paula spleen" );
   add_alias( "Paula Spleen" );
   set_short( "Paula Spleen" );
   set_long(
     "This here be Paula.  She is famous round these parts fer "
     "being the best durn cook this side-a the mississipper.  "
     "She sure must love herself some butter, cuz she's five "
     "hunred pounds if shesa ounce yessireeee yeeehawwww."
   );

   set_race( "pig" );
   set_gender( "female" );
   set_alignment( 250 );

   set_stat( "str",  500 );
   set_stat( "int",    1 );
   set_stat( "wil",  800 );
   set_stat( "con",  500 );
   set_stat( "dex",  300 );
   set_stat( "chr", 1500 );

   set_max_fatigue( 25000 );
   set_natural_ac ( 10 );
   set_proficiency( "pig-fu", 6 );
   set_skill( "dodge", 100 );
   set_percent_bonus_exp( -15 );

   add_special_attack( "chuck_butter", THISO, 10 );

   ob = clone_object( ZOBJ "wig" );
     move_object( ob, THISO );
   ob = clone_object( ZOBJ "muumuu" );
     move_object( ob, THISO );
    ob = clone_object( ZOBJ "diabetes" );
      if( !ob ) ob = clone_object( ZOBJ "butter" );
      move_object( ob, THISO );

   call_out( "gear_up", 2 );
}
コード例 #23
0
ファイル: path3.c プロジェクト: Shea690901/Castles_and_Quests
make_mathilda() {
    object dagger, bag, torch;
    
    mathilda = clone_object("obj/monster");		/* NEW, IMPROVED monster class! */
    mathilda->set_name("mathilda");
    mathilda->set_level(2);
    mathilda->set_ep(100);
    mathilda->set_hp(7);
    mathilda->set_al(150);
    mathilda->set_short("Mathilda the small thief (good)");
    mathilda->set_long("Mathilda is a dressed in black clothes, and she carries a dagger\n" +
		       "and a bag to carry things in. She is probably a thief.\n" +
		       "But something terrible has happened to Mathilda, and she\n" +
		       "is horribly hurt. She will probably die any minute now.\n");
    mathilda->set_aggressive(0);
    mathilda->set_spell_mess1("Mathilda bleeds a little.");
    mathilda->set_spell_mess2("Mathilda bleeds on you.");
    mathilda->set_chance(20);
    mathilda->set_spell_dam(0);
    
    move_object(mathilda, this_object());
    /* The NEW, IMPROVED monster calls: */
    if (!chat_str)
	setup_arrays();
    mathilda->load_chat(20, chat_str);
    
    dagger = clone_object("obj/weapon");
    dagger->set_name("dagger");
    dagger->set_class(7);
    dagger->set_value(10);
    dagger->set_weight(1);
    dagger->set_short("A dagger");
    dagger->set_long("This is an ordinary dagger, like the ones thieves often carry.\n");
    move_object(dagger, mathilda);
    mathilda->init_command("wield dagger");
    
    bag = clone_object("obj/bag");
    move_object(bag, mathilda);
    
    torch = clone_object("obj/torch");
    torch->set_name("torch");
    torch->set_fuel(2000);
    torch->set_weight(1);
    move_object(torch, bag);
} /* make_mathilda */
コード例 #24
0
ファイル: chat.c プロジェクト: shentino/simud
/** Starts listening on a new channel, and resets this chat object. \a chan may be any string.
 * \return True on success, false otherwise (channel already added).
 */
int add_channel(string chan, int silent) {
  if (DAEMON->enter(chan,this_player(),silent))
     this_player()->add_env_var("channels", chan);
  else
     return 0;
  if(environment(this_object()))
     move_object(this_object(), environment(this_object()));
  return 1;
}
コード例 #25
0
ファイル: nonsimple.c プロジェクト: lowagner/bitbox-modes
void update_objects()
{
    uint8_t ok = first_used_object; // object index
    while (ok < 255)
    {
        move_object(ok, object[ok].x, object[ok].y);
        ok = object[ok].next_used_object;
    }
}
コード例 #26
0
ファイル: hsinterface.cpp プロジェクト: jrsteensen/hspace-old
void CHSInterface::MoveObject(HS_DBREF dbObject, HS_DBREF dbTo)
{
#ifdef PENNMUSH                 // No change in code between versions
    moveto(dbObject, dbTo, SYSEVENT, "HSpace MoveObject");
#endif

#if defined(TM3) || defined(MUX)
    move_object(dbObject, dbTo);
#endif
}
コード例 #27
0
extra_reset() {
    object black_stone;
    if (!rat || !living(rat)) {
	rat = clone_object("obj/monster");
	call_other(rat, "set_name", "rat");
	call_other(rat, "set_alias", "black rat");
	call_other(rat, "set_level", 3);
	call_other(rat, "set_short", "An ugly black rat");
	call_other(rat, "set_wc", 5);
	call_other(rat, "set_agressive", 1);
	move_object(rat, this_object());
	black_stone = clone_object("obj/treasure");
	call_other(black_stone, "set_id", "stone");
	call_other(black_stone, "set_alias", "black stone");
	call_other(black_stone, "set_short", "A black stone");
	call_other(black_stone, "set_value", 60);
	move_object(black_stone, rat);
    }
}
コード例 #28
0
ファイル: all_inventory.c プロジェクト: BPotato/fluffos
void
create() {
#ifndef __NO_ENVIRONMENT__
    if (clonep()) {
	string s = file_name();
	sscanf(s, "%s#%*d", s);
	move_object(s);
    }
#endif
}
コード例 #29
0
ファイル: crypt_g_011.c プロジェクト: nhaskins/eotl
int handle_enter(string arg)
{
  if(arg == "crypt")
  {
    move_object(THISP, "/usr/kharas/zone/cv/aradale/graveyard/room/g_025");
    command("glance",THISP);

    return(1);      
  } 
}
コード例 #30
0
extra_reset() {
    if (!treasure) {
        treasure = clone_object("obj/treasure");
        call_other(treasure, "set_id", "pretty rock");
        call_other(treasure, "set_alias", "rock");
        call_other(treasure, "set_short", "A pretty rock");
        call_other(treasure, "set_weight", 1);
        call_other(treasure, "set_value", 15);
        move_object(treasure, this_object());
    }
}