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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
) p, V, S% P& ~' h& K& {treenode current = ownerobject(c);
$ u: x0 H0 o. f+ `, vtreenode Shopper = msgsendingobject;

# I& {2 N) u" ~7 E8 E7 \& b$ htreenode ShoppingList = label(Shopper,"ShoppingList");
3 [8 c. k' O5 b# i  ~& vclearcontents(ShoppingList);
int TotalItems = duniform(1,15,1);
+ A3 m0 E) Z. b6 z* Vfor( int i = 1; i<=TotalItems; i++)
{
        int Type = duniform(1,gettablerows("FoodNames"),1);
        nodeinsertinto(ShoppingList);
$ D" N$ Z: I( _6 f+ f' T        treenode ActiveNode = last(ShoppingList);
        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
6 C( T% H$ f6 o5 t1 z) v        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
}

////////////////////////////////////////////////////////////////////////////////////////////////////////
4 c. j% o( g$ R! g9 l# J
// move the item into the model.
7 j4 p' M" z- Hmoveobject(Shopper, model(), 0);
// Now if there is a network node connected to me, then connect the flow item to that node.
3 y3 ~* R5 l8 P5 mtreenode netnode = getnetnode(current, 1);
if(objectexists(netnode))
% O6 k% t# C: ~! D% G/ }2 }1 {% [. J{
2 F# s# N& l" C7 c        // connect the item to the network
1 \; d1 E7 c2 i) k. p        contextdragconnection(netnode, Shopper, "A");
' t, N% n! h, v0 Y! [4 A        // set the location of the item.
        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}
# {1 d" |+ w5 i6 ^! P; `
////////////////////////////////////////////////////////////////////////////////////////////////////////
" r: L% }( T% v1 m$ Ztreenode Cart = first(Shopper);
! Q& ?0 U% x3 J% u$ _! w' `5 ?
treenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);


* O. n8 _7 L4 d: T, Lsetlabelnum(Cart, "Pointer", tonum(Shopper));
9 j, {5 o, ~. T! Q9 d% nsetlabelnum(Cart, "Content", 0);

. y3 V8 q- }# y) `% J1 i' gtreenode RecycleBin = rank(ItemBin,2);
" V1 m* f2 p  r3 q% M: z6 Hint LocationID;
treenode StopLocation;

for(int Stop = 1; Stop <= TotalItems; Stop++)
{
) A8 J1 [2 E1 l( \# w1 P4 M! x" w        LocationID = getnodenum(rank(ShoppingList, Stop));
3 _, q# P! e0 \/ e+ a3 l9 s        StopLocation = outobject(current,LocationID);
        if(LocationID<=84)
        {
, C1 i6 a4 X* Z0 ^                if(content(RecycleBin>0))
7 ^+ |  j: a2 t% k) p" Z/ \                {
1 t* c& K% r" Q                        Item = last(RecycleBin);
3 a. Z5 K) x% I/ u                        transfernode(Item, model());
                }
                else
" A9 t7 H. Y) c. K: |                {
+ {) l0 x" K0 P- o                        createcopy(first(ItemBin), model());
7 |5 t$ b7 J/ O& z& d1 P                        Item = last(model());
! m" K2 g% n) }; M$ ?" Z                }
                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
        }
        if(LocationID>84) //Deli
! Y. c0 `# F6 C3 z9 F        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
6 `( W* B9 j  v1 z6 Y) [+ }                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
        }
# Z9 e% [0 T3 O0 I+ _0 x        else
/ u3 `5 Q1 c4 `1 A) I5 E: `        {
* \- m' G7 d. U# p7 l                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
# V/ s' X+ `' B5 g, G                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
        }
0 X5 I  y9 N) P3 @) K5 P$ X. N}

) \, r; ?( C! R2 G0 v, Binserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
inserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
dispatchtasksequence(ts);
! r8 O- y6 y- ~9 @万分感谢！

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