123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207 |
- # nichBedroomServant
- CLOSE ALL
- $metka = ''
- $loc = 'nichBedroomServant'
- $locM = $loc
- $nichLoc = 'servant'
- $metkaM = ''
- $location_type = 'private'
- $locclass = 'bedr'
- $menu_loc = 'nichBedroomServant'
- $menu_arg = ''
- menu_off = 0
- tanhouse1 = 1
- !! Has to happen before there is any output
- if nichWork = 2:
- if nichLastWorkDay ! daystart:
- gs 'nichUtil', 'startWorkday'
- end
- !! this code has to be include everywhere where PC can change clothes or enter the apartment
- gs 'nichUtil', 'checkOutfit'
- end
- !! Argument return: PC has been in the room before, dont perform actions meant to be executed before or as she enters the room.
- if $ARGS[0] = '' or $ARGS[0] = 'start' or $ARGS[0] = 'return':
- gs 'stat'
- '<center><b>Your Bedroom in Nicholas'' Apartment</b></center>'
- '<center><img <<$set_imgh>> src="images/locations/city/citycenter/nichApartment/bedroomServant.jpg"></center>'
- 'Your bedroom is fairly large, considering you''re only an employee. There is a small <a href="exec:gt ''bed'', ''start''">double bed</a> and an <a href="exec:gt ''budilnik'', ''start''">alarm clock</a>.'
- 'Half a wall is taken up by an expensive-looking <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> (where you can choose outfits and organize your clothing). There''s a make-up table with a <a href="exec:gt ''mirror'', ''start''">mirror</a> next to it.'
- if komp = 1:
- $komp = ' with your <a href="exec:gt ''Komp'', ''start''">laptop</a>.'
- else
- $komp = '.'
- end
- 'A luxurious <a href="exec:gt ''divan'', ''start''">leather sofa</a> is also part of the ensemble. Mounted on the wall opposite the sofa is a big flat <a href="exec:gt ''TV'', ''start''">TV</a>. Under the window, you see a brand-new <a href="exec:gt ''nichBedroomServant'', ''desk''">desk</a><<$komp>>'
- if obruch > 0:'<br>Your hula hoop stands in a corner of the room. '
- if skak > 0:'Your jump rope is sitting on a shelf. '
- if bookYog > 0:'A yoga mat is rolled up in a corner next to the wardrobe. '
- if mishka > 0:'On one of the shelves, you''ve placed your <<mishka>> teddy bear.'
- gs 'exercise', 'start'
- if nichSalaryOutstanding > 0:
- *nl
- 'On top of your desk lies your paycheck over <<nichSalaryOutstanding>> <b>?</b>(<a href="exec:gt ''nichBedroomServant'', ''redeemSalary''">redeem</a>).'
- end
-
- act 'Go to the hallway':
- if nichEvtGalaTele1 = 1 and nichGalaOpinion = 1 and (rand(1,100) <= 40 or nichDebug = 1):
- gt 'nichBedroomServant', 'evtBodyguardIntim1'
- elseif nichGalaOpponent = 31 and (rand(1,100) <= 10 or nichDebug = 1):
- !!Todo: Sveta gets abducted
- else
- if $clothingworntype ! 'nude':
- minut += 1
- gt 'nichApartment'
- else
- msg'<b><font color = red>You probably shouldn''t walk around naked, especially not at your workplace. You need to get dressed.</font></b>'
- gt $CURLOC
- end
- end
- end
- act 'Go to the servant bathroom':
- gt 'nichBathServant'
- end
- act 'Study (2:00)':
- *clr & cla
- menu_off = 1
- minut += 120
- intel_exp += 1
- '<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
- 'You spend two hours studying and feel a little smarter now.'
- act 'Finish':gt $loc
- end
- if student > 0 and kursovik < 100:
- act 'Write course work (1:00)':
- *clr & cla
- menu_off = 1
- minut += 60
- kursovik += rand(pcs_intel / 20, pcs_intel / 10)
- if kursovik > 100:kursovik = 100
- pcs_mood -= 10
- '<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
- 'You work on your course work and have now completed <<kursovik>> percent.'
- act 'Finish':gt $loc
- end
- end
- gs 'events', 'read'
- if pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0:gt'tobiQW','start'
- if sick >= 1:
- act 'Get some bed rest (illness)':
- *clr & cla
- menu_off = 1
- minut += 240
- sick -= 1
- if sick < 0:sick = 0
- gs'stat'
- '<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick'+rand(11,17)+'.jpg"></center>'
- 'You lie in bed, coughing, sneezing, blowing your nose... and, as if that wasn''t enough, you also think you might be getting a headache.'
- 'Drifting in and out of sleep, you spend about 4 hours tossing and turning, trying to sweat out the illness, and you actually feel better when you decide to stretch your legs.'
- act 'Get up': gt 'bedr'
- end
- end
- if pcs_horny >= 50: act 'Masturbate': gt'selfplay', 'start'
- if pornMagazine > 0:'You hide a porn magazine under your mattress.' & dynamic $d_read_porn
- if dur > 0:'You have hidden <<dur>> doses of Pale Lady behind your wardrobe.'
- if dur > 0 and narkday ! daystart:
- act 'Take some cocaine (0:05)':
- *clr & cla
- menu_off = 1
- minut += 5
- narkday = daystart
- pcs_health = pcs_vital * 10 + pcs_stren * 5
- pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
- pcs_manna = (pcs_intel * pcs_magik) + pcs_magik * 100 + pcs_vital * 10 + rikudo
- pcs_mood = 100
- pcs_horny = 100
- nark += 10
- dur -= 1
- '<center><img <<$set_imgh>> src="images/shared/drugs/dur.jpg"></center>'
- 'You take a small dose of coke and not long after, you start to feel great, as if you could do anything, <b>be</b> anything - but you''re also starting to feel incredibly horny.'
- act 'Leave':gt $curloc
- end
- end
-
- if nichWork = 2:
-
- gs 'nichChore','inspect','servant'
-
- end
-
- elseif $ARGS[0] = 'evtBodyguardIntim1':
- *clr & cla
- '<center><img <<$set_imgh>> src="images/characters/city/taras/encounter1.jpg"></center>'
- 'Before you have the chance to leave your room you get pushed back inside by a man you don''t know yet.'
- 'Taken by surpise you can only gasp as he painfully turns your right arm around, forcing you into a bent over position.'
- 'He obviously knows what he is doing. He has expertly fixated you with just one hand, leaving you next to no room to move.'
- '"Let me introduce myself. My name is Taras, but you will call me Sir. I am the bodyguard of Mistress Gala. I am responsible for protecting not only her life and health, but also the good reputation of her family."'
- '"She told me that her husband hired a little skank as his new maid."'
- 'You gasp in surprise as he pulls up your skirt leaving your butt exposed.'
- '"And from the looks of it she is right. Not that I would have doubted her word."'
- 'He smacks your left buttock painfully.'
- '"Of course that can''t be accepted."'
- 'He smacks your other buttock.'
- '"Consider this your first and only warning. If you whore around this house, if you make Mistress Gala unhappy in any way, you will regret it."'
- 'He smacks your left buttock again.'
- '"Do you understand?"'
- !! Todo: Disagree
- 'Unable to resist in you current position you meekly nod your head "Yes."'
- 'The right buttock again.'
- '"Yes what?"'
- '"Yes sir, I understand."'
- 'He waits for another few seconds before gently stroking your hair and then releasing you.'
- '"Good girl. I would hate to actually hurt you." with this obvious lie he leaves your room.'
- gs 'pain', 3, 'asscheeks', 'spank'
- nichGalaOpinion = 2
- act 'Return':
- gt $loc
- end
- elseif $ARGS[0] = 'desk':
- if nichGalaOpponent = 21:
- '<center><img <<$set_imgh>> src="images/characters/city/gala/necklace.jpg"></center>'
- 'You open your desk. Something doesn''t seem to be right. After closer investigation you find Galas missing necklace hidden under some of your items.'
- act 'Leave it there':
- gt 'stol','start'
- end
- act 'Bring it back to where it belongs':
- minut += 3
- nichGalaOpponent = 22
- gt 'nichBedroomServant', 'return'
- end
- else
- gt 'stol','start'
- end
- elseif $ARGS[0] = 'redeemSalary'
- *clr & cla
- karta += nichSalaryOutstanding
- nichSalaryOutstanding = 0
- 'Your salary of <<nichSalaryOutstanding>> <b>?</b> is transferred to your bank account.'
- act 'Back': gt 'nichBedroomServant', 'return'
- end
- --- nickBedroomServant ---------------------------------
|