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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
treenode current = ownerobject(c);
3 f1 b' h3 y2 u  h" wtreenode 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);
* ^) Z# F* ~! o% P0 q        nodeinsertinto(ShoppingList);
        treenode ActiveNode = last(ShoppingList);
) f1 @8 a8 C& q# L        nodeadddata(ActiveNode,DATATYPE_NUMBER);
0 w  p9 W" w* Q# P: @) T: m        setnodenum(ActiveNode,Type);
* X6 z" M7 m, ^7 A        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
}

; [/ ~- p2 q/ e1 X2 G////////////////////////////////////////////////////////////////////////////////////////////////////////

3 P, {# Y* }, T2 @6 P3 ]+ F5 [! a// move the item into the model.
moveobject(Shopper, model(), 0);
  Q, ~1 }4 Z) [2 j0 F4 I- a! `// Now if there is a network node connected to me, then connect the flow item to that node.
treenode netnode = getnetnode(current, 1);
if(objectexists(netnode))
4 o* f6 C5 A+ E' V) I) v; ]{
        // connect the item to the network
        contextdragconnection(netnode, Shopper, "A");
        // set the location of the item.
1 T- ?8 ]' Y6 [+ `1 W: y. X4 V0 d        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}
3 F/ j. `5 U4 r* u4 m6 g& C
////////////////////////////////////////////////////////////////////////////////////////////////////////
4 I3 H# r8 B2 o# v2 x. atreenode Cart = first(Shopper);

% i2 F6 A4 K* g" Atreenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);
0 U+ U: M8 y  ?* b) }! o/ D2 \8 w

& N. X/ H0 R& f5 h1 m% j. Rsetlabelnum(Cart, "Pointer", tonum(Shopper));
6 g4 k5 T! b0 @' C8 Qsetlabelnum(Cart, "Content", 0);
8 g2 g0 ?0 L/ _  i; o6 b
; F( V5 Q% i! Wtreenode RecycleBin = rank(ItemBin,2);
int LocationID;
& h1 }0 a3 e7 l% W- C! o7 U, r5 Gtreenode StopLocation;

for(int Stop = 1; Stop <= TotalItems; Stop++)
{
* t4 X7 c$ l% T3 e0 r        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
) n* i, c: y: O0 \! y        if(LocationID<=84)
8 q0 C8 F; A8 p' z        {
0 O. H% i! Z* _- l                if(content(RecycleBin>0))
: `4 H- [5 O( d  @                {
                        Item = last(RecycleBin);
                        transfernode(Item, model());
                }
                else
                {
                        createcopy(first(ItemBin), model());
+ i/ ?0 A9 V) W% K: ^                        Item = last(model());
                }
; h% R& N, G8 H* d, s  t                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
, U# T& J% B& @8 a- s                setlabelnum(Item,"Reference",LocationID);
/ h- `! u% u) _                moveobject(Item,StopLocation,1);
        }
+ W1 a. m) V5 Z* r* C& x8 l        if(LocationID>84) //Deli
& |" E7 j; T3 B4 t        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
3 e; K0 r5 V; ^+ i4 t7 @% K6 R                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
8 }7 k* X* {9 ?9 N. c4 G- {# @- k        }
5 v+ Y3 z' C) i        else
: ^3 X! t! A! v        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
2 J' ^5 I( p$ D' z3 u0 N% x) S                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
9 T( Y8 q# `. B% @- `1 m                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
5 i. I% r! _6 d3 A- d        }
# Y) J; q3 n0 B  f}
; [/ Q: e3 ~: z
inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
9 Z! H. v' R; z( x6 a$ finserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
dispatchtasksequence(ts);
* j4 ~3 f; h# A6 }& ~; g; J万分感谢！

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