function wear()

if( ( s = getname() ) == "Will" )

then

	comm( "mob", "Hey, Will!" );

else

	force( "mob", "remove backpack" );

end --endif



end --end func~

Immediate execution
[string "Immediate"]:3: ')' expected near '='

struct LuaScript
{
    char *name;
    char *script;
};

struct dObject
{
   char *name;
   ...
   ...
   LIST luaScripts;
};

bool check_object_script( D_OBJECT *obj, char *script )
{
    ITERATOR iter;
    LUASCRIPT *scriptPointer;

    AttachIterator( &iter, obj->luaScripts );
    while( ( scriptPointer = (LUASCRIPT*) NextInList( &iter ) ) != NULL )
    {
        if( !strcasecmp( script, scriptPointer->name ) )
        {
            run_script( scriptPointer );
            return TRUE;
        }
    }
    DetachIterator( &iter );

    return FALSE;
}

void run_script( LUASCRIPT *script )
{
    luaL_loadbuffer( mudL, script->script, strlen( script->script ), script->name );
    lua_pcall( mudL, 0, 0, 0 );
    call_va( mudL, script->name, "" );

    return;
}

##NEW_OBJ## 14
##SNAME## a pair of dice~
##LNAME## A pair of dice sit in the dust~
##WEARPOS## 16
##DESC## A standard pair of dice~
##ISCONT## 0
##LUA##
roll~
function roll()



comm( "mob", "You roll a " .. rand(1,6) .. " and a " .. rand(1,6) .. "." );

comm( "room", "Will rolls a pair of dice" );



end~
##END_OBJ##

The Void
An inky blackness surrounds you, envelopes you, overwhelms your senses.
Nothing can be seen, nothing can be smelled, nothing can be heard. You
are completely and utterly alone, and it is terrifying.
Exits:
  North.
A large oak chest sits in the corner, collecting dust.
[56/100hp Level: 4]eq

You are wearing:
	a sturdy backpack on your shoulders.
	a pair of dice in your left hand.
[56/100hp Level: 4]roll

You roll a 2 and a 1.
[56/100hp Level: 4]roll

You roll a 6 and a 6.
[56/100hp Level: 4]roll

You roll a 4 and a 6.
[56/100hp Level: 4]

##NEW_OBJ## 13
##SNAME## a sturdy backpack~
##LNAME## A sturdy looking backpack sits on the ground~
##WEARPOS## 13
##DESC## Its a sturdy canvas backpack and it looks like it can hold

quite a lot of supplies.~
##ISCONT## 20
##NEW_OBJ##
##SNAME## A tattered bedroll~
##LNAME## A tattered looking bedroll provides a place for one to rest during their travels~
##WEARPOS## 16
##DESC## The bedroll is old and worn, but provides more comfort than the bare ground for the wandering

traveler. The  bedroll consists of a few thick wool blankets and a canvas ground cloth, and keeps who-

ever might use it warm at night.~
##ISCONT## 0
##END_OBJ##
##LUA##
wear~
function wear()

if( ( s = getname() ) == "Will" )

then

	comm( "mob", "Hey, Will!" );

else

	force( "mob", "remove backpack" );

end --endif



end --end func~
##END_OBJ##

[56/100hp Level: 4]rem backpack

You remove a sturdy backpack and hold it in your right hand.
[56/100hp Level: 4]wear backpack

[LOG: error running function `wear': attempt to call a nil value]
You wear a sturdy backpack on your shoulders.
[56/100hp Level: 4]

buf++;

char buf [MAX_BUFFER];

void send_prompt( D_MOBILE *player )
{
	char *buf = (char*) malloc( sizeof( char ) * MAX_BUFFER );
	char *pbuf = player->prompt;
    
	char *start = buf;
	/*
	 *Possible Prompt Flags:
	 *$h - Current Health
	 *$H - Maximum Health
	 *$l - Current Level
	*/

	if( !player->prompt )
	{
		cmd_prompt( player, "default" );
	}
	
	for( ;*pbuf; pbuf++ )
	{
		if( *pbuf != '$' )
		{
			*buf = *pbuf;
			buf++;
		}
		else
		{
            pbuf++;
			switch( *pbuf )
			{
				case 'h':
					buf+=sprintf( buf, "%i", player->curHealth );
                    fprintf( stderr, "Current Health Flag\n" );
					break;
				case 'H':
					buf+=sprintf( buf, "%i", player->maxHealth );
                    fprintf( stderr, "Maximum Health Flag\n" );
					break;
				case 'l':
					buf+=sprintf( buf, "%i", player->level );
                    fprintf( stderr, "Current Level Flag\n" );
					break;
				default:
                    fprintf( stderr, "Default\n" );
					buf+=sprintf( buf, "%c", *pbuf );
					break;
			}
		}
    }
	*buf = '\0';
	text_to_mobile( player, start );
	fprintf( stderr, "Prompt set as: %s\nPrompt being displayed: %s\n", player->prompt, start );
        //free( buf ) /*Memory leak!*/ Here I was, thinking I was being clever.... You REALLY don't want to free that variable.
	return;
}