|
@@ -119,14 +119,13 @@ if $ARGS[0] = 'saunaroom':
|
|
|
act '<b>Exit to the sauna</b>':gt 'saunawhore', 'saunawork'
|
|
|
|
|
|
if workDolg > 0:
|
|
|
-
|
|
|
act 'Have some food (0:15)':
|
|
|
gs 'food', 'm_meal'
|
|
|
workDolg += 100
|
|
|
end
|
|
|
- act 'Drink some water (0:05)':
|
|
|
- gs 'beverage', 'bev_wat'
|
|
|
- end
|
|
|
+
|
|
|
+ act 'Drink some water (0:05)': gs 'beverage', 'bev_wat'
|
|
|
+
|
|
|
act 'Borrow cosmetics':
|
|
|
workDolg += 1000
|
|
|
kosmetica += 25
|
|
@@ -143,9 +142,7 @@ if $ARGS[0] = 'saunaroom':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- act 'Drink some water (0:05)':
|
|
|
- gs 'beverage', 'bev_wat'
|
|
|
- end
|
|
|
+ act 'Drink some water (0:05)': gs 'beverage', 'bev_wat'
|
|
|
|
|
|
dynamic $fatdel
|
|
|
dynamic $lekarstvo
|
|
@@ -154,9 +151,7 @@ if $ARGS[0] = 'saunaroom':
|
|
|
|
|
|
gs 'events', 'read_porn'
|
|
|
|
|
|
- if pcs_horny >= 50:
|
|
|
- act 'Masturbate':gt 'selfplay', 'start'
|
|
|
- end
|
|
|
+ if pcs_horny >= 50: act 'Masturbate':gt 'selfplay', 'start'
|
|
|
|
|
|
if pcs_sleep <= 80:
|
|
|
if $clothingworntype = 'nude':
|
|
@@ -170,27 +165,31 @@ if $ARGS[0] = 'saunaroom':
|
|
|
gt 'bed2', 'succhoice'
|
|
|
end
|
|
|
else
|
|
|
- act '<<$sleep_txt>>':
|
|
|
- if SaunaWhore = 0:
|
|
|
- workDolg += 850
|
|
|
- elseif SaunaWhore > 0:
|
|
|
- money -= 850
|
|
|
- end
|
|
|
- if disable_autosave = 0:
|
|
|
- if StoryLine = 0:
|
|
|
- savegame 'autosave.sav'
|
|
|
+ if workDolg > 0 or money >= 850:
|
|
|
+ act '<<$sleep_txt>>':
|
|
|
+ if workDolg > 0:
|
|
|
+ workDolg += 850
|
|
|
+ elseif workDolg <= 0:
|
|
|
+ money -= 850
|
|
|
+ end
|
|
|
+ if disable_autosave = 0:
|
|
|
+ if StoryLine = 0:
|
|
|
+ savegame 'autosave.sav'
|
|
|
+ else
|
|
|
+ savegame 'autosave_alt.sav'
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if $clothingworntype ! 'nude': gs 'clothing', 'strip'
|
|
|
+ if magf2bdo = 2:
|
|
|
+ gt 'bed2', 'magbstchoice'
|
|
|
else
|
|
|
- savegame 'autosave_alt.sav'
|
|
|
+ gt 'bed2', 'sleep'
|
|
|
end
|
|
|
end
|
|
|
- if $clothingworntype ! 'nude': gs 'clothing', 'strip'
|
|
|
- if magf2bdo = 2:
|
|
|
- gt 'bed2', 'magbstchoice'
|
|
|
- else
|
|
|
- gt 'bed2', 'sleep'
|
|
|
- end
|
|
|
+ killvar '$sleep_txt'
|
|
|
+ else
|
|
|
+ '<br>You don''t have enough money (850 <b>₽</b>) to sleep her tonight.'
|
|
|
end
|
|
|
- killvar '$sleep_txt'
|
|
|
end
|
|
|
end
|
|
|
end
|