|
|
@@ -37,10 +37,8 @@ if $ARGS[0] = 'start':
|
|
|
|
|
|
end
|
|
|
|
|
|
-
|
|
|
if $ARGS[0] = 'bedroom':
|
|
|
*clr & cla
|
|
|
- !! Init
|
|
|
$location_type = 'private'
|
|
|
$setloc['StageTitle'] = 'Residental Bedroom'
|
|
|
$setloc['StageImage'] = '<<$default_img_path>>ballet_residence/bedroom'
|
|
|
@@ -67,8 +65,14 @@ if $ARGS[0] = 'bedroom':
|
|
|
if komp = 1: 'Your <a href="exec: gt ''Komp'',''start''">computer</a> is on your desk.'
|
|
|
'<table><tr><td valign="top">Your <a href="exec:gt ''alarmclock'', ''start''">alarm clock</a> is set to <<func(''alarmclock'', ''alarm_display'', alarmVars[''timerH''], alarmVars[''timerM''])>> during the week and <<func(''alarmclock'', ''alarm_display'', alarmVars[''timerEndH''], alarmVars[''timerEndM''])>> during the weekend. It is currently turned ' + iif(alarmVars['alarmOn'] = 0, '<a href="exec: alarmVars[''alarmOn''] = 1 & gt $loc, $loc_arg">OFF</a>.', '<a href="exec: alarmVars[''alarmOn''] = 0 & gt $loc, $loc_arg">ON</a>.')
|
|
|
|
|
|
- ! act 'Enter Shop': gt 'pushkin_ballet_shop', 'init'
|
|
|
- act 'Go to the hallway': minut += 5 & gt 'pushkin_ballet_res', 'hallway'
|
|
|
+ if $clothingworntype ! 'nude':
|
|
|
+ act 'Go to the hallway': minut += 5 & gt 'pushkin_ballet_res', 'hallway'
|
|
|
+ else
|
|
|
+ act 'Go to the hallway':
|
|
|
+ msg '<b><font color = red>Whilst as a dancer you have less worries about showing yourself Bronya would likely have a few choice words about your behaviour.</font></b>'
|
|
|
+ gt $loc, $loc_arg
|
|
|
+ end
|
|
|
+ end
|
|
|
|
|
|
!! Default actions
|
|
|
gs 'core_library', 'bedroom'
|
|
|
@@ -77,70 +81,26 @@ if $ARGS[0] = 'bedroom':
|
|
|
if hour >= 16 and week ! 7:
|
|
|
act 'Barre Practice (60m)': gt 'pushkin_ballet_evt', 'barre_exercise'
|
|
|
act 'Study (60m)': gt 'pushkin_ballet_res', 'study'
|
|
|
- ! act 'Practice make up' : gt 'pushkin_ballet_evt', 'make_up'
|
|
|
+ if mc_inventory['cosmetics'] >= 9:
|
|
|
+ act 'Practice make-up' : gt 'pushkin_ballet_res', 'make_up'
|
|
|
+ end
|
|
|
if feet_track ! daystart: act 'Take care of your feet': gt 'pushkin_ballet_res', 'feetcare'
|
|
|
end
|
|
|
act 'Listen to the radio (30m)': gt 'pushkin_ballet_res', 'radio'
|
|
|
act 'Read the rules': gt 'pushkin_ballet_res', 'rules'
|
|
|
+
|
|
|
!!act 'Debug data': gs 'pushkin_ballet_init', 'score_debug'
|
|
|
end
|
|
|
|
|
|
- ! First Maya event
|
|
|
+ !! First Maya event
|
|
|
|
|
|
if ballet_day = 3 and mayaqw['grave'] = 0:
|
|
|
- act 'Answer the knock <<$mod_ballet[''icon_green'']>>' : gt 'npc_3501_init','grave'
|
|
|
+ act 'Answer the knock' : gt 'npc_3501_init','grave'
|
|
|
elseif ballet_day = 3 and hour > 19 and mayaqw['grave'] = 1:
|
|
|
act 'Another knock': gt 'npc_3501_init', 'post_grave'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
-if $ARGS[0] = 'rules':
|
|
|
- *clr & cla
|
|
|
- minut += 5
|
|
|
- gs 'stat'
|
|
|
- *pl '<center><h2>Residence Rules</h2></center>'
|
|
|
- *pl 'You look at the rules on the wall.'
|
|
|
-
|
|
|
- *pl 'Whilst you stay in this accommodation, you will follow these rules:'
|
|
|
-
|
|
|
- '1) No males are allowed in the accommodation block.'
|
|
|
-
|
|
|
- '2) All residents must return to the block by 21:00. No exceptions. If you are late, you will have to report to the duty warden.'
|
|
|
-
|
|
|
- '3) No smoking, drinking, or drug use is allowed in the accommodation. If you are caught, you will face immediate dismissal from the school.'
|
|
|
-
|
|
|
- '4) Breakfast is from 06:00 to 07:00.'
|
|
|
-
|
|
|
- '5) All rooms must be kept clean and tidy.'
|
|
|
-
|
|
|
- '6) Valuables can be left with the duty warden if required. All thefts or problems are to be reported immediately.'
|
|
|
-
|
|
|
- '7) You are to follow the duty warden''s instructions in an emergency.'
|
|
|
-
|
|
|
- act 'Look away': gt 'pushkin_ballet_res', 'bedroom'
|
|
|
-end
|
|
|
-
|
|
|
-if $ARGS[0] = 'radio':
|
|
|
- *clr & cla
|
|
|
- minut += 30
|
|
|
- pcs_mood += rand(1,5)
|
|
|
- pcs_sleep -= rand(1,10)
|
|
|
- if ballet_day >= 1 and week ! 7:
|
|
|
- instrmusic_exp += rand(1,3)
|
|
|
- pcs_perform += rand(1,3)
|
|
|
- mod_homework[week] += 1
|
|
|
- mod_daily_score[week] += 1
|
|
|
- end
|
|
|
- $setloc['StageTitle'] = 'Radio'
|
|
|
- $setloc['StageImage'] = '<<$default_img_path>>ballet_residence/radio'
|
|
|
- gs 'stat'
|
|
|
- gs 'core_library', 'stage_title'
|
|
|
-
|
|
|
- 'You start to listen to the radio for half an hour, taking notes of the performance with the ideas from your earlier lesson. Then, you close your eyes and start humming along to the familiar music after a while. '
|
|
|
-
|
|
|
- act 'Turn the radio off': gt 'pushkin_ballet_res', 'bedroom'
|
|
|
-end
|
|
|
-
|
|
|
if $ARGS[0] = 'hallway':
|
|
|
*clr & cla
|
|
|
$setloc['StageTitle'] = 'Residental Hallway'
|
|
|
@@ -152,21 +112,35 @@ if $ARGS[0] = 'hallway':
|
|
|
gs 'stat'
|
|
|
|
|
|
gs 'core_library', 'stage_title'
|
|
|
- ! Visit NPCs
|
|
|
+ !! Visit NPCs
|
|
|
ballet_awol = 0
|
|
|
if ballet_day ! week :
|
|
|
ballet_day = week
|
|
|
end
|
|
|
nclass = 0
|
|
|
- act 'Leave building': minut += 5 & ballet_awol = 1 & gt 'pushkin_ballet_center', 'start'
|
|
|
+
|
|
|
+ if $clothingworntype ! 'nude':
|
|
|
+ if hour = 6 or (hour = 7 and minut <= 30):
|
|
|
+ act 'Attend Ballet Classes': gt 'pushkin_ballet_class', 'start'
|
|
|
+ elseif hour = 7 and (minut > 30 and minut <= 59):
|
|
|
+ $balletEv['trigger'] = 'late'
|
|
|
+ gs 'npc_init_3501', 'summer_school'
|
|
|
+ else
|
|
|
+ act 'Leave Residence': minut += 5 & ballet_awol = 1 & gt 'pushkin_ballet_center', 'start'
|
|
|
+ end
|
|
|
+ else
|
|
|
+ msg '<b><font color = red>Whilst as a dancer you have less worries about showing yourself off Bronya would likely have a few choice words about your behaviour.</font></b>'
|
|
|
+ gt $loc, $loc_arg
|
|
|
+ end
|
|
|
+
|
|
|
act 'Go to your room': minut += 5 & gt 'pushkin_ballet_res', 'bedroom'
|
|
|
act 'Enter the communal room': minut += 5 & gt 'pushkin_ballet_res', 'communal_area'
|
|
|
act 'Go to the bathroom': minut += 5 & gt 'pushkin_ballet_class', 'shower'
|
|
|
act 'Go to the kitchen': minut += 5 & gt 'pushkin_ballet_res', 'kitchen'
|
|
|
if week ! 7:
|
|
|
- ! act 'Visit Maya' : minut += 5 & gt 'pushkin_ballet_res', 'maya_room'
|
|
|
+ !! act 'Visit Maya' : minut += 5 & gt 'pushkin_ballet_res', 'maya_room'
|
|
|
end
|
|
|
- !act 'Knock on wardens door' : minut += 5 & gt 'pushkin_ballet_res', 'warden_room'
|
|
|
+ !!act 'Knock on wardens door' : minut += 5 & gt 'pushkin_ballet_res', 'warden_room'
|
|
|
|
|
|
if ballet_day = 7:
|
|
|
'The hall is bustling with various students settling into their rooms. A few of them wave or smile to greet you as you pass by. You see Bronya at the end of the hall, keeping an eye on the students and ready to provide assistance.'
|
|
|
@@ -186,52 +160,13 @@ if $ARGS[0] = 'hallway':
|
|
|
if hour < 8 or hour > 21:
|
|
|
'You hear someone trying to play the piano at this hour. Before you can complain, you hear the piano being slammed shut, and you wince. A few moments later, two girls emerge from the communal room, arguing heatedly.'
|
|
|
else
|
|
|
+ pcs_mood += 5
|
|
|
'You hear someone playing the piano in the communal room. You don''t recognize the piece being played, but its soothing melody relaxes you.'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
|
|
|
-if $ARGS[0] = 'warden':
|
|
|
- !! residential buzzer logic statements
|
|
|
- if (hour > 20 or hour < 6) and ballet_awol = 1:
|
|
|
- '"Pushkin Ballet Residential Block, how may I help you?", you hear Bronya''s icy voice through the intercom.'
|
|
|
- '"<<$pcs_firstname>> <<$pcs_lastname>>, can I be let in please?", there''s a few seconds pause.'
|
|
|
- '"<<$pcs_firstname>> <<$pcs_lastname>>, you will see me in my office. Now." You can swear the temperature around you just plummeted a few degrees and the door was buzzed open.'
|
|
|
- gt 'pushkin_ballet_res', 'warden_room'
|
|
|
- elseif (hour >= 17 or hour < 21 ) and ballet_awol = 1:
|
|
|
- '"Pushkin Ballet Residential Block, how may I help you?", you hear Bronya''s voice through the intercom.'
|
|
|
- '"<<$pcs_firstname>> <<$pcs_lastname>>, can I be let in please?", there''s a few seconds pause and you hear the door being buzzed open.'
|
|
|
- gt 'pushkin_ballet_res', 'hallway'
|
|
|
- elseif ballet_awol = 1:
|
|
|
- '"Pushkin Ballet Residential Block, how may I help you?", you hear Bronya''s voice through the intercom.'
|
|
|
- '"<<$pcs_firstname>> <<$pcs_lastname>>, can I be let in please?", there''s a few seconds pause.'
|
|
|
- '"<<$pcs_firstname>> <<$pcs_lastname>>, where the hell have you been? Get in here. Now.", you gulp at her voice and with trepidation make your way to her office.'
|
|
|
- gt 'pushkin_ballet_res', 'warden_room'
|
|
|
- else
|
|
|
- minut += 10
|
|
|
- 'You press the buzzer but there''s no response.'
|
|
|
- act 'Return': gt 'pushkin'
|
|
|
- end
|
|
|
-end
|
|
|
-
|
|
|
-if $ARGS[0] = 'warden_room':
|
|
|
- *clr & cla
|
|
|
-
|
|
|
- $location_type = 'private'
|
|
|
- $setloc['StageTitle'] = 'Wardens Residence'
|
|
|
- $setloc['StageImage'] = '<<$default_img_path>>/ballet_residence/warden'
|
|
|
- $location_type = 'public_indoors'
|
|
|
- gs 'shortgs', 'setloc', 'pushkin_ballet_res', $ARGS[0]
|
|
|
- gs 'themes', 'indoors'
|
|
|
- gs 'stat'
|
|
|
-
|
|
|
- gs 'core_library', 'stage_title'
|
|
|
-
|
|
|
- ! Punishment or plot
|
|
|
- act 'Go to the hallway': minut += 5 & ballet_awol = 0 & gt 'pushkin_ballet_res', 'hallway'
|
|
|
-end
|
|
|
-
|
|
|
if $ARGS[0] = 'maya_room':
|
|
|
*clr & cla
|
|
|
$location_type = 'private'
|
|
|
@@ -244,7 +179,7 @@ if $ARGS[0] = 'maya_room':
|
|
|
'Maya''s room closely resembles your own. Her wardrobe is open, and you see her collection of tutus hanging from the rails. On her desk there are several books, including an open poetry book. A quick glance reveals the page title "Like a White Stone" by Akhmatova.'
|
|
|
'Next to it is an old picture of a woman in a park with a black ribbon in the corner.'
|
|
|
act 'Go to the hallway': minut += 5 & gt 'pushkin_ballet_res', 'hallway'
|
|
|
-! Maya events
|
|
|
+ !! Maya events
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'communal_area':
|
|
|
@@ -279,15 +214,15 @@ if $ARGS[0] = 'kitchen':
|
|
|
*clr & cla
|
|
|
|
|
|
$setloc['StageTitle'] = 'Residental Kitchen'
|
|
|
- $setloc['StageImage'] = '<<$default_img_path>>/ballet_residence/kitchen'
|
|
|
- $location_type = 'communal'
|
|
|
+ $setloc['StageImage'] = '<<$default_img_path>>ballet_residence/kitchen'
|
|
|
+ $location_type = 'private'
|
|
|
gs 'shortgs', 'setloc', 'pushkin_ballet_res', $ARGS[0]
|
|
|
gs 'themes', 'indoors'
|
|
|
gs 'stat'
|
|
|
|
|
|
gs 'core_library', 'stage_title'
|
|
|
act 'Go to the hallway': minut += 5 & gt 'pushkin_ballet_res', 'hallway'
|
|
|
-
|
|
|
+ gs 'core_library', 'kitchen'
|
|
|
|
|
|
!! Set up events
|
|
|
*nl
|
|
|
@@ -321,7 +256,94 @@ if $ARGS[0] = 'kitchen':
|
|
|
|
|
|
end
|
|
|
|
|
|
-! Activities
|
|
|
+!! Intercomm
|
|
|
+if $ARGS[0] = 'warden':
|
|
|
+ !! residential buzzer logic statements
|
|
|
+ if (hour > 20 or hour < 6) and ballet_awol = 1:
|
|
|
+ '"Pushkin Ballet Residential Block, how may I help you?", you hear Bronya''s icy voice through the intercom.'
|
|
|
+ '"<<$pcs_firstname>> <<$pcs_lastname>>, can I be let in please?", there''s a few seconds pause.'
|
|
|
+ '"<<$pcs_firstname>> <<$pcs_lastname>>, you will see me in my office. Now." You can swear the temperature around you just plummeted a few degrees and the door was buzzed open.'
|
|
|
+ gt 'pushkin_ballet_res', 'warden_room'
|
|
|
+ elseif (hour >= 17 or hour < 21 ) and ballet_awol = 1:
|
|
|
+ '"Pushkin Ballet Residential Block, how may I help you?", you hear Bronya''s voice through the intercom.'
|
|
|
+ '"<<$pcs_firstname>> <<$pcs_lastname>>, can I be let in please?", there''s a few seconds pause and you hear the door being buzzed open.'
|
|
|
+ gt 'pushkin_ballet_res', 'hallway'
|
|
|
+ elseif ballet_awol = 1:
|
|
|
+ '"Pushkin Ballet Residential Block, how may I help you?", you hear Bronya''s voice through the intercom.'
|
|
|
+ '"<<$pcs_firstname>> <<$pcs_lastname>>, can I be let in please?", there''s a few seconds pause.'
|
|
|
+ '"<<$pcs_firstname>> <<$pcs_lastname>>, where the hell have you been? Get in here. Now.", you gulp at her voice and with trepidation make your way to her office.'
|
|
|
+ gt 'pushkin_ballet_res', 'warden_room'
|
|
|
+ else
|
|
|
+ minut += 10
|
|
|
+ 'You press the buzzer but there''s no response.'
|
|
|
+ act 'Return': gt 'pushkin'
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+if $ARGS[0] = 'warden_room':
|
|
|
+ *clr & cla
|
|
|
+
|
|
|
+ $location_type = 'private'
|
|
|
+ $setloc['StageTitle'] = 'Wardens Residence'
|
|
|
+ $setloc['StageImage'] = '<<$default_img_path>>/ballet_residence/warden'
|
|
|
+ $location_type = 'public_indoors'
|
|
|
+ gs 'shortgs', 'setloc', 'pushkin_ballet_res', $ARGS[0]
|
|
|
+ gs 'themes', 'indoors'
|
|
|
+ gs 'stat'
|
|
|
+
|
|
|
+ gs 'core_library', 'stage_title'
|
|
|
+
|
|
|
+ ! Punishment or plot
|
|
|
+ act 'Go to the hallway': minut += 5 & ballet_awol = 0 & gt 'pushkin_ballet_res', 'hallway'
|
|
|
+end
|
|
|
+
|
|
|
+!! Activities
|
|
|
+if $ARGS[0] = 'rules':
|
|
|
+ *clr & cla
|
|
|
+ minut += 5
|
|
|
+ gs 'stat'
|
|
|
+ *pl '<center><h2>Residence Rules</h2></center>'
|
|
|
+ *pl 'You look at the rules on the wall.'
|
|
|
+
|
|
|
+ *pl 'Whilst you stay in this accommodation, you will follow these rules:'
|
|
|
+
|
|
|
+ '1) No males are allowed in the accommodation block.'
|
|
|
+
|
|
|
+ '2) All residents must return to the block by 21:00. No exceptions. If you are late, you will have to report to the duty warden.'
|
|
|
+
|
|
|
+ '3) No smoking, drinking, or drug use is allowed in the accommodation. If you are caught, you will face immediate dismissal from the school.'
|
|
|
+
|
|
|
+ '4) Breakfast is from 06:00 to 07:00.'
|
|
|
+
|
|
|
+ '5) All rooms must be kept clean and tidy.'
|
|
|
+
|
|
|
+ '6) Valuables can be left with the duty warden if required. All thefts or problems are to be reported immediately.'
|
|
|
+
|
|
|
+ '7) You are to follow the duty warden''s instructions in an emergency.'
|
|
|
+
|
|
|
+ act 'Look away': gt 'pushkin_ballet_res', 'bedroom'
|
|
|
+end
|
|
|
+
|
|
|
+if $ARGS[0] = 'radio':
|
|
|
+ *clr & cla
|
|
|
+ minut += 30
|
|
|
+ pcs_mood += rand(1,5)
|
|
|
+ pcs_sleep -= rand(1,10)
|
|
|
+ if ballet_day >= 1 and week ! 7:
|
|
|
+ instrmusic_exp += rand(1,3)
|
|
|
+ pcs_perform += rand(1,3)
|
|
|
+ mod_homework[week] += 1
|
|
|
+ mod_daily_score[week] += 1
|
|
|
+ end
|
|
|
+ $setloc['StageTitle'] = 'Radio'
|
|
|
+ $setloc['StageImage'] = '<<$default_img_path>>/ballet_residence/radio'
|
|
|
+ gs 'stat'
|
|
|
+ gs 'core_library', 'stage_title'
|
|
|
+
|
|
|
+ 'You start to listen to the radio for half an hour, taking notes of the performance with the ideas from your earlier lesson. Then, you close your eyes and start humming along to the familiar music after a while. '
|
|
|
+
|
|
|
+ act 'Turn the radio off': gt 'pushkin_ballet_res', 'bedroom'
|
|
|
+end
|
|
|
|
|
|
if $ARGS[0] = 'feetcare':
|
|
|
|
|
|
@@ -344,10 +366,10 @@ if $ARGS[0] = 'feetcare':
|
|
|
$setloc['StageImage'] = '<<$default_img_path>>/ballet_events/feet_soak'
|
|
|
gs 'core_library', 'stage_title'
|
|
|
|
|
|
- 'After a long day, you diligently inspect your calves and feet for injuries, gently massaging Arnica Gel onto your calves and ankles to alleviate stiffness and swelling. Next, you carefully examine your calluses and check for any blisters.'
|
|
|
- 'With the checks completed, you reach for your exercise band, commencing a series of foot-stretching exercises, culminating in a soothing massage using a tennis ball on your calves and soles.'
|
|
|
+ 'After the long day at the ballet class, you diligently inspect your calves and feet for injuries, gently massaging Arnica Gel onto your calves and ankles to alleviate stiffness and swelling. Next, you carefully examine your calluses and check for any blisters.'
|
|
|
+ 'With your checks completed, you reach for your exercise band, commencing a series of foot-stretching exercises, culminating in a soothing massage using a tennis ball on your calves and soles.'
|
|
|
'You take a brief moment to unwind before donning your foot warmers, making your way to the kitchen to fetch cold water and investigate the freezer for ice. Fortunately, the school has stored ice cube trays. After replenishing the trays, you fill a bowl and carry it back to your room.'
|
|
|
- 'Seated on your bed, you pour the bowl of ice cubes and water into a larger container. Adding a touch of Epsom Salts, you brace yourself as you immerse your feet in the chilling water. Your body shudders briefly from the shock, but after a few moments, the sensation subsides. You close your eyes and attempt to relax.'
|
|
|
+ 'Seated on your bed, you pour into the bowl the ice cubes and chilled water into a foot bath. Adding a touch of Epsom Salts, you brace yourself as you immerse your feet in the chilling water. Your body shudders briefly from the shock, but after a few moments, the sensation subsides. You close your eyes and attempt to relax.'
|
|
|
|
|
|
! logic check for then you check your new ballet shoes, and start sewing the ribbons on and break the sole to relax whilst your feet soak.
|
|
|
|
|
|
@@ -368,4 +390,34 @@ if $ARGS[0] = 'study':
|
|
|
act 'Finish studying': gt 'pushkin_ballet_res', 'bedroom'
|
|
|
end
|
|
|
|
|
|
+if $ARGS[0] = 'make_up':
|
|
|
+ !! Practice make up skills
|
|
|
+ *clr & cla
|
|
|
+ minut += 60
|
|
|
+ mod_homework[week] += 1
|
|
|
+ mod_daily_score[week] += 1
|
|
|
+ gs 'exp_gain', 'makupskl', rand(1,3)
|
|
|
+ if pcs_makupskl < 30:
|
|
|
+ mc_inventory['cosmetics'] -= 9
|
|
|
+ pcs_makeup = 0
|
|
|
+ elseif pcs_makupskl >=31 <= 74:
|
|
|
+ mc_inventory['cosmetics'] -= 5
|
|
|
+ pcs_makeup = 3
|
|
|
+ elseif pcs_makupskl >= 75:
|
|
|
+ mc_inventory['cosmetics'] -= 3
|
|
|
+ pcs_makeup = 5
|
|
|
+ end
|
|
|
+ gs 'stat'
|
|
|
+ $setloc['StageTitle'] = 'Feet Soak'
|
|
|
+ $setloc['StageImage'] = '<<$default_img_path>>/ballet_events/make-up'
|
|
|
+ gs 'core_library', 'stage_title'
|
|
|
+
|
|
|
+ if pcs_makupskl < 30:
|
|
|
+ 'You struggle to master the basics of applying your look, wasting a lot of your expensive make-up. You wonder if you should get help with practicing.'
|
|
|
+ else
|
|
|
+ 'You artfully apply the make-up look with a quick, practiced ease that would leave most girls with envy. The final look is almost perfect and you criticaly review the final result.'
|
|
|
+ end
|
|
|
+
|
|
|
+end
|
|
|
+
|
|
|
--- pushkin_ballet_res ---------------------------------
|
