void main()
{
    SendMessageToPC(OBJECT_SELF, "PC ==> Area");
    string sAlignment = "";
    object oPCx = GetFirstPC();
    object oArea;
    int i = 0;
    while (OBJECT_INVALID != oPCx){
        i++;
        oArea = GetArea(oPCx);
        SetLocalInt(oPCx, "iNum", i);
        SendMessageToPC(OBJECT_SELF,IntToString(i) +  ")" + GetName(oPCx) + " ==> " + GetName(oArea));
        oPCx = GetNextPC();
    }
}