Adds a isDay() function and isAprilFools() macro function which uses isDay() to determine if it is month 4 day 1. GET BUSY.

Other shenanigans.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@3361 316c924e-a436-60f5-8080-3fe189b3f50e
This commit is contained in:
vageyenaman@gmail.com
2012-03-26 02:17:45 +00:00
parent dbe7829f7b
commit e78787808a
11 changed files with 307 additions and 3 deletions
@@ -457,6 +457,218 @@
if ("help")
src << "blink, blink_r, blush, bow-(none)/mob, burp, choke, chuckle, clap, collapse, cough,\ncry, custom, deathgasp, drool, eyebrow, frown, gasp, giggle, groan, grumble, handshake, hug-(none)/mob, glare-(none)/mob,\ngrin, laugh, look-(none)/mob, moan, mumble, nod, pale, point-atom, raise, salute, shake, shiver, shrug,\nsigh, signal-#1-10, smile, sneeze, sniff, snore, stare-(none)/mob, tremble, twitch, twitch_s, whimper,\nwink, yawn"
if ("fart")
if(isAprilFools())
var/gtext = "his"
if(gender == FEMALE)
gtext = "her"
switch(rand(1, 48))
if(1)
message = "<B>[src]</B> lets out a girly little 'toot' from [gtext] butt."
if(2)
message = "<B>[src]</B> farts loudly!"
if(3)
message = "<B>[src]</B> lets one rip!"
if(4)
message = "<B>[src]</B> farts! It sounds wet and smells like rotten eggs."
if(5)
message = "<B>[src]</B> farts robustly!"
if(6)
message = "<B>[src]</B> farted! It reminds you of your grandmother's queefs."
if(7)
message = "<B>[src]</B> queefed out [gtext] ass!"
if(8)
message = "<B>[src]</B> farted! It reminds you of your grandmother's queefs."
if(9)
message = "<B>[src]</B> farts a ten second long fart."
if(10)
message = "<B>[src]</B> groans and moans, farting like the world depended on it."
if(11)
message = "<B>[src]</B> breaks wind!"
if(12)
message = "<B>[src]</B> expels intestinal gas through the anus."
if(13)
message = "<B>[src]</B> release an audible discharge of intestinal gas."
if(14)
message = "\red <B>[src]</B> is a farting motherfucker!!!"
if(15)
message = "\red <B>[src]</B> suffers from flatulence!"
if(16)
message = "<B>[src]</B> releases flatus."
if(17)
message = "<B>[src]</B> releases gas generated in his digestive tract, [gtext] stomach and [gtext] intestines. \red<B>It stinks way bad!</B>"
if(18)
message = "<B>[src]</B> farts like your mom used to!"
if(19)
message = "<B>[src]</B> farts. It smells like Soylent Surprise!"
if(20)
message = "<B>[src]</B> farts. It smells like pizza!"
if(21)
message = "<B>[src]</B> farts. It smells like George Melons' perfume!"
if(22)
message = "<B>[src]</B> farts. It smells like atmos in here now!"
if(23)
message = "<B>[src]</B> farts. It smells like medbay in here now!"
if(24)
message = "<B>[src]</B> farts. It smells like the bridge in here now!"
if(25)
message = "<B>[src]</B> farts like a pubby!"
if(26)
message = "<B>[src]</B> farts like a goone!"
if(27)
message = "<B>[src]</B> farts so hard poop came out with it, but dares not look."
if(28)
message = "<B>[src]</B> farts delicately."
if(29)
message = "<B>[src]</B> farts timidly."
if(30)
message = "<B>[src]</B> farts very, very quietly. The stench is OVERPOWERING."
if(31)
message = "<B>[src]</B> farts and says, \"Mmm! Delightful aroma!\""
if(32)
message = "<B>[src]</B> farts and says, \"Mmm! Sexy!\""
if(33)
message = "<B>[src]</B> farts and fondles [gtext] own buttocks."
if(34)
message = "<B>[src]</B> farts and fondles YOUR buttocks."
if(35)
message = "<B>[src]</B> fart in [gtext] own mouth. A shameful [src]."
if(36)
message = "<B>[src]</B> farts out pure plasma! \red<B>FUCK!</B>"
if(37)
message = "<B>[src]</B> farts out pure oxygen. What the fuck did he eat?"
if(38)
message = "<B>[src]</B> breaks wind noisily!"
if(39)
message = "<B>[src]</B> releases gas with the power of the gods! The very station trembles!!"
if(40)
message = "<B>[src] \red f \blue a \black r \red t \blue s \black !</B>"
if(41)
message = "<B>[src] shat [gtext] pants!</B>"
if(42)
message = "<B>[src] shat [gtext] pants!</B> Oh, no, that was just a really nasty fart."
if(43)
message = "<B>[src]</B> is a flatulent whore."
if(44)
message = "<B>[src]</B> likes the smell of his own farts."
if(45)
message = "<B>[src]</B> doesnt wipe after he poops."
if(46)
message = "<B>[src]</B> farts! Now [gtext] ass smells like Uhangay."
if(47)
message = "<B>[src]</B> farts so loud [gtext] buttocks causes a gravity well in the spacetime continuum!"
if(48)
message = "<B>[src]</B> laughs and [gtext] breath smells like a fart."
playsound(src.loc, 'poo2.ogg', 50, 1)
if("piss", "pee", "tinkle")
if(isAprilFools())
if(src.urine < 3)
if(src.gender == MALE)
message = "<B>[src]</B> unzips his pants and waves his dick around."
else
message = "<B>[src]</B> lowers her pants and squats near the floor."
else
if((locate(/obj/machinery/disposal/toilet) in src.loc) && (src.buckled != null) && (src.poo >= 3))
for(var/obj/machinery/disposal/toilet/T in src.loc)
if(src.gender == MALE)
message = "\blue <B>[src]</B> unzips his pants and urinates in the toilet."
else
message = "\blue <B>[src]</B> lowers her pants, sits on the toilet and urinates."
src.urine -= 3
else
var/shat_on_other = 0
for(var/mob/living/M in src.loc)
if(M == src)
continue
message = "\red <B>[src]</B> pisses all over [M]!"
shat_on_other = 1
break
if(!shat_on_other)
message = pick("<B>[src]</B> pisses on the floor.", "<B>[src]</B> pisses all over the floor!", "<B>[src]</B> unzips their pants and pisses all over the floor.")
src.urine -= 3
src.loc.add_piss_floor(src)
if("poo", "poop", "shit", "crap")
if(isAprilFools())
if(src.poo < 3)
message = "<B>[src]</B> grunts for a moment. Nothing happens."
else
if((locate(/obj/machinery/disposal/toilet) in src.loc) && (src.buckled != null) && (src.poo >= 3))
for(var/obj/machinery/disposal/toilet/T in src.loc)
message = pick("<B>[src]</B> unzips their pants and poops in the toilet.", "<B>[src]</B> farts out a steamer.", "\blue THHBBBBBBBBBBBBBT!")
playsound(src.loc, 'poo2.ogg', 50, 1)
src.poo -= 3
else if(istype(src.wear_suit, /obj/item/clothing/suit))
message = pick("<B>[src]</B> shits in their pants!", "<B>[src]</B> poos in their suit!", "\blue THHHHHHBBBBBBBBT!")
playsound(src.loc, 'poo2.ogg', 50, 1)
src.poo -= 3
else if(istype(src.w_uniform, /obj/item/clothing/under))
message = pick("<B>[src]</B> shits in their pants!", "<B>[src]</B> poos in their suit!", "\blue THHHHHHBBBBBBBBT!")
playsound(src.loc, 'poo2.ogg', 50, 1)
src.poo -= 3
else
var/shat_on_other = 0
for(var/mob/living/M in src.loc)
if(M == src)
continue
message = "\red <B>[src]</B> shits all over [M]!"
shat_on_other = 1
break
if(!shat_on_other)
message = pick("<B>[src]</B> shits on the floor.", "<B>[src]</B> poops all over the floor!", "<B>[src]</B> squeezes out a turd.")
src.poo -= 3
src.loc.add_poo_floor(src)
playsound(src.loc, 'poo2.ogg', 50, 1)
else
src << "\blue Unusable emote '[act]'. Say *help for a list."
@@ -468,3 +680,5 @@
else if (m_type & 2)
for (var/mob/O in hearers(src.loc, null))
O.show_message(message, m_type)
else
src << "\blue Unusable emote '[act]'. Say *help for a list."
+4
View File
@@ -118,6 +118,10 @@
var/jitteriness = 0//Carbon
var/charges = 0.0
var/nutrition = 400.0//Carbon
var/poo = 0.0 // APRIL FOOLS
var/urine = 0.0
var/overeatduration = 0 // How long this guy is overeating //Carbon
var/paralysis = 0.0
var/stunned = 0.0