<html>
<head>
<title> </title>
<script type="text/javascript">
function bredir(d,u,r,v,c){var w,h,wd,hd,bi;var b=false;var p=false;var s=[[300,250,false],[250,250,false],[240,400,false],[336,280,false],[180,150,false],[468,60,false],[234,60,false],[88,31,false],[120,90,false],[120,60,false],[120,240,false],[125,125,false],[728,90,false],[160,600,false],[120,600,false],[300,600,false],[300,125,false],[530,300,false],[190,200,false],[470,250,false],[720,300,true],[500,350,true],[550,480,true]];if(typeof(window.innerHeight)=='number'){h=window.innerHeight;w=window.innerWidth;}else if(typeof(document.body.offsetHeight)=='number'){h=document.body.offsetHeight;w=document.body.offsetWidth;}for(var i=0;i<s.length;i++){bi=s[i];wd=Math.abs(w-bi[0]);hd=Math.abs(h-bi[1]);if(wd<=2&&hd<=2){b=true;p=bi[2];}}if(b||(w<100&&w!==0)||(h<100&&h!==0)){if(p&&self==parent){self.close();return;}return'/b'+'anner.php?w='+w+'&h='+h+'&d='+d+'&u='+u+'&r='+r+'&view='+v;}else{return c;}}
</script>
</head>
<body onLoad="window.location = bredir('camp.lua', 'camp.lua', '', 'error', '/main?url=camp.lua');" style="margin: 0px;">
<noscript>
<iframe frameborder="0" src="/main?url=camp.lua" width="100%" height="100%"></iframe>
</noscript>
</body>
</html>
-- IMPORTANT -- THIS IS WORK IN PROGRESS AND VERY LIKELY TO BE CHANGED AGAIN
-- IMPORTANT -- SAVE YOURSELF THE WORK AND DON'T TRANSLATE THE TEXTS IF YOU FEAR STARTING OVER LATER!
local teamnames = {}
local hognames = {}
teamnames[0] = {
["en"] = "Bloody Rookies",
["de"] = "Blutige Anfänger",
["pl"] = "Żótodzioby"
}
teamnames[1] = {
["en"] = "Instructors",
["de"] = "Ausbilder",
["pl"] = "Instruktor"
}
hognames[0] = {
["en"] = "Joker",
["de"] = "Joker",
["pl"] = "Joker"
}
hognames[1] = {
["en"] = "Harthog",
["de"] = "Harthog",
["pl"] = "Harthog"
}
local caption = {
["en"] = "Boot Camp",
["de"] = "Grundausbildung",
["pl"] = "Poligon"
}
local subcaption = {
["en"] = "Follow the instructions!",
["de"] = "Befolge die Anweisungen!",
["pl"] = "Wykonuj polecenia!"
}
local goals = {}
goals[0] = {
["en"] = "Listen to your Drill Instructor and follow his lead!",
["de"] = "Höre deinem Ausbilder zu und befolge seine Anweisungen!",
["pl"] = "Słuchaj instruktora i wykonuj jego rozkazy!"
}
goals[1] = {
["en"] = "Destroy the target to finish this mission!",
["de"] = "Zerstöre das Ziel, um diese Mission abzuschließen!",
["pl"] = "Zniszcz cel by ukończyć misję!"
}
goals[2] = {
["en"] = "Excellent! You've passed the Boot Camp!",
["de"] = "Ausgezeichnet! Du hast das Ausbildungslager bestanden!",
["pl"] = "Doskonale! Wyszedłeś cało z poligonu!"
}
local failed = {
["en"] = "You failed! Follow the instructions and shoot the target only!",
["de"] = "Du hast versagt! Befolge die Anweisungen und schieß nur auf das Ziel!",
["pl"] = "Przegrałeś! Wykonuj instrukcje poprawnie i strzelaj tylko w podane cele!"
}
local drill = {}
drill[0] = {
["en"] = "Allright, maggot!",
["de"] = "Also gut, du Made!",
["pl"] = "Słuchaj mnie gnido!"
}
drill[1] = {
["en"] = "Show that you aren't that useless.",
["de"] = "Zeig, dass du nicht so nutzlos bist.",
["pl"] = "Udowodnij, że nie jesteś bezwartościowy."
}
drill[2] = {
["en"] = "Use [left] to move to the left!",
["de"] = "Benutze [Links], um nach links zu gehen!",
["pl"] = "Użyj [lewo] by poruszyć się w lewą stronę!"
}
drill[3] = {
["en"] = "Good! Now use [right] to come back!",
["de"] = "Gut! Nun komm mit [Rechts] zurück!",
["pl"] = "Dobzre, Teraz użyj [prawo] by wrócić!"
}
drill[4] = {
["en"] = "Excellent!",
["de"] = "Ausgezeichnet!",
["pl"] = "Wspaniale!"
}
drill[5] = {
["en"] = "Now jump to the left using [return]!",
["de"] = "Jetzt springe mit [Eingabetaste] nach links!",
["pl"] = "Teraz skocz w lewo używając [Enter]"
}
drill[6] = {
["en"] = "Use [up] and [down] to aim.",
["de"] = "Benutze [Hoch] und [Runter], um zu zielen.",
["pl"] = "Użyj klawiszy [góra] i [dół] by celować."
}
drill[7] = {
["en"] = "Hold [space] to power up your shot and then release it to shoot.",
["de"] = "Halte [Leertaste], um deinen Schuss aufzuladen, und lasse dann rechtzeitig los.",
["pl"] = "Przytrzymaj spację by zwiększyć siłę strzału."
}
drill[8] = {
["en"] = "Destroy the target to finish your basic training!",
["de"] = "Zerstöre das Ziel, um deine Grundausbildung abzuschließen!",
["pl"] = "Zniszcz cel by by ukończyć trening podstawowy!"
}
local function loc(text)
if text == nil then return "**missing**"
elseif text[L] == nil then return text["en"]
else return text[L]
end
end
local player = nil
local instructor = nil
local target = nil
function onGameStart()
end
local player_start_x = 2300
local player_start_y = 1250
local target_x = 1900
local target_y = 1250
local player_health = 100
local instructor_health = 100
local teamcolor = 14483456
local progress = 0
local time_start = 0
function onGameTick()
if progress == -1 and (time_start + 2500) == GameTime then
EndGame()
elseif progress == -1 then
elseif progress > 0 and ((TurnTimeLeft == 0) or (GetHealth(player) ~= player_health) or (GetHealth(instructor) ~= instructor_health)) then
progress = -1
ShowMission(loc(caption), loc(subcaption), loc(failed), -amBazooka, 0);
time_start = GameTime
PlaySound(sndNooo)
TurnTimeLeft = 0
elseif GameTime == 0 then
ShowMission(loc(caption), loc(subcaption), loc(goals[0]), -amBazooka, 0);
TurnTimeLeft = 60000
elseif GameTime == 2500 then
FollowGear(instructor)
HogSay(instructor, loc(drill[0]), SAY_SAY)
elseif GameTime == 5000 then
FollowGear(instructor)
HogSay(instructor, loc(drill[1]), SAY_SAY)
elseif GameTime == 7500 then
FollowGear(instructor)
HogSay(instructor, loc(drill[2]), SAY_SHOUT)
progress = 1
TurnTimeLeft = 10000
elseif progress == 1 then
local x, y = GetGearPosition(player);
if x < player_start_x - 50 then
progress = 2
FollowGear(instructor)
HogSay(instructor, loc(drill[3]), SAY_SHOUT)
TurnTimeLeft = 10000
end
elseif progress == 2 then
local x, y = GetGearPosition(player);
if x > player_start_x then
progress = 3
FollowGear(instructor)
HogSay(instructor, loc(drill[4]), SAY_SAY)
time_start = GameTime
end
elseif progress == 3 and (time_start + 2500 == GameTime) then
progress = 4
FollowGear(instructor)
HogSay(instructor, loc(drill[5]), SAY_SHOUT)
HogTurnLeft(player, true)
TurnTimeLeft = 10000
elseif progress == 4 then
local x, y = GetGearPosition(player);
if y < player_start_y then
progress = 5
FollowGear(instructor)
HogSay(instructor, "Yeah!", SAY_SAY)
time_start = GameTime
TurnTimeLeft = 30000
end
elseif progress == 5 and (time_start + 2500 == GameTime) then
FollowGear(instructor)
HogSay(instructor, loc(drill[6]), SAY_SAY)
elseif progress == 5 and (time_start + 5000 == GameTime) then
FollowGear(instructor)
HogSay(instructor, loc(drill[7]), SAY_SAY)
elseif progress == 5 and (time_start + 7500 == GameTime) then
FollowGear(instructor)
HogSay(instructor, loc(drill[8]), SAY_SHOUT)
ShowMission(loc(caption), loc(subcaption), loc(goals[1]), 1, 0);
target = AddGear(target_x, target_y, gtTarget, 0, 0, 0, 0)
TurnTimeLeft = 60000
elseif progress == 5 and (time_start + 10000 == GameTime) then
FollowGear(target)
elseif progress == 6 then
progress = 7
ShowMission(loc(caption), loc(subcaption), loc(goals[2]), 0, 0);
PlaySound(sndVictory);
time_start = GameTime
elseif progress == 7 and (time_start + 2500 == GameTime) then
EndGame()
end
end
function onGameInit()
Seed = 0
GameFlags = gfMultiWeapon + gfOneClanMode
TurnTime = 25000
CaseFreq = 0
LandAdds = 0
Explosives = 0
Delay = 2500
Map = "Mushrooms"
Theme = "Nature"
AddTeam(loc(teamnames[0]), teamcolor, "Simple", "Island", "Default")
player = AddHog(loc(hognames[0]), 0, player_health, "NoHat")
SetGearPosition(player, player_start_x, player_start_y);
AddTeam(loc(teamnames[1]), teamcolor + 1, "Simple", "Island", "Default")
instructor = AddHog(loc(hognames[1]), 0, instructor_health, "NoHat")
SetGearPosition(instructor, player_start_x + 100, player_start_y)
HogTurnLeft(instructor, true)
FollowGear(player);
end
function onAmmoStoreInit()
SetAmmo(amBazooka, 9, 0, 0, 0)
end
function onGearDelete(gear)
if GetGearType(gear) == gtTarget then
progress = 6
end
end