|
@@ -124,13 +124,14 @@ if $ARGS[0] = 'nap_bed':
|
|
|
act 'Take a nap (1:00)':
|
|
act 'Take a nap (1:00)':
|
|
|
if pcs_sleep >= 10 and pcs_sleep <= 90:
|
|
if pcs_sleep >= 10 and pcs_sleep <= 90:
|
|
|
cla
|
|
cla
|
|
|
|
|
+ InSleep = 1
|
|
|
pcs_sleep += 10
|
|
pcs_sleep += 10
|
|
|
pcs_health += 5
|
|
pcs_health += 5
|
|
|
minut += 60
|
|
minut += 60
|
|
|
gs 'stat'
|
|
gs 'stat'
|
|
|
*nl
|
|
*nl
|
|
|
'You sleep about an hour.'
|
|
'You sleep about an hour.'
|
|
|
- act 'Get up': gt $loc, $loc_arg
|
|
|
|
|
|
|
+ act 'Get up': InSleep = 0 & gt $loc, $loc_arg
|
|
|
elseif pcs_sleep < 10:
|
|
elseif pcs_sleep < 10:
|
|
|
gt 'sleep', 'sleep'
|
|
gt 'sleep', 'sleep'
|
|
|
else
|
|
else
|
