12345678910111213141516171819202122232425262728293031323334353637 |
- # husb
- if $ARGS[0] = 'start':
- clr
- gs 'stat'
- if week < 6:
- if hour > 22 or hour < 7:'
- Your husband <<$husName>> lying in bed opens his eyes. "What do you want? Night already, go to sleep."'
- elseif hour = 7:
- '<<$husName>> sitting at the kitchen table.'
- elseif hour = 17:
- '<<$husName>> sitting at the kitchen table.'
- elseif hour > 17 and hour <= 22:
- '<<$husName>> sitting on a couch and watching television.'
- end
- else
- if hour > 22 or hour < 7:
- 'Your husband <<$husName>> lying in bed opens his eyes. "What do you want? Night already, go to sleep."'
- elseif hour = 7:
- '<<$husName>> sitting at the kitchen table.'
- elseif hour > 7 and hour < 17:
- '<<$husName>> sitting on the couch and watching TV.'
- elseif hour = 17:
- '<<$husName>> sitting at the kitchen table.'
- elseif hour > 17 and hour <= 22:
- '<<$husName>> sitting on the couch and watching TV.'
- end
- end
- act 'Leave':gt $loc, $metka
- if husbandsexday < 4:
- act 'Sex with my husband.':gt 'husbsex', 'room'
- end
- end
- --- husb ---------------------------------
|