谁能帮我把下面的代码用汉语标注出来啊？

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
# n3 I0 j. i# J+ Jtreenode current = ownerobject(c);
treenode Shopper = msgsendingobject;

treenode ShoppingList = label(Shopper,"ShoppingList");
1 M9 ?8 ]7 U5 ~- c1 Y# Mclearcontents(ShoppingList);
int TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
  n. H6 j3 U2 s- b" j{
0 [" j: `% O& G1 u        int Type = duniform(1,gettablerows("FoodNames"),1);
' T" c0 Q: @1 b) _        nodeinsertinto(ShoppingList);
: Y6 g: R, G0 n6 L" \        treenode ActiveNode = last(ShoppingList);
        nodeadddata(ActiveNode,DATATYPE_NUMBER);
9 U" `9 s" B' l8 M& v        setnodenum(ActiveNode,Type);
' x8 R) Q. O6 Y        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
  o& v  g) d# d) I/ H( m: _}
5 E( [( x8 ~+ x! \6 ]4 v
3 M1 [2 t' }# X& |+ M) t////////////////////////////////////////////////////////////////////////////////////////////////////////

, `5 |: K4 I% ~$ F2 K0 z7 E/ I9 B// move the item into the model.
. B. B3 ^0 r$ @6 @6 T, e: T! emoveobject(Shopper, model(), 0);
// Now if there is a network node connected to me, then connect the flow item to that node.
treenode netnode = getnetnode(current, 1);
if(objectexists(netnode))
{
        // connect the item to the network
        contextdragconnection(netnode, Shopper, "A");
# ?4 C& A2 E' E, Z, s6 R8 A; i1 i- y        // set the location of the item.
7 o" K( U4 @! B: E+ V        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}
+ B  w: R1 E" b" h& [9 ~
- }( E: {( q7 G. m, L5 G////////////////////////////////////////////////////////////////////////////////////////////////////////
treenode Cart = first(Shopper);
6 W( ?8 A* j% ?, X  h
treenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);
' p- e3 F% @; z. E6 r& @

setlabelnum(Cart, "Pointer", tonum(Shopper));
setlabelnum(Cart, "Content", 0);

treenode RecycleBin = rank(ItemBin,2);
: l- B1 v; }3 D, T$ a+ Tint LocationID;
treenode StopLocation;

3 L: i" o. D% M4 I0 }for(int Stop = 1; Stop <= TotalItems; Stop++)
{
        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
        if(LocationID<=84)
        {
                if(content(RecycleBin>0))
                {
                        Item = last(RecycleBin);
                        transfernode(Item, model());
+ ~: Y, v, \; W- V                }
. E2 C. M( l+ e2 Y  q: t                else
                {
) I4 R6 R& t! k) ^+ `5 B% x' Y                        createcopy(first(ItemBin), model());
, h2 I" ~& I% q                        Item = last(model());
                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
9 f; x" H' D- o                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
3 e" B8 o- p. M' ~" ]% p# d        }
        if(LocationID>84) //Deli
% L# j9 {% X1 [1 ]- X; F& I' [4 f        {
9 l  }5 M' Y; m0 ?. v, t                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
* J3 w! ~- i* D        }
        else
; a5 K2 @8 w7 P2 X, |( v0 L4 o! y5 B' V3 c        {
; v9 D7 U- m, M9 q* @' y                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
- i8 X5 |( W0 @' x) Z/ j, V) Z; t/ h        }
6 t0 |3 k% Y6 E4 |}
& O. {. D7 r2 n; ^' P! y
inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
8 H$ B  ~2 U6 U8 @# J7 wdispatchtasksequence(ts);
万分感谢！

这个任务量有点大，但是我急需...