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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
treenode current = ownerobject(c);
treenode Shopper = msgsendingobject;
" V, E, C; c$ [" u; X5 F
; n/ w5 v% U% J  Otreenode ShoppingList = label(Shopper,"ShoppingList");
clearcontents(ShoppingList);
$ H5 x1 M+ l  ^int TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
% e; f* Y/ L& c{
2 o; l% V' p7 S        int Type = duniform(1,gettablerows("FoodNames"),1);
" p; ~; {0 @( q        nodeinsertinto(ShoppingList);
        treenode ActiveNode = last(ShoppingList);
        nodeadddata(ActiveNode,DATATYPE_NUMBER);
. g+ Q$ H1 v5 {, u+ q/ l" d        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
}

- [* ]6 D6 W! v////////////////////////////////////////////////////////////////////////////////////////////////////////

0 H! a3 }# s$ E! Q; [// move the item into the model.
moveobject(Shopper, model(), 0);
// Now if there is a network node connected to me, then connect the flow item to that node.
- b3 g' P% @; Y  h+ Rtreenode netnode = getnetnode(current, 1);
  e& m3 O+ W% c5 Lif(objectexists(netnode))
3 o; ~5 a- R/ d5 G$ W{
- h+ n0 f* ?; I) G0 J        // connect the item to the network
        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}
* A. s. G! R: s& y& |
////////////////////////////////////////////////////////////////////////////////////////////////////////
# Y% N# z" q8 K( ftreenode Cart = first(Shopper);
" L* ?% R& y/ S4 y& W  D: h8 T
treenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);
4 Y  }# S) X2 `5 J

% r# M8 l6 w9 f, Q( j3 ]setlabelnum(Cart, "Pointer", tonum(Shopper));
# R. g" X- M6 W2 s1 a1 usetlabelnum(Cart, "Content", 0);
7 R, v8 y2 F: `) ?
treenode RecycleBin = rank(ItemBin,2);
5 A  s& a, r2 D2 p/ Q, yint LocationID;
treenode StopLocation;
, E+ N8 i& e0 O7 Z7 U: C+ d0 ~
for(int Stop = 1; Stop <= TotalItems; Stop++)
' h* X! T3 X0 D( [; ^{
* I8 A; |0 x: L1 r& R        LocationID = getnodenum(rank(ShoppingList, Stop));
$ X  N5 u/ S1 y        StopLocation = outobject(current,LocationID);
. w" I& R3 N  N- _3 ?3 f        if(LocationID<=84)
$ }' M' a  A, a) L        {
                if(content(RecycleBin>0))
                {
                        Item = last(RecycleBin);
# n: h& G( C# d  @                        transfernode(Item, model());
- Q6 E& I. H$ m( c( d8 j, w                }
                else
$ H8 f9 }( k# x! D: N1 F                {
0 W" t( l( ~+ d3 v9 U                        createcopy(first(ItemBin), model());
                        Item = last(model());
. s5 f4 o& R* I/ S1 N, A/ B% Z                }
) P: t' K9 Z1 W" h- m! [! ^+ G0 Y                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
1 u5 N4 [0 c$ F3 j! n2 Q5 ]$ _                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
        }
        if(LocationID>84) //Deli
        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
+ J" r# ]$ P6 P0 F        }
        else
+ x2 t; O- c) l! O6 N; x        {
* _' \- J3 M: h* a# Q2 v                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
: @2 B, \. M' M                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
* A5 X  F3 F3 z  ^- S                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
2 T$ W$ F# K7 k+ v. @4 r        }
}

inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
' I) w" y0 I5 h3 @inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
dispatchtasksequence(ts);
万分感谢！

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