share/hedgewars/Data/Scripts/Multiplayer/Space_Invasion.lua
changeset 5325 261b79ba22b1
parent 5245 ce407084728f
child 5332 b29d60c7cac7
equal deleted inserted replaced
5322:1bcc12a30d5d 5325:261b79ba22b1
   112 -----------------
   112 -----------------
   113 
   113 
   114 -----------------
   114 -----------------
   115 capgrpAmmostate
   115 capgrpAmmostate
   116 -----------------
   116 -----------------
   117 AddCaption( chainLength .. loc("-chain! +") .. chainLength*2 .. loc(" points!"),0xffba00ff,capgrpAmmostate)
   117 AddCaption( chainLength .. LOC_NOT("-chain! +") .. chainLength*2 .. LOC_NOT(" points!"),0xffba00ff,capgrpAmmostate)
   118 AddCaption(loc("Multi-shot! +5 points!"),0xffba00ff,capgrpAmmostate) 
   118 AddCaption(LOC_NOT("Multi-shot! +5 points!"),0xffba00ff,capgrpAmmostate) 
   119 
   119 
   120 -----------------
   120 -----------------
   121 capgrpAmmoinfo
   121 capgrpAmmoinfo
   122 -----------------
   122 -----------------
   123 AddCaption(loc("Shield Miser! +20 points!"),0xffba00ff,capgrpAmmoinfo)
   123 AddCaption(LOC_NOT("Shield Miser! +20 points!"),0xffba00ff,capgrpAmmoinfo)
   124 AddCaption(loc("Shield Master! +10 points!"),0xffba00ff,capgrpAmmoinfo)
   124 AddCaption(LOC_NOT("Shield Master! +10 points!"),0xffba00ff,capgrpAmmoinfo)
   125 
   125 
   126 -----------------
   126 -----------------
   127 capgrpVolume
   127 capgrpVolume
   128 -----------------
   128 -----------------
   129 AddCaption(loc("Boom! +25 points!"),0xffba00ff,capgrpVolume)
   129 AddCaption(LOC_NOT("Boom! +25 points!"),0xffba00ff,capgrpVolume)
   130 AddCaption(loc("BOOM! +50 points!"),0xffba00ff,capgrpVolume)
   130 AddCaption(LOC_NOT("BOOM! +50 points!"),0xffba00ff,capgrpVolume)
   131 AddCaption(loc("BOOM! BOOM! BOOM! +100 points!"),0xffba00ff,capgrpVolume)
   131 AddCaption(LOC_NOT("BOOM! BOOM! BOOM! +100 points!"),0xffba00ff,capgrpVolume)
   132 AddCaption(loc("Accuracy Bonus! +15 points!"),0xffba00ff,capgrpVolume)
   132 AddCaption(LOC_NOT("Accuracy Bonus! +15 points!"),0xffba00ff,capgrpVolume)
   133 
   133 
   134 -----------------
   134 -----------------
   135 capgrpMessage 
   135 capgrpMessage 
   136 -----------------
   136 -----------------
   137 AddCaption(loc("Ammo Depleted!"),0xff0000ff,capgrpMessage)
   137 AddCaption(LOC_NOT("Ammo Depleted!"),0xff0000ff,capgrpMessage)
   138 AddCaption(loc("Ammo: ") .. primShotsLeft)
   138 AddCaption(LOC_NOT("Ammo: ") .. primShotsLeft)
   139 AddCaption("Shield Depleted",0xff0000ff,capgrpMessage)
   139 AddCaption("Shield Depleted",0xff0000ff,capgrpMessage)
   140 AddCaption( loc("Shield ON:") .. " " .. shieldHealth - 80 .. " " .. loc("Power Remaining") )
   140 AddCaption( LOC_NOT("Shield ON:") .. " " .. shieldHealth - 80 .. " " .. LOC_NOT("Power Remaining") )
   141 AddCaption(loc("Shield OFF:") .. " " .. shieldHealth - 80 .. " " .. loc("Power Remaining") )
   141 AddCaption(LOC_NOT("Shield OFF:") .. " " .. shieldHealth - 80 .. " " .. LOC_NOT("Power Remaining") )
   142 
   142 
   143 AddCaption(loc("Time Extended!") .. "+" .. 4 .. loc("s"), 0xff0000ff,capgrpMessage )
   143 AddCaption(LOC_NOT("Time Extended!") .. "+" .. 4 .. LOC_NOT("s"), 0xff0000ff,capgrpMessage )
   144 AddCaption("+" .. 3 .. " " .. loc("Ammo"), 0x00ff00ff,capgrpMessage)
   144 AddCaption("+" .. 3 .. " " .. LOC_NOT("Ammo"), 0x00ff00ff,capgrpMessage)
   145 AddCaption(loc("Shield boosted! +30 power"), 0xff00ffff,capgrpMessage)
   145 AddCaption(LOC_NOT("Shield boosted! +30 power"), 0xff00ffff,capgrpMessage)
   146 AddCaption(loc("Shield is fully recharged!"), 0xffae00ff,capgrpMessage)
   146 AddCaption(LOC_NOT("Shield is fully recharged!"), 0xffae00ff,capgrpMessage)
   147 AddCaption(loc("Boss defeated! +50 points!"), 0x0050ffff,capgrpMessage)
   147 AddCaption(LOC_NOT("Boss defeated! +50 points!"), 0x0050ffff,capgrpMessage)
   148 
   148 
   149 AddCaption(loc("GOTCHA!"))
   149 AddCaption(LOC_NOT("GOTCHA!"))
   150 AddCaption(loc("Kamikaze Expert! +15 points!"),0xffba00ff,capgrpMessage)
   150 AddCaption(LOC_NOT("Kamikaze Expert! +15 points!"),0xffba00ff,capgrpMessage)
   151 AddCaption(loc("Depleted Kamikaze! +5 points!"),0xffba00ff,capgrpMessage)
   151 AddCaption(LOC_NOT("Depleted Kamikaze! +5 points!"),0xffba00ff,capgrpMessage)
   152 AddCaption(loc("Timed Kamikaze! +10 points!"),0xffba00ff,capgrpMessage)
   152 AddCaption(LOC_NOT("Timed Kamikaze! +10 points!"),0xffba00ff,capgrpMessage)
   153 
   153 
   154 -----------------
   154 -----------------
   155 capgrpMessage2 
   155 capgrpMessage2 
   156 -----------------
   156 -----------------
   157 AddCaption(loc("Drone Hunter! +10 points!"),0xffba00ff,capgrpMessage2)
   157 AddCaption(LOC_NOT("Drone Hunter! +10 points!"),0xffba00ff,capgrpMessage2)
   158 AddCaption(loc("Ammo Maniac! +5 points!"),0xffba00ff,capgrpMessage2)
   158 AddCaption(LOC_NOT("Ammo Maniac! +5 points!"),0xffba00ff,capgrpMessage2)
   159 AddCaption(loc("Shield Seeker! +10 points!"),0xffba00ff,capgrpMessage2)
   159 AddCaption(LOC_NOT("Shield Seeker! +10 points!"),0xffba00ff,capgrpMessage2)
   160 AddCaption(loc("Boss Slayer! +25 points!"),0xffba00ff,capgrpMessage2)
   160 AddCaption(LOC_NOT("Boss Slayer! +25 points!"),0xffba00ff,capgrpMessage2)
   161 ]]
   161 ]]
   162 
   162 
   163 ----------------------------------
   163 ----------------------------------
   164 -- so I herd u liek wariables
   164 -- so I herd u liek wariables
   165 ----------------------------------
   165 ----------------------------------
   364 	for i = 0,(TeamsCount-1) do
   364 	for i = 0,(TeamsCount-1) do
   365 		if teamClan[i] == GetHogClan(CurrentHedgehog) then
   365 		if teamClan[i] == GetHogClan(CurrentHedgehog) then
   366 			teamCircsKilled[i] = teamCircsKilled[i] + 1
   366 			teamCircsKilled[i] = teamCircsKilled[i] + 1
   367 
   367 
   368 			if teamCircsKilled[i] == 10 then
   368 			if teamCircsKilled[i] == 10 then
   369 				AddCaption(loc("Boom! +25 points!"),0xffba00ff,capgrpVolume)
   369 				AddCaption(loc("Boom!") .. " +25 " .. loc("points").."!",0xffba00ff,capgrpVolume)
   370 				AwardPoints(25)
   370 				AwardPoints(25)
   371 			elseif teamCircsKilled[i] == 25 then
   371 			elseif teamCircsKilled[i] == 25 then
   372 				AddCaption(loc("BOOM! +50 points!"),0xffba00ff,capgrpVolume)
   372 				AddCaption(loc("BOOM!") .. " +50 " .. loc("points") .. "!",0xffba00ff,capgrpVolume)
   373 				AwardPoints(50)
   373 				AwardPoints(50)
   374 			elseif teamCircsKilled[i] == 50 then
   374 			elseif teamCircsKilled[i] == 50 then
   375 				AddCaption(loc("BOOM! BOOM! BOOM! +100 points!"),0xffba00ff,capgrpVolume)
   375 				AddCaption(loc("BOOM!") .. loc("BOOM!") .. loc("BOOM!") .. " +100 " .. loc("points") .. "!",0xffba00ff,capgrpVolume)
   376 				AwardPoints(100)
   376 				AwardPoints(100)
   377 			end
   377 			end
   378 
   378 
   379 			--[[
   379 			--[[
   380 			if t == "R" then
   380 			if t == "R" then
   429 	--bubbleSort(sdScore)
   429 	--bubbleSort(sdScore)
   430 
   430 
   431 	for i = 0,(TeamsCount-1) do
   431 	for i = 0,(TeamsCount-1) do
   432 		if sdName[i] ~= " " then
   432 		if sdName[i] ~= " " then
   433 			teamComment[i] = sdName[i] .. " |" ..
   433 			teamComment[i] = sdName[i] .. " |" ..
   434 			loc("SCORE: ") .. sdScore[i] .. loc (" points|") ..
   434 			loc("SCORE") .. ": " .. sdScore[i] .. " " .. loc("points") .. "|" ..
   435 			loc("KILLS: ") .. sdKills[i] .. loc (" invaders destroyed|") ..
   435 			loc("KILLS") .. ": " .. sdKills[i] .. " " .. loc("invaders destroyed") .. "|" ..
   436 			" " .. "|"
   436 			" " .. "|"
   437 		elseif sdName[i] == " " then
   437 		elseif sdName[i] == " " then
   438 			teamComment[i] = "|"
   438 			teamComment[i] = "|"
   439 		end
   439 		end
   440 	end
   440 	end
   442 	entireC = ""
   442 	entireC = ""
   443 	for i = (TeamsCount-1),0,-1 do
   443 	for i = (TeamsCount-1),0,-1 do
   444 		entireC = entireC .. teamComment[i]
   444 		entireC = entireC .. teamComment[i]
   445 	end
   445 	end
   446 
   446 
   447 	ShowMission(loc("SPACE INVASION"), loc("STATUS UPDATE"), loc("Rounds Complete: ") .. roundNumber .. "/" .. roundLimit .. "|" .. " " .. "|" .. loc("Team Scores: ") .. "|" ..entireC, 4, 1)
   447 	ShowMission("SPACE INVASION", loc("STATUS UPDATE"), loc("Rounds Complete") .. ": " .. roundNumber .. "/" .. roundLimit .. "| " .. "|" .. loc("Team Scores") .. ": |" ..entireC, 4, 1)
   448 
   448 
   449 end
   449 end
   450 
   450 
   451 -- gaudy racer
   451 -- gaudy racer
   452 function CheckForNewRound()
   452 function CheckForNewRound()
   593 
   593 
   594 		if primShotsLeft == 0 then
   594 		if primShotsLeft == 0 then
   595 			PlaySound(sndSuddenDeath)
   595 			PlaySound(sndSuddenDeath)
   596 			AddCaption(loc("Ammo Depleted!"),0xff0000ff,capgrpMessage)
   596 			AddCaption(loc("Ammo Depleted!"),0xff0000ff,capgrpMessage)
   597 		else
   597 		else
   598 			AddCaption(loc("Ammo: ") .. primShotsLeft)
   598 			AddCaption(loc("Ammo") .. ": " .. primShotsLeft)
   599 		end
   599 		end
   600 
   600 
   601 		CopyPV(CurrentHedgehog, morte) -- new addition
   601 		CopyPV(CurrentHedgehog, morte) -- new addition
   602 		x,y = GetGearVelocity(morte)
   602 		x,y = GetGearVelocity(morte)
   603 		--WriteLnToConsole("I'm going to shoot a barrel so I just got the velocity of currenthedgehog. It is dx: " .. x .. "; dy: " .. y)
   603 		--WriteLnToConsole("I'm going to shoot a barrel so I just got the velocity of currenthedgehog. It is dx: " .. x .. "; dy: " .. y)
   698 	else
   698 	else
   699 		roundLimit = (MinesTime / 1000)
   699 		roundLimit = (MinesTime / 1000)
   700 	end
   700 	end
   701 
   701 
   702 	ShowMission	(
   702 	ShowMission	(
   703 				loc("SPACE INVASION"),
   703 				"SPACE INVASION",
   704 				loc("a Hedgewars mini-game"),
   704 				loc("a Hedgewars mini-game"),
   705 
   705 
   706 				loc("Destroy invaders to score points.") .. "|" ..
   706 				loc("Destroy invaders to score points.") .. "|" ..
   707 				" " .. "|" ..
   707 				" " .. "|" ..
   708 
   708 
   709 				loc("Round Limit:") .. " " .. roundLimit .. "|" ..
   709 				loc("Round Limit") .. ": " .. roundLimit .. "|" ..
   710 				loc("Turn Time:") .. " " .. (TurnTime/1000) .. loc("s") .. "|" ..
   710 				loc("Turn Time") .. ": " .. (TurnTime/1000) .. loc("s") .. "|" ..
   711 				" " .. "|" ..
   711 				" " .. "|" ..
   712 
   712 
   713 				loc("Movement: [Up], [Down], [Left], [Right]") .. "|" ..
   713 				loc("Movement: [Up], [Down], [Left], [Right]") .. "|" ..
   714 				loc("Fire:") .. " " .. loc("[Left Shift]") .. "|" ..
   714 				loc("Fire") .. ": " .. loc("[Left Shift]") .. "|" ..
   715 				loc("Toggle Shield:") .. " " .. loc("[Enter]") .. "|" ..
   715 				loc("Toggle Shield") .. ": " .. loc("[Enter]") .. "|" ..
   716 
   716 
   717 				--" " .. "|" ..
   717 				--" " .. "|" ..
   718 				--loc("Invaders List: ") .. "|" ..
   718 				--LOC_NOT("Invaders List: ") .. "|" ..
   719 				--loc("Blue Jabberwock: (50 points)") .. "|" ..
   719 				--LOC_NOT("Blue Jabberwock: (50 points)") .. "|" ..
   720 				--loc("Red Warbler: (10 points)") .. "|" ..
   720 				--LOC_NOT("Red Warbler: (10 points)") .. "|" ..
   721 				--loc("Orange Gob: (5 points)") .. "|" ..
   721 				--LOC_NOT("Orange Gob: (5 points)") .. "|" ..
   722 				--loc("Green Wrangler: (3 points)") .. "|" ..
   722 				--LOC_NOT("Green Wrangler: (3 points)") .. "|" ..
   723 
   723 
   724 
   724 
   725 				"", 4, 4000
   725 				"", 4, 4000
   726 				)
   726 				)
   727 
   727 
   843 
   843 
   844 
   844 
   845 	-- start the player tumbling with a boom once their turn has actually begun
   845 	-- start the player tumbling with a boom once their turn has actually begun
   846 	if (tumbleStarted == false) and (gameOver == false) then
   846 	if (tumbleStarted == false) and (gameOver == false) then
   847 		if (TurnTimeLeft > 0) and (TurnTimeLeft ~= TurnTime) then
   847 		if (TurnTimeLeft > 0) and (TurnTimeLeft ~= TurnTime) then
   848 			--AddCaption(loc("Good to go!"))
   848 			--AddCaption(LOC_NOT("Good to go!"))
   849 			tumbleStarted = true
   849 			tumbleStarted = true
   850 			TimeLeft = (TurnTime/1000)	--45
   850 			TimeLeft = (TurnTime/1000)	--45
   851 			FadeAlpha = 0
   851 			FadeAlpha = 0
   852 			AddGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog), gtGrenade, 0, 0, 0, 1)
   852 			AddGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog), gtGrenade, 0, 0, 0, 1)
   853 			SetMyCircles(true)
   853 			SetMyCircles(true)
   865 		if TimeLeftCounter == 1000 then
   865 		if TimeLeftCounter == 1000 then
   866 			TimeLeftCounter = 0
   866 			TimeLeftCounter = 0
   867 			TimeLeft = TimeLeft - 1
   867 			TimeLeft = TimeLeft - 1
   868 
   868 
   869 			if TimeLeft >= 0 then
   869 			if TimeLeft >= 0 then
   870 				--AddCaption(loc("Time Left: ") .. TimeLeft)
   870 				--AddCaption(LOC_NOT("Time Left: ") .. TimeLeft)
   871 			end
   871 			end
   872 
   872 
   873 		end
   873 		end
   874 
   874 
   875 		--WriteLnToConsole("Finished timeleft calculations")
   875 		--WriteLnToConsole("Finished timeleft calculations")
   894 				rightOn = false
   894 				rightOn = false
   895 				SetMyCircles(false)
   895 				SetMyCircles(false)
   896 				--nw WriteLnToConsole("Player is out of luck")
   896 				--nw WriteLnToConsole("Player is out of luck")
   897 
   897 
   898 				if shieldMiser == true then
   898 				if shieldMiser == true then
   899 					AddCaption(loc("Shield Miser! +20 points!"),0xffba00ff,capgrpAmmoinfo)
   899 					AddCaption(loc("Shield Miser!") .. " +20 " .. loc("points") .. "!",0xffba00ff,capgrpAmmoinfo)
   900 					AwardPoints(20)
   900 					AwardPoints(20)
   901 				end
   901 				end
   902 
   902 
   903 				if ((shotsHit / shotsFired * 100) >= 80) and (shotsFired > 4) then
   903 				if ((shotsHit / shotsFired * 100) >= 80) and (shotsFired > 4) then
   904 					AddCaption(loc("Accuracy Bonus! +15 points!"),0xffba00ff,capgrpVolume)
   904 					AddCaption(loc("Accuracy Bonus!") .. " +15 " .. loc("points") .. "!",0xffba00ff,capgrpVolume)
   905 					AwardPoints(15)
   905 					AwardPoints(15)
   906 				end
   906 				end
   907 
   907 
   908 			end
   908 			end
   909 		else -- remove this if you want tumbler to fall slowly on death
   909 		else -- remove this if you want tumbler to fall slowly on death
  1211 			SetHealth(morte, 0)
  1211 			SetHealth(morte, 0)
  1212 
  1212 
  1213 			RK = RK + 1
  1213 			RK = RK + 1
  1214 			if RK == 5 then
  1214 			if RK == 5 then
  1215 				RK = 0
  1215 				RK = 0
  1216 				AddCaption(loc("Drone Hunter! +10 points!"),0xffba00ff,capgrpMessage2)
  1216 				AddCaption(loc("Drone Hunter!") .. " +10 " .. loc("points") .. "!",0xffba00ff,capgrpMessage2)
  1217 				AwardPoints(10)
  1217 				AwardPoints(10)
  1218 			end
  1218 			end
  1219 
  1219 
  1220 		elseif (vType[i] == "ammo") then
  1220 		elseif (vType[i] == "ammo") then
  1221 			AddVisualGear(vCircX[i], vCircY[i], vgtExplosion, 0, false)
  1221 			AddVisualGear(vCircX[i], vCircY[i], vgtExplosion, 0, false)
  1225 			AddCaption("+" .. 3 .. " " .. loc("Ammo"), 0x00ff00ff,capgrpMessage)
  1225 			AddCaption("+" .. 3 .. " " .. loc("Ammo"), 0x00ff00ff,capgrpMessage)
  1226 
  1226 
  1227 			GK = GK + 1
  1227 			GK = GK + 1
  1228 			if GK == 3 then
  1228 			if GK == 3 then
  1229 				GK = 0
  1229 				GK = 0
  1230 				AddCaption(loc("Ammo Maniac! +5 points!"),0xffba00ff,capgrpMessage2)
  1230 				AddCaption(loc("Ammo Maniac!") .. " +5 " .. loc("points") .. "!",0xffba00ff,capgrpMessage2)
  1231 				AwardPoints(5)
  1231 				AwardPoints(5)
  1232 			end
  1232 			end
  1233 
  1233 
  1234 		elseif (vType[i] == "bonus") then
  1234 		elseif (vType[i] == "bonus") then
  1235 
  1235 
  1254 			end
  1254 			end
  1255 
  1255 
  1256 			OK = OK + 1
  1256 			OK = OK + 1
  1257 			if OK == 3 then
  1257 			if OK == 3 then
  1258 				OK = 0
  1258 				OK = 0
  1259 				AddCaption(loc("Shield Seeker! + 10 points!"),0xffba00ff,capgrpMessage2)
  1259 				AddCaption(loc("Shield Seeker!") .. " + 10 " .. loc("points") .. "!",0xffba00ff,capgrpMessage2)
  1260 				AwardPoints(10)
  1260 				AwardPoints(10)
  1261 			end
  1261 			end
  1262 
  1262 
  1263 		elseif (vType[i] == "blueboss") then
  1263 		elseif (vType[i] == "blueboss") then
  1264 			PlaySound(sndHellishImpact3)
  1264 			PlaySound(sndHellishImpact3)
  1265 			AddCaption(loc("Boss defeated! +50 points!"), 0x0050ffff,capgrpMessage)
  1265 			AddCaption(loc("Boss defeated!") .. " +50 " .. loc("points") .. "!", 0x0050ffff,capgrpMessage)
  1266 
  1266 
  1267 			morte = AddGear(vCircX[i], vCircY[i], gtExplosives, 0, 0, 0, 1)
  1267 			morte = AddGear(vCircX[i], vCircY[i], gtExplosives, 0, 0, 0, 1)
  1268 			SetHealth(morte, 0)
  1268 			SetHealth(morte, 0)
  1269 
  1269 
  1270 			BK = BK + 1
  1270 			BK = BK + 1
  1271 			if BK == 2 then
  1271 			if BK == 2 then
  1272 				BK = 0
  1272 				BK = 0
  1273 				AddCaption(loc("Boss Slayer! +25 points!"),0xffba00ff,capgrpMessage2)
  1273 				AddCaption(loc("Boss Slayer!") .. " +25 " .. loc("points") .. "!"),0xffba00ff,capgrpMessage2)
  1274 				AwardPoints(25)
  1274 				AwardPoints(25)
  1275 			end
  1275 			end
  1276 
  1276 
  1277 		end
  1277 		end
  1278 
  1278 
  1282 		res = "fatal"
  1282 		res = "fatal"
  1283 
  1283 
  1284 		chainCounter = 3000
  1284 		chainCounter = 3000
  1285 		chainLength = chainLength + 1
  1285 		chainLength = chainLength + 1
  1286 		if chainLength > 1 then
  1286 		if chainLength > 1 then
  1287 			AddCaption( chainLength .. loc("-Hit Combo! +") .. chainLength*2 .. loc(" points!"),0xffba00ff,capgrpAmmostate)
  1287 			AddCaption( chainLength .. "-" .. loc("Hit Combo!") .. " +"  chainLength*2 .. " " .. loc("points") .. "!",0xffba00ff,capgrpAmmostate)
  1288 			AwardPoints(chainLength*2)
  1288 			AwardPoints(chainLength*2)
  1289 		end
  1289 		end
  1290 
  1290 
  1291 	else
  1291 	else
  1292 	-- circle is merely damaged
  1292 	-- circle is merely damaged
  1485 
  1485 
  1486 					CircleDamaged(i)
  1486 					CircleDamaged(i)
  1487 
  1487 
  1488 					circsHit = circsHit + 1
  1488 					circsHit = circsHit + 1
  1489 					if circsHit > 1 then
  1489 					if circsHit > 1 then
  1490 						AddCaption(loc("Multi-shot! +5 points!"),0xffba00ff,capgrpAmmostate) 
  1490 						AddCaption(loc("Multi-shot!") .. " +5 " .. loc("points") .. "!",0xffba00ff,capgrpAmmostate) 
  1491 					end
  1491 					end
  1492 
  1492 
  1493 					shotsHit = shotsHit + 1
  1493 					shotsHit = shotsHit + 1
  1494 
  1494 
  1495 				end
  1495 				end
  1513 				DeleteGear(gear)
  1513 				DeleteGear(gear)
  1514 
  1514 
  1515 				SK = SK + 1
  1515 				SK = SK + 1
  1516 				if SK == 5 then
  1516 				if SK == 5 then
  1517 					SK = 0
  1517 					SK = 0
  1518 					AddCaption(loc("Shield Master! +10 points!"),0xffba00ff,capgrpAmmoinfo)
  1518 					AddCaption(loc("Shield Master!") .. " +10 " .. loc("points") .. "!",0xffba00ff,capgrpAmmoinfo)
  1519 					AwardPoints(10)
  1519 					AwardPoints(10)
  1520 				end
  1520 				end
  1521 			end
  1521 			end
  1522 
  1522 
  1523 		elseif dist < 1600 then
  1523 		elseif dist < 1600 then
  1584 				ss = CircleDamaged(i)
  1584 				ss = CircleDamaged(i)
  1585 				WellHeAintGonnaJumpNoMore(GetX(CurrentHedgehog),GetY(CurrentHedgehog))
  1585 				WellHeAintGonnaJumpNoMore(GetX(CurrentHedgehog),GetY(CurrentHedgehog))
  1586 
  1586 
  1587 				if ss == "fatal" then
  1587 				if ss == "fatal" then
  1588 					if (primShotsLeft == 0) and (TimeLeft <= 9) then
  1588 					if (primShotsLeft == 0) and (TimeLeft <= 9) then
  1589 						AddCaption(loc("Kamikaze Expert! +15 points!"),0xffba00ff,capgrpMessage)
  1589 						AddCaption(loc("Kamikaze Expert!") .. " +15 " .. loc("points") .. "!",0xffba00ff,capgrpMessage)
  1590 						AwardPoints(15)
  1590 						AwardPoints(15)
  1591 					elseif (primShotsLeft == 0) then
  1591 					elseif (primShotsLeft == 0) then
  1592 						AddCaption(loc("Depleted Kamikaze! +5 points!"),0xffba00ff,capgrpMessage)
  1592 						AddCaption(loc("Depleted Kamikaze!") .. " +5 " .. loc("points") .. "!",0xffba00ff,capgrpMessage)
  1593 						AwardPoints(5)
  1593 						AwardPoints(5)
  1594 					elseif TimeLeft <= 9 then
  1594 					elseif TimeLeft <= 9 then
  1595 						AddCaption(loc("Timed Kamikaze! +10 points!"),0xffba00ff,capgrpMessage)
  1595 						AddCaption(loc("Timed Kamikaze!") .. " +10 " .. loc("points") .. "!",0xffba00ff,capgrpMessage)
  1596 						AwardPoints(10)
  1596 						AwardPoints(10)
  1597 					end
  1597 					end
  1598 				end
  1598 				end
  1599 
  1599 
  1600 			end
  1600 			end