root/dev/mods/example_mod/home.php @ 203

Revision 193, 3.6 KB (checked in by ralle030583, 14 years ago)

fixed include paths in some mods

Line 
1<?php
2require_once("common/includes/class.page.php");
3require_once("common/includes/class.killsummarytable.php");
4require_once("common/includes/class.box.php");
5require_once("common/includes/class.corp.php");
6require_once("common/includes/class.alliance.php");
7require_once("common/includes/class.killlist.php");
8require_once("common/includes/class.killlisttable.php");
9require_once("common/includes/class.contract.php");
10require_once("common/includes/class.graph.php");
11require_once("common/includes/class.toplist.php");
12
13$week = date("W");
14$year = date("Y");
15
16$page = new Page("omgwtfpwnd!!!1");
17
18$kslist = new KillList();
19if (CORP_ID)
20    $kslist->addInvolvedCorp(new Corporation(CORP_ID));
21if (ALLIANCE_ID)
22    $kslist->addInvolvedAlliance(new Alliance(ALLIANCE_ID));
23
24$kslist->setWeek($week);
25$kslist->setYear($year);
26
27$llist = new KillList();
28if (CORP_ID)
29    $llist->addVictimCorp(new Corporation(CORP_ID));
30if (ALLIANCE_ID)
31    $llist->addVictimAlliance(new Alliance(ALLIANCE_ID));
32
33$llist->setWeek($week);
34$llist->setYear($year);
35
36$summarytable = new KillSummaryTable($kslist, $llist);
37$summarytable->setBreak(6);
38//$html .= $summarytable->generate();
39
40if ($week == 1)
41{
42    $pyear = date("Y") - 1;
43    $pweek = 52;
44}
45else
46{
47    $pyear = date("Y");
48    $pweek = $week - 1;
49}
50
51if ($page->killboard_->hasCampaigns(true))
52{
53    $html .= "<div class=kb-campaigns-header>Active campaigns</div>";
54    $list = new ContractList();
55    $list->setActive("yes");
56    $list->setCampaigns(true);
57    $table = new ContractListTable($list);
58    $html .= $table->generate();
59}
60
61if ($page->killboard_->hasContracts(true))
62{
63    $html .= "<div class=kb-campaigns-header>Active contracts</div>";
64    $list = new ContractList();
65    $list->setActive("yes");
66    $list->setCampaigns(false);
67    $table = new ContractListTable($list);
68    $html .= $table->generate();
69}
70
71$html .= "<div class=kb-kills-header>20 most recent pwns</div>";
72
73$klist = new KillList();
74$klist->setOrdered(true);
75if (CORP_ID)
76    $klist->addInvolvedCorp(new Corporation(CORP_ID));
77if (ALLIANCE_ID)
78    $klist->addInvolvedAlliance(new Alliance(ALLIANCE_ID));
79
80// boards with low killcount could not display 20 kills with those limits
81//$klist->setStartWeek($week - 1);
82//$klist->setYear($year);
83
84if ($_GET['scl_id'])
85    $klist->addVictimShipClass(new ShipClass($_GET['scl_id']));
86else
87    $klist->setPodsNoobShips(false);
88
89$table = new KillListTable($klist);
90$table->setLimit(20);
91$html .= $table->generate();
92
93$page->setContent($html);
94$menubox = new MenuBox();
95$menubox->addCaption("Navigation");
96$menubox->addOption("Previous week", "?a=kills&w=" . $pweek . "&y=" . $pyear);
97$page->addContext($menubox->generate());
98
99$tklist = new TopKillsList();
100$tklist->setWeek($week);
101$tklist->setYear($year);
102if (CORP_ID)
103    $tklist->addInvolvedCorp(new Corporation(CORP_ID));
104if (ALLIANCE_ID)
105    $tklist->addInvolvedAlliance(new Alliance(ALLIANCE_ID));
106
107$tklist->generate();
108$tkbox = new AwardBox($tklist, "Top killers", "kills in week " . $week, "kills", "eagle");
109$page->addContext($tkbox->generate());
110
111$config = $page->killboard_->getConfig();
112if ($config->getKillPoints())
113{
114    $tklist = new TopScoreList();
115    $tklist->setWeek($week);
116    $tklist->setYear($year);
117    if (CORP_ID)
118        $tklist->addInvolvedCorp(new Corporation(CORP_ID));
119    if (ALLIANCE_ID)
120        $tklist->addInvolvedAlliance(new Alliance(ALLIANCE_ID));
121
122    $tklist->generate();
123    $tkbox = new AwardBox($tklist, "Top scorers", "points in week " . $week, "points", "redcross");
124    $page->addContext($tkbox->generate());
125}
126
127$page->generate();
128?>
Note: See TracBrowser for help on using the browser.