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

这是那个超市模型的代码，由于本人代码知识欠缺，对这些代码不了解，想请位人士帮忙标注下，不胜感激！代码如下：
/**Make the shopping list and Task Sequence*/
. g. N* X$ \3 ztreenode current = ownerobject(c);
/ f' `  x" D9 o* N4 P# |! T! otreenode Shopper = msgsendingobject;
6 F. L& P4 T6 p- [3 o% v4 [
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);
        nodeinsertinto(ShoppingList);
        treenode ActiveNode = last(ShoppingList);
0 n9 `( R: H1 s        nodeadddata(ActiveNode,DATATYPE_NUMBER);
        setnodenum(ActiveNode,Type);
        setnodename(ActiveNode,gettablestr("FoodNames",Type,1));
}
& [" b1 x' E- r$ D0 _' Y( R. L: P
# Y6 A: g- T5 P. }////////////////////////////////////////////////////////////////////////////////////////////////////////

// move the item into the model.
moveobject(Shopper, model(), 0);
/ y  c* `, s7 X// Now if there is a network node connected to me, then connect the flow item to that node.
treenode netnode = getnetnode(current, 1);
3 R/ q2 j% O9 Q( J) g+ H3 uif(objectexists(netnode))
$ @7 q9 A" S+ m, V" N5 c' x  t{
        // connect the item to the network
# g; o8 R" n( [        contextdragconnection(netnode, Shopper, "A");
) T  b- g' i% T; ?4 j& R. D7 G        // set the location of the item.
, Z2 i. a: D0 P. M1 \8 V        setloc(Shopper, xloc(netnode), yloc(netnode), 0);
}

/ q7 k1 a1 u  E1 K0 z1 S# U2 H9 f////////////////////////////////////////////////////////////////////////////////////////////////////////
treenode Cart = first(Shopper);

3 ^0 Z; J& n$ g7 I# k+ m- R# mtreenode Item;
treenode ts = createemptytasksequence(Shopper,0,0);


/ D1 B# ^, z7 ?setlabelnum(Cart, "Pointer", tonum(Shopper));
% ~) M' a7 M, f) U- ~6 Rsetlabelnum(Cart, "Content", 0);
4 e; r8 S  D7 |) a0 V! G1 v
treenode RecycleBin = rank(ItemBin,2);
, d# ~$ ]$ R9 [* I% rint LocationID;
treenode StopLocation;

for(int Stop = 1; Stop <= TotalItems; Stop++)
{
  t$ }% k$ @* j% o- i        LocationID = getnodenum(rank(ShoppingList, Stop));
        StopLocation = outobject(current,LocationID);
1 H7 G3 F4 g# O: V7 u& M, c6 x        if(LocationID<=84)
        {
! y' B- t9 ~5 R7 {6 c+ Q                if(content(RecycleBin>0))
                {
                        Item = last(RecycleBin);
! @* ~0 u1 X+ N/ D5 |1 i" u5 R7 b                        transfernode(Item, model());
3 D: i) s7 O0 g* c8 p; C" Q                }
                else
                {
                        createcopy(first(ItemBin), model());
                        Item = last(model());
: x. @7 h' K; W3 X- I/ l                }
" _! A7 P" [. J6 c* R% g" n                setobjectshapeindex(Item,gettablenum("FoodNames",LocationID,2));
! r& Q- r) |: }5 g, L' X. Y' B                setlabelnum(Item,"Reference",LocationID);
                moveobject(Item,StopLocation,1);
1 o% n2 X( U: v: {        }
        if(LocationID>84) //Deli
        {
                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
                inserttask(ts,TASKTYPE_SENDMESSAGE,StopLocation,NULL,1,(LocationID - 84),0,0);
                inserttask(ts,TASKTYPE_UTILIZE,StopLocation,NULL,0);
) [: C  n; Q. `6 G) I" F1 u        }
        else
* `+ U. {2 e' n" i1 w; H" `        {
3 q2 W5 B& [  h- |. L7 I                inserttask(ts,TASKTYPE_TRAVEL,StopLocation,NULL);
+ r2 P) T6 K6 d9 D7 l                inserttask(ts,TASKTYPE_MOVEOBJECT,Item,Cart,0);
                inserttask(ts,TASKTYPE_DELAY,NULL,NULL,2,0);
        }
' S# N+ I; q4 n9 U* x. y. K}

inserttask(ts,TASKTYPE_DELAY,NULL,NULL,1,0);
' K6 X9 V. e9 I2 Y4 l& `- Uinserttask(ts,TASKTYPE_SENDMESSAGE,NULL,current,0,0,0,.1);
) m& \4 P1 |  ~5 Edispatchtasksequence(ts);
" a* S/ k$ _) X9 m万分感谢！

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