void do_saveall( CHAR_DATA *ch, char *argument )
{
    CHAR_DATA   *vch;
    AREA_DATA   *tarea;
    char         filename[256];
    for ( vch = first_char; vch; vch = vch->next )
    {
        if ( !IS_NPC( vch ) )
        {
           save_char_obj( vch );
           set_pager_color( AT_PLAIN, ch );
           pager_printf( ch, "Saving %-s...\n\r", vch->name);
        }
    }
    for ( tarea = first_build; tarea; tarea = tarea->next )
    {
       if ( !IS_SET(tarea->status, AREA_LOADED ) )
       {
          continue;
       }
       sprintf( filename, "%s%s", BUILD_DIR, tarea->filename );
       fold_area( tarea, filename, FALSE );
    }

}