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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
1 y4 z1 N9 `$ {# d' q4 E7 C' B3 ttreenode current = ownerobject(c);
" S9 a9 Z- u3 otreenode Shopper = msgsendingobject;

treenode ShoppingList = label(Shopper,"ShoppingList");
clearcontents(ShoppingList);
/ L4 G4 [' p1 N  F2 @. h4 |int TotalItems = duniform(1,15,1);
- `9 a3 z+ Z* \8 ?1 ?/ i/ vfor( int i = 1; i<=TotalItems; i++)
3 \! T4 P# V( \/ s6 }{
        int Type = duniform(1,gettablerows("FoodNames"),1);
" x% ?- @  C- j) W; R* S7 e" H- y' B0 a        nodeinsertinto(ShoppingList);
' y/ j+ n  G5 Z9 V0 D        treenode ActiveNode = last(ShoppingList);
) ?0 C  N' h' n2 B  R& h, r7 O        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
6 _* X( J: j/ h/ p1 `}

////////////////////////////////////////////////////////////////////////////////////////////////////////
1 ^) m, e: J  o$ o
$ C6 j, V6 w0 y$ `% O- z! N8 E// 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.
; g8 o" p! [2 z. Otreenode netnode = getnetnode(current, 1);
if(objectexists(netnode))
{
        // connect the item to the network
$ G# ~* a: h9 |( x& _' h+ J+ q        contextdragconnection(netnode, Shopper, "A");
- W. @% _: O& U! L3 }" `( f        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
/ S- {/ i* F# ?& o2 a/ S}

////////////////////////////////////////////////////////////////////////////////////////////////////////
) G+ x9 J: W+ ]( W+ Htreenode Cart = first(Shopper);

2 E+ Q, c0 W0 r+ v1 T; {treenode Item;
3 s8 u3 [4 v6 Q, Ntreenode ts = createemptytasksequence(Shopper,0,0);
! H% S1 ?. r2 Z8 f  ~" ^

$ i. \+ ]" N; |' c; N9 [  Ksetlabelnum(Cart, "Pointer", tonum(Shopper));
6 A4 c: k+ K: I3 i" \* Qsetlabelnum(Cart, "Content", 0);
+ E7 R" b" ^3 G; ^( S' V/ F: Q( h
treenode RecycleBin = rank(ItemBin,2);
( y3 `, }% {' ?int LocationID;
# |" `8 r; U' b  [- I$ E$ s. ttreenode StopLocation;
& g! i' O8 k% {& Y
: f8 k7 q, ^# J6 ufor(int Stop = 1; Stop <= TotalItems; Stop++)
: j4 R  N5 R+ Z% J% t{
        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
9 x3 ?. Q% ]" W* E! f7 r6 I0 j        if(LocationID<=84)
. e7 r) F4 H& z* X( ^& A        {
                if(content(RecycleBin>0))
6 H$ D5 k/ J- q* s: |3 U                {
                        Item = last(RecycleBin);
% C- G! W. A( @# g3 v5 T1 A' _  F                        transfernode(Item, model());
                }
                else
                {
                        createcopy(first(ItemBin), model());
                        Item = last(model());
                }
( o& Q  h, s5 n5 I& R2 j5 V                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
: U4 j- }$ S  I; ?6 p                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
        }
7 o. _6 W4 N; L        if(LocationID>84) //Deli
6 w6 f  y0 F2 N8 T( A        {
0 X/ x2 R/ q9 ?9 C                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
* h8 w; t3 s0 {# h                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
2 M+ m  }. R4 T        else
, d2 I  }/ C% l9 @5 X& y        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
/ A  T" O) n! G& y5 d- r# z        }
}
2 w3 ?' c/ u% x6 r
) s, {, U1 U( J3 B% i% V4 t7 d5 N0 @8 Dinserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
7 ^3 p2 R; b& Z! h5 yinserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
5 N) @5 w# g7 adispatchtasksequence(ts);
万分感谢！

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