cyberpresidentvanellope/CHOMPstation
1
0
Fork 0
mirror of https://github.com/CHOMPstation/CHOMPstation.git synced 2026-08-22 19:46:36 +01:00
Code Issues Packages Projects Releases Wiki Activity

Monkey mode now can be ended by robusting all infected monkeys (including Pun-Pun) along with leaving on the shuttle.

Browse Source 
Admins can switch mode to one from modes game actually can run, not from hardcoded list.


git-svn-id: http://tgstation13.googlecode.com/svn/trunk@1401 316c924e-a436-60f5-8080-3fe189b3f50e
This commit is contained in:
rastaf.zero@gmail.com
2011-04-06 20:39:08 +00:00
parent 50d25c216c
commit 2c901c71bb
3 changed files with 54 additions and 84 deletions
Download Patch File Download Diff File Expand all files Collapse all files
code/unused/gamemodes/monkey.dm
+47 -23
View File
@@ -1,6 +1,13 @@
#define MONKEY_MODE_RUNNING 0
#define MONKEY_MODE_NO_RABID_LEFT 1
#define MONKEY_MODE_SHUTTLE_CAPTURED 2
#define MONKEY_MODE_SHUTTLE_WITH_HUMANS 3
/datum/game_mode/monkey
name = "monkey"
config_tag = "monkey"
var/state = MONKEY_MODE_RUNNING
/datum/game_mode/monkey/announce()
world << "<B>The current game mode is - Monkey!</B>"
@@ -20,38 +27,50 @@
while (amount > 0)
var/mob/living/carbon/human/player = pick(players)
player.monkeyize()
var/mob/living/carbon/monkey/new_monkey = player.monkeyize()
new_monkey << "<B>Your goal is to capture the entire human civilization and your first target is Centcom. Hijack the shuttle without humans aboard.</B>"
players -= player
amount--
for (var/mob/living/carbon/monkey/rabid_monkey in world)
if (!isturf(rabid_monkey.loc) || rabid_monkey.z!=1)
continue
rabid_monkey.contract_disease(new /datum/disease/jungle_fever,0,0)
rabid_monkey << "<B>Your goal is to capture the entire human civilization and your first target is Centcom. Hijack the shuttle without humans aboard.</B>"
/datum/game_mode/monkey/proc/is_important_monkey(var/mob/living/carbon/monkey/M as mob)
var/turf/T = get_turf(M)
return M.stat!=2 && istype(M.virus, /datum/disease/jungle_fever) && ( T.z==1 || istype(T.loc, /area/shuttle/escape/centcom) || istype(T.loc, /area/centcom))
/datum/game_mode/monkey/check_win()
if (state==MONKEY_MODE_SHUTTLE_CAPTURED || state==MONKEY_MODE_SHUTTLE_WITH_HUMANS)
return
var/infected_count = 0
for (var/mob/living/carbon/monkey/rabid_monkey in world)
if (is_important_monkey(rabid_monkey))
infected_count++
if (infected_count==0)
state = MONKEY_MODE_NO_RABID_LEFT
/datum/game_mode/monkey/check_finished()
if(emergency_shuttle.location==2)
return 1
return 0
return (emergency_shuttle.location==2) || (state>0)
/datum/game_mode/monkey/declare_completion()
var/area/escape_zone = locate(/area/shuttle/escape/centcom)
var/monkeywin = 0
for(var/mob/living/carbon/monkey/monkey_player in world)
if (monkey_player.stat != 2)
var/turf/location = get_turf(monkey_player.loc)
if (location in escape_zone)
monkeywin = 1
break
if (state != MONKEY_MODE_NO_RABID_LEFT)
for(var/mob/living/carbon/monkey/monkey_player in world)
if (is_important_monkey(monkey_player))
var/turf/location = get_turf(monkey_player.loc)
if (istype(location.loc, /area/shuttle/escape/centcom))
monkeywin = 1
break
if(monkeywin)
for(var/mob/living/carbon/human/human_player in world)
if (human_player.stat != 2)
var/turf/location = get_turf(human_player.loc)
if (istype(human_player.loc, /turf))
if (location in escape_zone)
if(monkeywin)
for(var/mob/living/carbon/human/human_player in world)
if (human_player.stat != 2)
var/turf/location = get_turf(human_player.loc)
if (istype(location.loc, /area/shuttle/escape/centcom))
monkeywin = 0
break
@@ -63,12 +82,17 @@
player.monkeyize()
for(var/mob/living/carbon/monkey/monkey_player in world)
if (monkey_player.client)
world << "<B>[monkey_player.key] was a monkey.</B>"
world << "<B>[monkey_player.key] was a monkey. [monkey_player.stat == 2 ? "(DEAD)" : ""]</B>"
sleep(50)
else
world << "<FONT size=3 color=red><B>The Research Staff has stopped the monkey invasion!</B></FONT>"
for(var/mob/living/carbon/monkey/monkey_player in world)
if (monkey_player.client)
world << "<B>[monkey_player.key] was a monkey.</B>"
world << "<B>[monkey_player.key] was a monkey. [monkey_player.stat == 2 ? "(DEAD)" : ""]</B>"
return 1
return 1
#undef MONKEY_MODE_RUNNING
#undef MONKEY_MODE_NO_RABID_LEFT
#undef MONKEY_MODE_SHUTTLE_CAPTURED
#undef MONKEY_MODE_SHUTTLE_WITH_HUMANS