Community
Hi,
I totally agree with Kerry.
I could, like many others here, convert this LISP routine into C# but it would be the worst service to make you want to learn C# (.NET more accurately).
Learning .NET is a more difficult task than learning AutoLISP which cannot be content to read code written by others.
Start by learning the basics of .NET (Object Oriented Programming, Visual Studio,.NET Framework and C # syntax) outside of AutoCAD (standard Window programming) before trying to use AutoCAD .NET API.
PS: Are the author of the LISP routine ?
If so, before trying to convert it to C#, you could simplify/optimize some expressions as:
(setq sum 0) (setq sum (apply '+ (list sum start_num)))
or the way you iterate list of selected objects.
Here's a C# conversion of the LISP routine.
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Runtime;
using System.Collections.Generic;
namespace TCountAttribute
{
public class Commands
{
[CommandMethod("TCOUNT_ATT")]
public void TCountAttCommand()
{
Document doc = Application.DocumentManager.MdiActiveDocument;
Database db = doc.Database;
Editor ed = doc.Editor;
// build a selection filter to select only block references with attributes
// and prompt the user fo a selection
TypedValue[] filter = { new TypedValue(0, "INSERT"), new TypedValue(66, 1) };
PromptSelectionResult selResult = ed.GetSelection(new SelectionFilter(filter));
// exit the command if none block selected
if (selResult.Status != PromptStatus.OK)
return;
// start a transaction to open selected blocks
using (Transaction tr = db.TransactionManager.StartTransaction())
{
// build a list of block references from the selection set
List<BlockReference> blocks = new List<BlockReference>();
foreach (SelectedObject so in selResult.Value)
{
BlockReference br = (BlockReference)tr.GetObject(so.ObjectId, OpenMode.ForRead);
blocks.Add(br);
}
// prompt the user for a sorting option
PromptKeywordOptions kwordOptions = new PromptKeywordOptions(
"\nSort selected objects by [X/Y/Select-order]",
"X Y Select-order");
kwordOptions.Keywords.Default = "Select-order";
PromptResult kwordResult = ed.GetKeywords(kwordOptions);
if (kwordResult.Status != PromptStatus.OK) // <- cancel
return;
// sort the list by X or Y (already done for select order)
switch (kwordResult.StringResult)
{
case "X":
blocks.Sort((b1, b2) => b1.Position.X.CompareTo(b2.Position.X));
break;
case "Y":
blocks.Sort((b1, b2) => b1.Position.Y.CompareTo(b2.Position.Y));
break;
}
// prompt the user for the starting number
PromptIntegerOptions intOptions = new PromptIntegerOptions("\nSpecify starting number: ");
intOptions.DefaultValue = 1;
intOptions.UseDefaultValue = true;
PromptIntegerResult intResult = ed.GetInteger(intOptions);
if (intResult.Status != PromptStatus.OK) // <- cancel
return;
int num = intResult.Value;
// prompt the user for the increment number
intOptions.Message = "\nSpecify increment number: ";
intResult = ed.GetInteger(intOptions);
if (intResult.Status != PromptStatus.OK) // <- cancel
return;
int incNum = intResult.Value;
// set the first attribute value of each block reference in the list
foreach (BlockReference br in blocks)
{
ObjectId firstAttId = br.AttributeCollection[0];
AttributeReference attRef = (AttributeReference)tr.GetObject(firstAttId, OpenMode.ForWrite);
attRef.TextString = num.ToString();
num += incNum; // increment the value
}
tr.Commit();
}
}
}
}
Perfect Gile, 
You are really expert. Very quick.
I can learn a lot of from your code.
Thank you very much.
To execute some code at DLL loading, you should have a class in your project which implements the IExtensionApplication interface.
This may be either a separate class (as below) or the same class as the one where the command is defined (as in upper link sample).
public class Initialization : IExtensionApplication
{
public void Initialize()
{
var ed = Application.DocumentManager.MdiActiveDocument.Editor;
ed.WriteMessage("\nCommand: TCOUNT_ATT");
}
public void Terminate()
{
// do nothing here, but the Terminate() method must be explicitly implemented
}
}
