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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
0 g1 R! B9 A* L# T% c2 B) G  H# m/**Make the shopping list and Task Sequence*/
treenode current = ownerobject(c);
3 F- ?- C( k, |( e) t/ T6 ntreenode Shopper = msgsendingobject;

( Z. l" e8 r: X  c) Ptreenode ShoppingList = label(Shopper,"ShoppingList");
clearcontents(ShoppingList);
9 Y8 Z: f5 |- e2 Bint TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
% |6 {2 S. }7 P, N  c( ?{
        int Type = duniform(1,gettablerows("FoodNames"),1);
4 B0 h, h3 [' K3 i/ Z& O/ M& d% i        nodeinsertinto(ShoppingList);
4 a. L/ T( o, B) U        treenode ActiveNode = last(ShoppingList);
% o4 Y! n7 T0 a) W" ~; c) E        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
8 Q1 z1 r- `7 v8 m+ s6 E" x}
' O9 D- U8 t& d3 E) Q8 N" e$ a
# Q: r! i; l! U1 n1 q4 s6 j! n////////////////////////////////////////////////////////////////////////////////////////////////////////
/ e3 L$ R1 B- S) O5 V% w- F
// move the item into the model.
5 V2 w& \+ |/ a! ^+ Z& @: G8 k8 Vmoveobject(Shopper, model(), 0);
// Now if there is a network node connected to me, then connect the flow item to that node.
$ d5 _/ W! b8 i# _  b' _treenode netnode = getnetnode(current, 1);
if(objectexists(netnode))
7 n6 }% M& Z- W; \* L5 h{
7 J0 \, n9 L1 E, {* u        // connect the item to the network
+ Q! T1 z9 d; F* G        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
0 M6 j- R+ h' P" ?' y        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}
8 J# ]. {0 N0 A0 H# G6 I$ ^) `2 z7 j
2 R/ e3 {' |& p4 O$ x" V# y////////////////////////////////////////////////////////////////////////////////////////////////////////
treenode Cart = first(Shopper);
. o  h& \" r( y9 ^( L+ s: L* H
treenode Item;
9 e/ Q" f6 f7 b7 Btreenode ts = createemptytasksequence(Shopper,0,0);
' v& e# ?' u, @7 k

0 J, I, @. {0 ?) usetlabelnum(Cart, "Pointer", tonum(Shopper));
setlabelnum(Cart, "Content", 0);

& g2 [! f4 Z1 }8 h5 o, qtreenode RecycleBin = rank(ItemBin,2);
$ A0 D* V' I2 o; fint LocationID;
) G- N' A6 a' K; f( Wtreenode StopLocation;
( S5 L( c. d/ d5 ~
for(int Stop = 1; Stop <= TotalItems; Stop++)
% o. Q1 i" c' B( x# e, ~/ f. k{
        LocationID = getnodenum(rank(ShoppingList, Stop));
/ `, k* L+ S! a$ x' q5 X  `% R) Z( w        StopLocation = outobject(current,LocationID);
        if(LocationID<=84)
        {
& P6 K; {! ?; _4 g                if(content(RecycleBin>0))
                {
1 M2 c: K0 o4 O- h                        Item = last(RecycleBin);
                        transfernode(Item, model());
" e( U7 ?1 A; A                }
" Y, Q8 f& p2 m# u$ M$ o5 d                else
. }' k0 g: V9 g# ]                {
& h4 {* N5 F9 h4 ~! k* `, D2 w& j                        createcopy(first(ItemBin), model());
                        Item = last(model());
3 ?/ N8 O- W) m  W0 A  U% e                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
                setlabelnum(Item,"Reference",LocationID);
6 G! g6 l- l( M7 T# R                moveobject(Item,StopLocation,1);
        }
! ^- U& p: e7 C0 z; W        if(LocationID>84) //Deli
        {
3 l& J/ c' k3 y9 D$ J                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
; Y8 Z% O. i( m: m7 |                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
/ E# i$ `: Q7 R' Y+ \                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
        else
* F6 b- \* h7 a8 n8 E        {
2 _) d7 |7 N3 t. b0 @" @                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
$ i* u# d: I6 _+ L# \  C& y7 p                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
        }
, H. v+ I& Q- y- A/ d! a8 r}

" [" R* t3 ?" c1 @6 ^* V& b$ kinserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
/ ~5 ]( w( I0 t9 Gdispatchtasksequence(ts);
+ E" f  j* G1 _1 _" k; u5 k万分感谢！

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