object oSelf = OBJECT_SELF; void fbpaostorerandom() { location lstore = GetLocation(GetWaypointByTag("fbpaostoreWP")); switch ( d6(1) ) { case 1: DestroyObject(GetNearestObjectByTag("fbpaostore1", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore1", lstore, FALSE, "fbpaostore1"); SetLocalString(OBJECT_SELF, "store", "fbpaostore1"); break; case 2: DestroyObject(GetNearestObjectByTag("fbpaostore2", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore2", lstore, FALSE, "fbpaostore2"); SetLocalString(OBJECT_SELF, "store", "fbpaostore2"); break; case 3: DestroyObject(GetNearestObjectByTag("fbpaostore3", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore3", lstore, FALSE, "fbpaostore3"); SetLocalString(OBJECT_SELF, "store", "fbpaostore3"); break; case 4: DestroyObject(GetNearestObjectByTag("fbpaostore4", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore4", lstore, FALSE, "fbpaostore4"); SetLocalString(OBJECT_SELF, "store", "fbpaostore4"); break; case 5: DestroyObject(GetNearestObjectByTag("fbpaostore5", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore5", lstore, FALSE, "fbpaostore5"); SetLocalString(OBJECT_SELF, "store", "fbpaostore5"); break; case 6: DestroyObject(GetNearestObjectByTag("fbpaostore6", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore6", lstore, FALSE, "fbpaostore6"); SetLocalString(OBJECT_SELF, "store", "fbpaostore6"); break; default: DestroyObject(GetNearestObjectByTag("fbpaostore1", oSelf)); CreateObject(OBJECT_TYPE_STORE, "fbpaostore1", lstore, FALSE, "fbpaostore1"); SetLocalString(OBJECT_SELF, "store", "fbpaostore1"); break; } DelayCommand(3600.0, fbpaostorerandom()); } void main () { fbpaostorerandom(); }