////////////////////////////////////////////
// track roving merchant caravan
////////////////////////////////////////////
void main()
{
   object oMod=GetModule();
   object oRMG=GetLocalObject(oMod,"oRMGMerchant");
   int nRMGDay=GetLocalInt(oMod,"nRMGDay");
   int nDay=GetCalendarDay();
   string sMsg="The last activity I noted from the Roving Merchants occurred on day "+IntToString(nRMGDay)+".  Today is day "+IntToString(nDay)+".";
   if (oRMG!=OBJECT_INVALID)
   { // merchant exists
     sMsg=sMsg+" The caravan is currently in the area called "+GetName(GetArea(oRMG))+".";
   } // merchant exists
   else
   {  sMsg=sMsg+"I do not currently sense a roving merchant caravan anywhere in this world."; }
   SetCustomToken(81235,sMsg);
}