`#include "ckdefs.h"`
`#include "chare.h"`
`#include "c++interface.h"```

`#include "main.top.h"`
`#include "main.h"```

`#include "test.top.h"```

`main::main(int argc, char **argv)`
`{`
`int i, j;`
`// create Test chare`
`TestMsg *msg = new (MsgIndex(TestMsg)) TestMsg;`
`ChareIDType testChare;`
`new_chare2(Test, msg, &testChare, 0);`
`// send message to teststart`
`msg = new (MsgIndex(TestMsg)) TestMsg;`
`CSendMsg(Test, teststart, msg, &testChare);`
`for(i=1;i<=100;i++) {`
`for(j=10;j>=1;j--) {```

`Msg *msg = new (MsgIndex(Msg)) Msg;`
`SetRefNumber(msg, i);`
`msg->data = i;`
`CSendMsg(Test, entry1, msg, &testChare);```

`msg = new (MsgIndex(Msg)) Msg;`
`SetRefNumber(msg, j);`
`msg->data = j;`
`CSendMsg(Test, entry2, msg, &testChare);`
`}`
`}`
`}```

`#include "main.bot.h"`