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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
treenode current = ownerobject(c);
treenode Shopper = msgsendingobject;
) |; ^+ }: o, O3 O& S* E) k0 T) p
- n+ W( a+ S6 J; j6 R6 jtreenode ShoppingList = label(Shopper,"ShoppingList");
- l+ G% _4 }5 E! Cclearcontents(ShoppingList);
" u0 ~1 s7 e, f1 j5 o7 jint TotalItems = duniform(1,15,1);
for( int i = 1; i<=TotalItems; i++)
8 }- C  S! ?2 P* \8 G5 g{
        int Type = duniform(1,gettablerows("FoodNames"),1);
( U, d0 X% x" e5 g5 b$ k        nodeinsertinto(ShoppingList);
4 P$ H% C$ [4 x* y- B        treenode ActiveNode = last(ShoppingList);
% ]1 o; J$ j% X6 }( b        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
) B2 {# `' W1 n; s7 N, ?/ G        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
}

8 H3 U0 l# @1 H# }# E////////////////////////////////////////////////////////////////////////////////////////////////////////
; {2 f/ @4 _/ C5 z
3 l8 w! ]$ k3 k6 I// 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.
treenode netnode = getnetnode(current, 1);
( [1 W( `- ~! _/ bif(objectexists(netnode))
{
. V( D" n0 n$ M4 W" `5 P        // connect the item to the network
+ D" ?  ~; M% G6 j: J        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
6 w) `/ [+ R2 C/ g7 R( {}

/ _# V. D% M& F# l- b* w////////////////////////////////////////////////////////////////////////////////////////////////////////
treenode Cart = first(Shopper);
: Y8 s/ ?3 m7 J0 X/ {
treenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);
: v7 V. z/ m, G4 E# B! T
5 D  Z4 ^/ d) L, g; J* F" o+ T. _
setlabelnum(Cart, "Pointer", tonum(Shopper));
setlabelnum(Cart, "Content", 0);
8 [( ~. S# ?& {9 P7 `+ j' y
treenode RecycleBin = rank(ItemBin,2);
int LocationID;
treenode StopLocation;

" z1 p/ K' x' w. G, f1 J2 y' J, tfor(int Stop = 1; Stop <= TotalItems; Stop++)
" _2 s4 }+ A4 S3 E* i{
        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
        if(LocationID<=84)
        {
0 D. L+ X4 Y9 G0 Z# u! ?                if(content(RecycleBin>0))
                {
                        Item = last(RecycleBin);
6 x9 y; w6 U7 U- B" N- R; d( M                        transfernode(Item, model());
                }
                else
* }. e* J0 Q$ Z1 F4 ^                {
                        createcopy(first(ItemBin), model());
                        Item = last(model());
                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
8 W5 k9 R- K4 x9 ]                setlabelnum(Item,"Reference",LocationID);
+ T: p. f0 ^0 h; M! y                moveobject(Item,StopLocation,1);
8 t  E9 y! T4 `1 B  [        }
        if(LocationID>84) //Deli
        {
/ ]" }1 b& t, p2 y/ C                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
4 k7 g5 ?+ _; d/ C                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
        else
        {
* g6 ~- t1 N, g                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
! z! [/ n# q8 e4 {( e                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
4 K! Q. a; ~; b/ l( ]+ m        }
}
7 c' y! W( t, x, U) j4 U/ ]
; b6 e" F( H$ @) U) _3 ~inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
6 t6 g* i8 \: E( Q) V3 W$ }dispatchtasksequence(ts);
8 J$ j9 F4 a1 O$ v# R9 P8 L万分感谢！

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