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

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

, l$ C4 }4 P7 Z1 }6 w% ktreenode ShoppingList = label(Shopper,"ShoppingList");
clearcontents(ShoppingList);
int TotalItems = duniform(1,15,1);
( u; Z# L8 P5 I/ O( pfor( int i = 1; i<=TotalItems; i++)
{
        int Type = duniform(1,gettablerows("FoodNames"),1);
5 V: W! Q0 A2 Z8 U2 v! i1 W        nodeinsertinto(ShoppingList);
        treenode ActiveNode = last(ShoppingList);
: @2 Q5 ?/ p0 E4 |        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
$ y$ T1 m# j2 L; V        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
; e+ Z' I9 b+ K( X4 b5 j}

$ V1 V+ Y' P, j$ t////////////////////////////////////////////////////////////////////////////////////////////////////////
' i9 W: x. l% X$ k
( [3 L& i" q/ h0 e// move the item into the model.
; e0 F; n6 b1 L% Z- a' omoveobject(Shopper, model(), 0);
// Now if there is a network node connected to me, then connect the flow item to that node.
0 x8 M, J' s# Ttreenode netnode = getnetnode(current, 1);
0 p$ d& W1 `+ F  d. w5 s3 vif(objectexists(netnode))
, _# ^$ _/ N9 D8 b- O1 c{
        // connect the item to the network
5 S6 @( W3 ]' k- K' T- G        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
' ~$ A8 G. F- p" b}

1 I8 g1 f: l  w- q7 d( g////////////////////////////////////////////////////////////////////////////////////////////////////////
treenode Cart = first(Shopper);

treenode Item;
$ S) ]5 Y. W: jtreenode ts = createemptytasksequence(Shopper,0,0);
( H; Y4 ]7 a5 j' {% i
9 G9 ]6 d+ x6 d) Y7 l% W/ K
$ t1 m- A& S! [1 [setlabelnum(Cart, "Pointer", tonum(Shopper));
setlabelnum(Cart, "Content", 0);
1 V6 D4 l+ s, C6 ?; w% L
treenode RecycleBin = rank(ItemBin,2);
6 j3 \* f$ ^3 E, bint LocationID;
4 M5 R! C: w8 n" m( W; I7 ~treenode StopLocation;
8 {9 L1 V1 {/ C# L1 x* N% G5 w
for(int Stop = 1; Stop <= TotalItems; Stop++)
{
        LocationID = getnodenum(rank(ShoppingList, Stop));
9 U7 }' u# c0 ~& Z0 W        StopLocation = outobject(current,LocationID);
  d( n6 r% c# Y6 y* H% y        if(LocationID<=84)
        {
                if(content(RecycleBin>0))
                {
# ?. j/ B1 ]  c8 x. `9 K1 V' x. n                        Item = last(RecycleBin);
                        transfernode(Item, model());
                }
0 x; [0 }5 g9 e0 @( B) \                else
( o& q& Z$ u- X9 k+ e& O                {
                        createcopy(first(ItemBin), model());
                        Item = last(model());
8 e  i+ l) h8 z- a# h& O                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
        }
        if(LocationID>84) //Deli
8 F/ v# e6 R+ }" W        {
( K5 N2 ]2 G9 r; h) ]7 \- C) r+ p4 u                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
; [2 d' ~, X: y* N+ D        }
- K) \3 x9 M0 @4 g0 O        else
: m. V; J6 b% Z9 D3 x5 D3 ~9 g9 c" x        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
! F# e0 I% T3 P8 [* P+ A7 u  E2 d        }
}
5 r  t- Z! e$ g: H
( P6 B( `7 S7 K% q/ u& `inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
dispatchtasksequence(ts);
8 h! H6 B. L, X9 G0 c万分感谢！

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