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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
) |( X% [9 n$ X5 ^0 C! j# itreenode current = ownerobject(c);
treenode Shopper = msgsendingobject;

treenode ShoppingList = label(Shopper,"ShoppingList");
; Q: \3 u7 v' C' Fclearcontents(ShoppingList);
7 m4 {$ \3 [: C, n9 ^; cint TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
{
+ m, e# j. m. B8 j, {9 ~7 H        int Type = duniform(1,gettablerows("FoodNames"),1);
  L' r& w' M; V' s$ j  B9 {        nodeinsertinto(ShoppingList);
        treenode ActiveNode = last(ShoppingList);
7 I; |: y9 k0 [+ @+ N        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
3 O' ?. q& X4 `$ g1 |6 R}

$ y  M7 U1 J0 P( t////////////////////////////////////////////////////////////////////////////////////////////////////////
" o3 d$ V4 ~, H- g% w, ]
// move the item into the model.
7 l& M- D$ f, [( Cmoveobject(Shopper, model(), 0);
4 w, l4 G8 D- ^" A0 V// Now if there is a network node connected to me, then connect the flow item to that node.
4 o) B! T  {4 vtreenode netnode = getnetnode(current, 1);
if(objectexists(netnode))
8 [2 t! t3 a, j2 l) C  O{
$ z$ s% F% K4 E$ k1 H2 h% B        // connect the item to the network
        contextdragconnection(netnode, Shopper, "A");
8 J5 |' C1 J3 S- v0 \* [' @# f        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
8 n5 F9 I) H  E. P' Z: H6 g}

////////////////////////////////////////////////////////////////////////////////////////////////////////
  e: u. v. ?( G- {1 s4 ktreenode Cart = first(Shopper);
, _% A$ d! r, w2 d4 U
  q- B0 v, i9 ttreenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);


setlabelnum(Cart, "Pointer", tonum(Shopper));
setlabelnum(Cart, "Content", 0);
. p1 T! [' K0 ]
treenode RecycleBin = rank(ItemBin,2);
int LocationID;
+ q* K+ {! J* a- a- ptreenode StopLocation;

for(int Stop = 1; Stop <= TotalItems; Stop++)
{
        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
$ \( {8 j3 Q5 q- D        if(LocationID<=84)
7 S! K& C( f) I2 V2 J        {
9 S$ ~  ]4 l8 u2 p% F5 l1 W                if(content(RecycleBin>0))
                {
) `& H5 |4 m% P                        Item = last(RecycleBin);
* N7 w/ p" ~$ a; [$ ^                        transfernode(Item, model());
                }
                else
                {
                        createcopy(first(ItemBin), model());
                        Item = last(model());
! S; L1 d7 M2 V* c& H                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
6 l- w7 ]0 ^' q5 M4 m, c        }
        if(LocationID>84) //Deli
% @% Y1 j) j+ ?# A* J" _, F        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
5 O4 m: m: A0 D% L                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
5 @% j% _$ \7 O' l% G                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
        else
        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
3 n; J0 ]5 Z1 X                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
; j$ u# [9 |* Z+ F" }4 @( N                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
        }
# R- U  Z6 f! J: c# u' w9 r7 L}
. p, u% D: E) s
inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
6 w' u1 x1 w) B3 x4 L! @inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
5 Y3 q; F8 ^, ]dispatchtasksequence(ts);
( y2 {- U1 _: e* [) V万分感谢！

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