|
||||||
| التسجيل | التعليمـــات | المجموعات | التقويم | مشاركات اليوم | البحث |
 |
|
|
01-17-2020, 08:42 PM
|
المشاركة رقم: 1 |
|
|
المنتدى :
موسوعة إشراق
ما هي طيور النار التي أسهمت في زيادة حرائق أستراليا؟
واحدة من أسوأ الكوارث البيئية التي شهدها كوكبنا هي حرائق الغابات في أستراليا، حيث تعرض ما يقرب من نصف مليار حيوان بري للموت إثر النيران المشتعلة. ومن بين أبرز الأسباب... اقرأ المزيد ← |
|
|
|
«
الموضوع السابق
|
الموضوع التالي
»
العرض العادي
|
|
المواضيع المتشابهه
|
||||
| الموضوع | كاتب الموضوع | المنتدى | مشاركات | آخر مشاركة |
| الطبيعة تتدخل وتحيي الآمال في إطفاء حرائق أستراليا بالأمطار | اشراق العالم | موسوعة إشراق | 0 | 01-16-2020 05:31 AM |
| موجة حر تنذر بتفاقم أزمة حرائق أستراليا | اشراق العالم | موسوعة إشراق | 0 | 01-13-2020 09:19 PM |
| أستراليا تستعد لـ ?يوم صعب? من حرائق الغابات | اشراق العالم | موسوعة إشراق | 0 | 01-13-2020 08:33 PM |
| نجم «ثور» يتبرع بمليون دولار لمكافحة حرائق أستراليا (فيديو) | اشراق العالم | موسوعة إشراق | 0 | 01-07-2020 01:47 PM |
| نجم «ثور» يتبرع بمليون دولار لمكافحة حرائق أستراليا (فيديو) | اشراق العالم | موسوعة إشراق | 0 | 01-07-2020 12:43 PM |
package ?? 0));
// شرط انتهاء الصلاحية
if (!empty($ad->end_date) && $ad->end_date < $today) return false;
return in_array($currentSite, $allowedSites);
});
// تجميع الإعلانات حسب الكود
$grouped = [];
foreach ($filteredAds as $ad) {
$code = trim($ad->code ?? '');
if (!$code || !$ad->url || !$ad->text) continue;
if (!isset($grouped[$code])) $grouped[$code] = [];
$grouped[$code][] = $ad;
}
// ترتيب القوائم حسب عدد الروابط
uasort($grouped, function($a, $b) {
return count($b) - count($a);
});
// طباعة القوائم
foreach ($grouped as $code => $adsList) {
echo '
';
echo '
';
}
?>
روابط نصية ' . htmlspecialchars($code) . '
';
echo '';
foreach ($adsList as $ad) {
echo '' . htmlspecialchars($ad->text) . '';
}
echo '