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

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

treenode ShoppingList = label(Shopper,"ShoppingList");
  }  F- F, I8 \4 Hclearcontents(ShoppingList);
) |% U$ A- h, `" X6 |7 P* x# {; }. Iint TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
{
5 I5 \5 D- t: A) V        int Type = duniform(1,gettablerows("FoodNames"),1);
% n" F4 s6 @, J. ]( T4 S        nodeinsertinto(ShoppingList);
" Q  O. z& K8 C        treenode ActiveNode = last(ShoppingList);
        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
$ l$ p/ A# w/ @& f}
+ T0 o* n6 v  O: F! e1 @
////////////////////////////////////////////////////////////////////////////////////////////////////////

( i1 U! J$ ?" x5 t9 q2 M8 ~// move the item into the model.
! A) d$ N2 L0 F$ l/ Q3 ~8 q4 imoveobject(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);
( D+ E4 o) K7 \if(objectexists(netnode))
{
& v7 I9 v% P& L$ H, H# L        // connect the item to the network
        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}
2 F. Q& u/ J; d. U* H
////////////////////////////////////////////////////////////////////////////////////////////////////////
! t! G" N0 T' r4 e2 }; U( xtreenode Cart = first(Shopper);

  X- o6 D9 C+ Y9 Xtreenode Item;
# e  O# ~) A1 |* Ctreenode ts = createemptytasksequence(Shopper,0,0);

0 h. O9 k$ B' }& [9 {7 |/ R9 j
setlabelnum(Cart, "Pointer", tonum(Shopper));
/ [4 L% Q* t  dsetlabelnum(Cart, "Content", 0);
9 `, u* P4 N) P9 S
1 k% \# S! \3 g4 v* ^4 Utreenode RecycleBin = rank(ItemBin,2);
3 k4 t/ }7 m! N9 wint LocationID;
treenode StopLocation;
5 ?9 w4 T6 p( O
3 g. x2 y+ H9 ~+ ]+ J2 ffor(int Stop = 1; Stop <= TotalItems; Stop++)
{
        LocationID = getnodenum(rank(ShoppingList, Stop));
& l# D. @7 Z: K+ t! q4 [6 c4 H# M        StopLocation = outobject(current,LocationID);
- C1 s; q% I1 K. r) A6 A        if(LocationID<=84)
        {
                if(content(RecycleBin>0))
4 G# l! _* p) Y, A; A- a' `/ ~                {
# Q/ c, O8 z8 \" r, C. G                        Item = last(RecycleBin);
. c& ~4 ?* G4 r' a  m# q, ~                        transfernode(Item, model());
" P7 W5 P, M! [" S; S                }
: @! a) g4 k: h! e% t                else
- X5 X. Z7 G6 ?0 E8 X9 T7 Z" U                {
                        createcopy(first(ItemBin), model());
7 U- z6 V* t- J9 Q- }- f                        Item = last(model());
5 O$ u( a6 b" e5 s4 @8 r6 N                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
4 B" ?' o) k! R3 e6 R0 b5 b2 L7 o                setlabelnum(Item,"Reference",LocationID);
" G; ^6 c. a0 S) e5 j' B  Q                moveobject(Item,StopLocation,1);
        }
' X9 r3 r7 M  T5 Q" ~6 j. T        if(LocationID>84) //Deli
        {
, }! r8 P3 s" s8 K) M0 d) b                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
        else
        {
8 A* b2 k4 ^( X/ K1 b# I( Q                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
5 [+ Z( S0 \4 V9 ]" v1 j                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
/ s: Z+ n! P' o* N4 X1 a+ L; r        }
}

inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
) I4 x. A1 i) ^dispatchtasksequence(ts);
2 y5 D! K2 |4 `6 X/ r万分感谢！

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