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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
; j0 z/ h. t2 i/ O5 a9 r/**Make the shopping list and Task Sequence*/
) `* h% w# {. w2 l* e2 C! vtreenode current = ownerobject(c);
treenode Shopper = msgsendingobject;

treenode ShoppingList = label(Shopper,"ShoppingList");
clearcontents(ShoppingList);
int TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
{
        int Type = duniform(1,gettablerows("FoodNames"),1);
        nodeinsertinto(ShoppingList);
        treenode ActiveNode = last(ShoppingList);
; D5 o4 n" ^1 L% J* v$ ?        nodeadddata(ActiveNode,DATATYPE_NUMBER);
  |+ y) x* F% w/ o, @) w, F        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
}

8 _/ r' b) D7 H$ U  S) b' Q6 o- L( w. [////////////////////////////////////////////////////////////////////////////////////////////////////////
3 R8 k3 K0 m7 U
// move the item into the model.
8 e+ [% p- q3 e. v9 g$ i; zmoveobject(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);
6 A) X; D2 i8 q, H* k1 D1 Fif(objectexists(netnode))
' i  z- H5 c7 F" N# V: T4 c7 N{
        // connect the item to the network
        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
4 k! M: W( Q2 l" o- i        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
  U) W) v; j% \6 k5 C5 {}

( f8 V2 T  X( T* e3 v////////////////////////////////////////////////////////////////////////////////////////////////////////
; ^5 v% r6 t1 _/ z; ~) t# qtreenode Cart = first(Shopper);

treenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);
  U& Z% C3 D2 j5 ^6 [/ f

, \6 F' Y- l. ~* Lsetlabelnum(Cart, "Pointer", tonum(Shopper));
setlabelnum(Cart, "Content", 0);
5 v( u# }" P8 r- T
treenode RecycleBin = rank(ItemBin,2);
int LocationID;
* k+ f) i, G6 ptreenode StopLocation;
! d, A, a1 P# {. O8 V3 ~: i3 b
4 B9 U- P! e. ?for(int Stop = 1; Stop <= TotalItems; Stop++)
6 o: x1 T6 n8 [  [{
: O" c, P% e2 a9 h5 M# d" c9 {        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
        if(LocationID<=84)
: m8 ^; O# a( ^  x- B5 i" P3 e# Z- U: ]        {
                if(content(RecycleBin>0))
6 r8 J4 O8 b' }% S; M* k                {
                        Item = last(RecycleBin);
                        transfernode(Item, model());
* ^. ~2 {7 N* h/ u- a  p                }
                else
                {
; s- V! J7 E7 c, W  c6 Q- M* n0 k                        createcopy(first(ItemBin), model());
                        Item = last(model());
5 @2 Y. Q0 {; F6 ~                }
* J: c- a8 h& Q4 l  N% _# d                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
                setlabelnum(Item,"Reference",LocationID);
; X- }  N7 ?4 k8 B4 _3 k- q# u                moveobject(Item,StopLocation,1);
        }
        if(LocationID>84) //Deli
        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
4 K$ E  u0 Q; A5 B& ]                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
' b5 ~" b  [+ y2 s2 V; I        else
6 Y4 |6 A4 W) y' n0 x; B0 m/ T        {
( @0 z( K. ]; `0 V; \" \# s* r/ K                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
% W1 b. P; a  Y2 M  F0 _# C                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
- |7 [8 D- y0 U' ]                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
        }
3 A3 o1 K, C! {. ]' x" @}
; K$ {) T+ _4 ^& D: O
inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
: t- ~, g5 a3 Q+ D6 Einserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
dispatchtasksequence(ts);
万分感谢！

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